mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Come mantenere lo stato attivo

come posso fare a non perdere lo stato attivo pigiando un pulsante
(commandButton),
considerando che ci sono 3 textbox  quindi lo stato attivo deve rimanere in
quello su
cui stavo lavorando (prima di aver pigiato il commandButton)?
Grazie

[*SYNCROVA* : 
sync...@tiscali.it
] ha scritto:

Se è solo un caso, devi semplicemente fare un SetFocus al "vecchio" TextBox
nell'evento Click del bottone.
Una via più "globale" può essere quella di Dim-ensionare una variabile "As
Object" globale (appunto) da Set-tare in ogni GotFocus = a
Screen.ActiveControl. In ogni evento di ogni controllo, prima di
eventualmente riassegnarla, avrai l'oggetto che aveva prima il fuoco
(occhio, può anche essere Nothing), fra tutte le finestre dello stesso
EXE/progetto.
Newsgroup: it.comp.lang.visual-basic
Titolo: DBGRID + Keypress ... come posso risolvere.. ????

Ho fatto una scoperta clamorosa (almeno per me) sulle DBGrid !
Ho scoperto che se si imposta la proprietą "MarqueeStyle" su "HighlightRow",
non si riesce piu' ad intercettare l'evento "KeyPress" !!!
A dire il vero, l'unica impostazione valida per poter intercettare l'evento
e' : "Floating Editor". Tutte le altre, lo inibiscono.
Avete qualche idea da darmi su come risolvere il problema ???
Grazie

Aldo ha preso carta e penna, poi, battendo la penna sulla tastiera, ha scritto:

KeyDown
KeyUp
hth, hal

 ha scritto nel messaggio
news:9i59kv$h09v2$1...@ID-56381.news.dfncis.de...

Grazie mille !
In effetti ho risolto.
Per curiosita' ... sai per quale motivo funziona cosi' ??
e poi....
non riesco a comprendere l'utilita' di usare il metodo KeyDown piuttosto che
il KeyUp.
Tanto quando uno ha schiacciato un tasto ormai lo ha schiacciato..... o no
???
Ciao e ancora grazie
Aldo

???
Be', non e' detto che la finestra o il controllo attivo sia lo stesso in entrambi i momenti
oppure il programma deve poter reagire coerentemente con la posizione del tasto.
Ti faccio un esempio banale, sfruttando la risposta data recentemente da H.P.L.
sull' utilizzo del messaggio BM_SETSTATE.
Sul form con 2 command button metti questo codice (che e' quello di H.P.L.
con l' aggiunta degli eventi di tastiera):
Option Explicit
Private Const BM_SETSTATE = &HF3
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
    (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private m_nState As Integer
' contromisura contro l' autorepeat del tasto se viene premuto a lungo
Private m_AntiRepeat As Integer   
Private Sub Command1_Click()
    m_nState = IIf(m_nState, 0, 1)
    SendMessage Command2.hWnd, BM_SETSTATE, m_nState, ByVal 0&
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If (KeyCode = vbKeyF3) Then
        If (Shift = 0) Then
            If (m_AntiRepeat) Then Exit Sub
            m_AntiRepeat = 1
            Command1_Click
        End If
    End If
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
    If (KeyCode = vbKeyF3) Then
        If (Shift = 0) Then
            Command1_Click
            m_AntiRepeat = 0
        End If
    End If
End Sub
Private Sub Form_Load()
    KeyPreview = True
End Sub
Eseguilo e premi F3: sul KeyDown il bottone si abbassa e ritorna su al KeyUp.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: gestire i bit in uscita sulla porta lpt1

Vorrei sapere se in VB5 è possibile porre in uscita dei byte sulla
porta parallela (LPT1)  ( equivalente all OUT del quickbasic)
Grazie
		Roberto


Sul Sito Comune c'e' una DLL con tanto di esempio d'uso in VB. Permette di
fare IN/OUT sulle porte.
Funziona solo sotto win95/98. Si chiama: Win95io.zip
http://www.murialdo.it/it_lang_vb
Non so dorti qual'e' addr della parallela, e nemmono come funziona, ma penso
che sai gia' come fare.
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Web Browser

Allora.
Ho un Web Browser, no?
MA COME FACCIO A DIRGLI CHE PAGINA DEVE APRIRE? Ho visto nelle proprietą ma
non ho trovato niente.
:-(((((((((((((((
L'ennesima delusione di VB...
Quasi quasi passo a C#
Scherzo :-P
-- 
Look at 
http://www.ssrsoftware.135.it

Url = text1.text
(presumendo che inserisci in text1 l'indirizzo completo del sito)
WebBrowser1.Navigate2 (URL)
bb

Grazie 1000


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!

HO DEI PROBLEMI CON L'AGGIORNAMENTO DEI COMMAND DELLE DATAENVIRONMENT E IN
CON LE DATAENVIRONMENT IN GENERE.
C'è QUALCUNO CHE SA COSIGLIARMI DOVE POSSO TROVARE QUALCOSA CHE MI AIUTI?
GRAZIE
Newsgroup: it.comp.lang.visual-basic
Titolo: Dbgrid e Msflexgrid

Salve,avrei la necessità di attribuire dei valori a una serie di articoli
che ho collocato dentro ad una msflexgrid.
Per l'inserimento per ora ho utilizzato una casella di testo e un pulsante,
dove inserisco il valore e premendo il pulsante in base al row, posiziona il
valore sull'articolo che desidero ma è abbastanza caotico questo
procedimento.
E' possibile utilizzare il controllo Dbgrid ( oppure un controllo che
permetta l'inserimento in griglia dei valori,più semplice che il dbgrid)
caricandolo con il metodo Do While not .eof (DAO) senza usare il
datacontrol,e successivamente inserire i valori dentro le caselline della
dbgrid,tipo access salvando poi i valori con un semplice ciclo che conti
tutte le caselle della Dbgrid.
 Sarei grato se qualcuno postasse un piccolo esempio,ma la documentazione
che ho sul dbgrid è scarsa.
Ringrazio fin d'ora.

 procedimento.
Potresti posizionare dinamicamente la textbox sulla cella da modificare.
E non solo, anche una combo o una listbox, se devi far scegliere fra valori
predeterminati.
Mi sembra che ci sia un esempio sul sito comune ed anche su msdn.
Ciao
Aldo



non so perché, ma il fatto di posizionare una combo in una cella (giocando con il z-order, ecc., ut
MSDN SCque docet) non mi ha mai funzionato...
In ogni caso, in alternativa alla visualizzazione della textbox, potresti posizionarti sulla cella
interessata con un iterazione tipo for i=0 to grid.rows.... next e sospendere il ciclo fino a quando
non premi "enter" come conferma dell'avvenuta immissione del valore nella cella...
mmm.... forse è meglio il metodo della textbox, però potrebbe essere un'alternativa.
In ogni caso ti consiglio la Flexi, non la dbgrid: la flexi è più semplice da "navigare" mentre la
dbgrid in modalità unboun è una peste nera...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 ut MSDN SCque docet) non mi ha mai funzionato...
manca una "n"... "docent"... scusate la precisazione un po' OT, a se se ne accorgeva Pal.... ;-PPP


 manca una "n"... "docent"... scusate la precisazione un po' OT, a se se ne
accorgeva Pal.... ;-PPP
...apprezzava la finezza: a differenza di atque e quoque, il -que fonde
parecchio i sostantivi (in questo caso) che unisce: senatus populusque agit.
almeno, al neurone delegato alla sfera memoriale sembra di ricordare cosi'.
l'altro non ha nulla da obiettare.
per cui te la cavi benone, webma[gi]ster :))

 dbgrid in modalità unboun è una peste nera...
Appoggio e spingo (occhio al burrone !)
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: Lista delle Api

Sapete dove posso trovare un listone delle Api con
relativa descrizione?
Già che ci sono:
Mi è venuto un lapsus e mi ricordo che in Pascal si usava creare una
variabile contenente i campi che volevamo scrivere su un file (tipo l'istr.
Type). E' possibile in Vb fare un Type con al suo interno più
variabili e scriverle in blocco su un file .txt o un recordset? Il type
(visto che non l'ho mai usato) si può dichiarare da qualsiasi parte (form,
Module, Dll, Ocx)?
Un grazie a chi mi risponde
Ciao
Oz
--
Carè Walter SIA SOFTWORK S.R.L.
Via Zanardelli, 13/A - 25062 Concesio (BS) Italy
Tel. 0039-30-2008135/0039-30-2091057  Fax. 0039-30-2004911
Web: 
http://www.siasoftwork.it
 - E.mai:- 
ca...@siasoftwork.it


Va dichiarato in un modulo/modulo di classe, quindi i form dovrebbero essere
inclusi.
Quello di cui parli tu e' l'apertura di file for random, i dati si leggono
con get e si scrivono con put ...
Ciao,
Alessandro


http://dataworld.hyperlink.cz/products/wininfo/
 e grazie a pal per il link
[cut]
E' normale che scarichi a 200 byte (!!) al secondo??
---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---


Non c'è nessuno che mi può postare la win32 api library perpiacere.........
Grazie
Oz




Grazie mi hai illuminato!!
Ciao
Oz

tematico con relative istruzioni.
Data l'ora questo è un sogno erotico
Ciao, Giorgio

>Sul sito 
www.vbapi.com
 trovi quasi tette le API in ordine alfabetico o
Non ci avevo fatto caso!
Era in crisi!
Ciao
Oz
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Dove sbaglio ? Stampa di una PictureBox

In sequenza:
- Apro una Picture Box di nome Pct1 su un form Frm_1
- Disegno con comando line, circle e chi più ne ha più ne metta su Pct1.
- Stampo la Pct1 (????)
Al punto di stampare con il comando:
Printer.PaintPicture Frm_1.Pct1.Picture, 10, 10
il debug si sveglia dicendomi "Formato non valido proprietà Picture".
Qual è l'errore ?
Grazie.

...

Non c'è nessun errore, la picture non stampa il suo contenuto quando lo si
modifica con dei metodi grafici tipo line pset o circle.

...


che ho tracciato.  Uso il VB4.
L'ho provato con il VB5, non so per il 4: copia l'immagine dalla picturebox
originale su una non visibile, poi stampa _questa_   ;-)
Picture1.AutoRedraw = True
Picture1.Line (100, 100)-(200, 220)
Picture1.Line -(300, 120)
Picture1.Line -(450, 260)
Picture1.Line -(650, 760)
Picture1.Line -(950, 200)
Picture2.Picture = Picture1.Image
Printer.PaintPicture Picture2, 100, 100
Printer.EndDoc
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Ottimizzazione del codice per PentiumPro

Nel VB6, nella finestra delle proprietą di un progetto, nella tab Compile
c'č una checkbox che permette di abilitare l'ottimizzazione del codice per i
processori PentiumPro.
Il mio dubbio č il seguente: questa ottimizzazione dovrebbe avere effetto
con tutti i processori di classe P6 (PentiumPro, Pentium II, III e IV) e nel
VB6 si parla solo di PentiumPro perchč all'"epoca" era l'unico processore P6
disponibile, o sbaglio?
Saluti
Simone

 wrote in message
news:QQit6.36980$x3.7...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: esempi grafici

Salve,
mi potreste indicare qualche sito o un pò di
documentazione riguardante inplementazioni
grafiche (drag & drop, zoom, vis. di immagini ecc. ecc.)
sotto VB6.
grazie per la collaborazione!
Crescenzo Vitolo

 sotto VB6.
mi pare che su 
http://www.vbcode.com
 ci fosse qualcosa...
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Debug di ActiveX Dll

Ho bisogno di utilizzare un gruppo di progetti VB6 del tipo ActiveX Dll in
modalità non compilata, in modo da poter fare il Debug.
Tali Dll vengono usate in una pagina ASP, dove vengono create varie istanze
degli oggetti contenuti in esse.
Il problema è che viene usata la versione compilata di queste dll,
impedendomi di fare un'esecuzione passo-passo.
Implementando una cosa simile(Funzionante con ADO RDS anzichè ASP) ero
riuscito ad utilizzare le Dll in "Play" aggiungendo un progetto di tipo exe
e settandolo come progetto di avvio, però ora non funziona mica, nemmeno se
riavvio il PC.
Non ne vengo più fuori da questo c... di problema: confido ( e sono sicuro)
che qualcuno di voi abbia già risolto questo problema.
Ciao e grazie.

Un demone messaggero mi porta una pergamena di MmTt
scritto con il suo sangue con le seguenti tenebrose parole:

Prova a fare un gruppo di progetti: 
e includi:
progetto di active x
e progetto che usa l'active x
E poi metti i breakpoint sui punti che vuoi analizzarli...
L'ultima volta che ho scritto u programma in vb e' almeno un anno fa
mentre per le active x e' piu di 2 anni fa... e quindi vado a memoria...
Adesso sviluppo in C++
-- 
Sidewinder  
---------------------------------------------------------------------
         Why use Windows when you can have air conditioning?
         Why use Windows, when you can leave through the door?
	-- Konrad Blum
---------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: boolean

Scusate le tante domande, ma sto iniziando adesso a programmare:)
Se scrivo su un file di testo il contenuto di una variabile boolean:
da dentro VB mi scrive "Vero"
una volta compilato mi scrive "True"
Come mai?

Come mai?
Dipende dalla lingua del tuo vb e del sistema operativo ospite.
Per levarti da possibili sorprese non salvare mai i boolean,
ma, piuttosto salva direttamente 1 o 0 e vivrai felice e contento.
(idem per i db tipo access che hanno un tipo simile: sostituiscilo
con Byte o Integer)
-- 
ciao, hal

 ma, piuttosto salva direttamente 1 o 0 e vivrai felice e contento.
Volendo essere precisi:
 True corrisponde a -1 (e non ha 1) e False a 0
--
Dark Hado

 True corrisponde a -1 (e non ha 1) e False a 0
Il problema non era l' equivalenza True/False, ma la disinvoltura
che ha vb nel tradurre nella lingua locale True/False.
Se scrivi "Vero" e leggi con la versione inglese, allora il codice
va in errore.
Poi, che sia -1, 1 o non-zero non ha molta importanza.
-- 
ciao, hal

 ha scritto

Usare sempre, nei test, anche in stringhe SQL, <>0 per vero/true e =0 per
falso/false

 Poi, che sia -1, 1 o non-zero non ha molta importanza.
Con la mia precisazione volevo solo evitare altri possibili problemi al
nostro amico, poichè ha dichiarato di essere appena agli inizi con VB
--
Dark Hado

 nostro amico, poichè ha dichiarato di essere appena agli inizi con VB
Giusta precisazione, ma essendo inutile ai fini del discorso, anzichè
aiutarlo potrebbe solo generare confusione.
Che poi si usi -1, 1, 2, 34 per true e 0, 5 o 77 per false non ha
importanza, l'importante è che il test in SQL sia fatto sui valori
convenuti.
Ciao

 aiutarlo potrebbe solo generare confusione.
non č vero che č inutile partire con il piede giusto soprattutto per chi
deve imparare č importante
ciao :)

 una volta compilato mi scrive "True"
ti consiglio di scrivere il valore della variabile booleana col seguente
metodo, per lo meno otterrai l'uniformità che cercavi!
IIf (variabile = True, "Vero", "Falso")
Ciao, malmsteen.


un altro metodo per fare lo stesso errore? :)))
ciao :)

> un altro metodo per fare lo stesso errore? :)))
No, no :)
con IIf (variabile = True, "Vero", "Falso") esce scritto "Vero" o "Falso"
(in italiano) anche dopo aver compilato l'exe.
Con MsgBox Variabile l'exe restituisce "True" o "False".
Ma avrò capito male io? Boh :)
Ciao, malmsteen.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] API Polygon

Come si usa l'API Polygon? Mai usato API.
Grazie.

Come si usa l'API Polygon? Mai usate API.
Grazie.

 ha scritto nel messaggio
news:8pi8j7$2hu$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Urgente - Spostarre un progetto di VB6

Salve a tutti, ho un grosso problema.
Ho la necessità di lavorare sia a in ufficio che a casa e per far questo
comprimo la cartella dove ho i progetti di un programma in VB6 e poi la
scomprimo nel pc dove devo lavorare.
Fino a qui tutto bene, ma quando riapro il gruppo di progetto (.vbg) viene
perso i riferimenti a quasi tutti i progetti (.vbp), i riferimenti in
progetti stessi e gli oggetti ocx all'interno delle form (solo per le ocx
che ho creato)
qualcuno mi sa aiutare ?

 wrote in message
9roev9$96q$1...@fe1.cs.interbusiness.it...

Dovresti copiare i File OCX che sono nella cartella C:\windows\system
nella cartella corrente del programma ... a me funziona sempre
Naturalmete solo quelli che ti servono ..... Oppure tutti :-)

 ha scritto nel messaggio
news:9romga$9bm$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Come si "aggancia" dinamicamente del codice SQL da VB6 ad una report di Access97?

Sto usando VB6 applicato ad Access97 per (cercare di) stampare una
report.
Il mio problema e' lanciare una report basata su una query di volta in
volta parametrizzata. Mi hanno consigliato questo:
Creare la query che mi interessa;
Creare la report basata sulla query;
Modificare le proprieta' della report, togliendo l'Origine Record che
puntava alla query e mettendo blank;
Scrivere il seguente codice:
Dim appl As Access.Application
Set appl = New Access.Application
pippo = "SELECT Clienti.Cognome, Clienti.Nome, Ordini.IDOrdine " & _
        " FROM Clienti INNER JOIN Ordini ON Clienti.IDCliente =
Ordini.IDCliente" & _
        " WHERE Ordini.IDOrdine=21"
appl.OpenCurrentDatabase "C:\Maineri\ordini.mdb"
appl.DoCmd.OpenReport "Ordini1", acViewNormal, pippo
appl.DoCmd.Quit
dove pippo e' il mio codice SQL copiato dalla query originale, ma con la
where che
di volta in volta mi costruiro' correttamente (
p.es
. in questo caso il
campo e' uguale a 21).
Teoricamente questo codice doveva stampare la report che a questo punto
ricavava il codice SQL dalla variabile pippo, pero' i valori dei campi
sulla report sono tutti "#Nome?". Immagino che l'SQL di pippo non venga
agganciato alla report in questo modo.
Dove ho sbagliato?
Aiuto raga, sto uscendo di testa per queste report!!
Grazie a tutti!
Luka

 wrote in message
3948DD63...@tiscalinet.it...


Giorgio, per piacere fammi un esempio.
Grazie!
Luka

Newsgroup: it.comp.lang.visual-basic
Titolo: Somme in dbgrid

Ho una Dbgrid che popolo mediante un controllo data. Il controllo data apre
un database db3.
Questo database ha 5 campi, (codice, articolo, numero, quantità, prezzo). Il
mio problema è il seguente: dovrei fare la somma di tutti i record nel campo
"prezzo, e scrivere il totale in una textbox.
Attualmente risolvo il tutto con un ciclo, cioè:
Do While Not Data1.Recordset.EOF
Totale1 = Data1.Recordset.Fields("TOT_RIG")
Totale = Totale + Totale1
Data1.Recordset.MoveNext
Loop
Questo però mi da un problema "visivo", cioè si vede scorrere tutta la
dbgrid al momento dell'inizio del ciclo. Ho provato a mettere "visible =
false" all'inizio del ciclo, ma nel momento in cui rimetto Visible = true mi
perde il setfocus della dbgrid, e non riesco a recuperare la posizione (x
questo uso un segnalibro, ma comunque non funziona dopo il visible=true)
Ho provato ad usare il sum in SQL ma se richiamo la funzione mentre sto
scrivendo nella dbgrid non funziona.
Se conoscete altri metodi sicuri (magari sfruttando le proprietà della
dbgrid) vi prego di postarle. Grazie, ciao

 wrote in message
FWJE9.78391$Yw.36...@news2.tin.it...

io popolo una msflexgrid da un recordset ADO con un ciclo DO WHILE e mi
calcolo i totali dei campi
con delle variabili direttamente nel ciclo che popola la griglia, finito il
ciclo inserisco: Textxx.Text = somma

 wrote in message


lo scorrimento visivo lo eviti ciclando su un rs ottenuto via codice,
anziche' sul controllo data
dim rs as recordset
set rs = miodb.openrecordset("tabella",dbopentable)
do while not rs.eof
...
in questo caso, pero', cioe' una somma, in dao puoi lavorare in modo
molto piu' efficiente con una stringa sql, qc come
dim rstot as recordset
set rstot= miodb.openrecordset("select sum(tot_rig) from...
where...",dbopensnapshot)
txtTotale.text=rstot.fields(0)
set rstot=nothing
albe... correggimi dove serve :)
ugo tu non ci provare neanche. da un blobrammatore non accetto
consigli :P
--
ciao, j.
www.sundaysw.com

 ha scritto nel messaggio
news:FWJE9.78391$Yw.36...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VisBasic e esacrw?

Qualcuno ha idea di come funzioni ESACRW.exe, il programma che rilascia la
ESA con ESATTO 2000 e che permette di utilizzare stampe personalizzate
create con Crystal Report 5.0 ? Inoltre le verticalizzazioni in VB5/6 per
ESATTO 2000 come si integrano in un punto qualsiasi del programma ESATTTO
2000? 
HO BISOGNO DI UN IMMEDIATO AIUTO!!
--
Posted from 
smtp2.libero.it
 [193.70.192.52]
via Mailgate.ORG Server - 
http://www.mailgate.org

...


 scritto nell'articolo


Se non sei un partner ESA non sei autorizzato ad avere queste informazioni,
Alla faccia della flessibilita' del software!
Fabio Pagano


...

Newsgroup: it.comp.lang.visual-basic
Titolo: cerco libro

salve a tutti,
Sto cercando disperatamente il libro
visual basic 6 tutto&oltre
Casa editrice Apogeo
Il libro č esaurito e la casa editrice non fa + la ristampa.
Sapete dove posso reperirlo??
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Sapete dove posso reperirlo??
Io lo avevo comprato ma ora sono passato a BV.net!
Di dove sei???
Per l'e-mail cancella (LEVA)
Ciao

Roma centro
SUB-ZERO ha scritto:




> Roma centro
ti ho risposto via e-mail

Newsgroup: it.comp.lang.visual-basic
Titolo: Arrotondamento alle 500 lire superiori

Come posso realizzare una funzione semplice per arrotondare una cifra
alle 500 lire superiori?
Grazie
Antonio.


wrote:

Oh, beh, veramente semplice...
((x +499)\500)*500
Nicola Brion
SysAdmin
Unitessile Spa
Dosson (TV) Italy

 Antonio.
Io farei cosi' :
function arrotonda (impo as long) as long
            arrotonda = ((impo\500)+1)*500
end function
da programma :
importo = 12750
importo = arrotonda(importo)             mi restituisce 13000
ma nel caso abbia 12.000 ??? Devi arrotondare comunque alle 500
superiori ???
Se la risposta e' no fai cosi' :
Function arrotonda(impo As Long) As Long
         If impo Mod 500 Then
            arrotonda = ((impo \ 500) + 1) * 500
           Else: arrotonda = impo
         End If
End Function
Teatini Venanzo

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Cambiare la data ad un file

Per un capriccio ho cercato (invano) di modificare la data, da VB, di
alcuni file di template associati al MS Works 4.0. Il motivo è... perche'
il Works me li mostra ordinati per data.. e non in ordine alfabetico (come
preferirei..dato che ormai sono molti).
Torniamo al problema: non sono riuscito a trovare una istruzione utile a
modificare la data di questi file. L'unico sistema che sono riuscito ad
escogitare :) è stato quello di aprire dei file corrispondenti in una
cartella adiacente (ovviamente in modalità binaria) e trasferirvi i dati.
Il sistema funziona... ma è sicuramente macchinoso.
Conoscete un sistema migliore?
-- 
Ciao da MioMao!
---------------------------------------------------
+++++  Visita la mia CasaPagina! +++++
++++ 
http://www.digibank.it/miomao
 ++++

alcuni file di template associati al MS Works 4.0. Il motivo č... perche'
Se hai l'MSDN trovi l'esempio sotto
Technical Articles/Visual Tools/Visual Basic/Visual Basic Tips/Tip 195:
Modifying a File's Date and Time Stamp in Visual Basic 4.0
Altrimenti postero' l'esempio su it.binari.visual-basic visto che e' un po'
lunghetto.
Si tratta comunque di usare la funzione SetFileTime.
Ciao e buon anno
Gian Michele Bertoni
--
Home Page: 
http://space.tin.it/computer/gbertoni/

 Si tratta comunque di usare la funzione SetFileTime.
No, lascia stare, ti ringrazio molto! :-)  Dato il fatto che ho il CD
(originalissimo).. direi che è giunto il momento di iniziare ad usarlo :))
-- 
Ciao da MioMao!
http://www.digibank.it/miomao

potesse aiutare. Tu, esattamente, come e cosa hai cercato? :-)
SetFileTime :-)
Buon 1999

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Piltaggio di uno Scanner

Dovrei pilotare uno scanner Twain
ho il controllo ImgScan.dll 1.01.20136 (1995/1996) della TWAIN, che funziona
bene, ma...
Per "settare" lo scanner mi costringe ad aprire il pannellino di setup del
mio scanner settando la proprità
ShowSetupBeforeScan=true
Se non lo faccioe, scannerizza "male" (sbaglia la zona da scannerizzare,
ovvero fa solo parte della pagina A4). Insomma pare che il settaggio sia
obbligatorio ogni volta.
Vorrei pilotare completamente lo scanner da codice, senza aprire nessun form
di settaggi.
Qualcuno sa come fare?
Grazie molte
riccv...@hotmail.com

l'uso di scanner twain costringe a passare per l'interfaccia software
fornita dal produttore dello scanner stesso
questo significa che modelli diversi hanno funzioni diverse
implementate nell'interfaccia
twain ha semplificato l'interfacciamento (e l'uso) degli scanner, ma
ha anche reso impossibile operare direttamente sulle periferiche (ad
esclusione di alcuni modelli)
insomma, non tutte le interfacce twain supportano la programmazione
diretta (ad esempio quelle degli scanner HP) ed ancora meno ricordano
le ultime impostazioni, rendendo agevole la lettura
un modello che invece supporta la programmazione è il Plustek OpticPro
4031 (~150kl, parallelo, 8 sec/pag per il b/n a 300dpi)
concludendo, non è detto che twain supporti la programmabilità, quindi
il tuo programma dovrà tenere conto di questo
se ne hai voglia scarica Protocol (sono 10 mb, fatto qui da noi) che
implementa tutte le funzionalità dell'interfaccia twain
http://members.xoom.it/protocol
--
GbC
http://www.chiappori.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] stampa assegni

vorrei fare, per me, un programmino che stmpi gli assegni. uno mette un
blocchetto di assegni nella stampante, a sinistra, e poi avvia il prog (che
ha in un database i vari dati) e lui a uno a uno li stampa tutti.
mi chiedevo, però una cosa: il formato degli assegni è unico? cioe, i
margini dai bordi dei vari "campi" sono identici per tutte le banche? oppure
no?
grazie
MarioH

.....beato te che devi meccanizzare la stampa degli assegni  ;o)
(scusa, non ho resistito)
Stef


non colgo l'ironia... !!!!!!!!!!!!!!!!!!!!!!!!!!
veramente è per mio zio. ha una fabbrica. paga gli impiegati e gli operai
con assegni. vorrebbe inserire in un DB tutti i nominativi, con i relativi
importi, e poi, ogni mese, mette il blocchetto degli assegni, e via...
non credo ci voglia molto, ma io il programmino vorrei "generalizzarlo", una
volta sviluppato per lui,  e quindi volevo sapere se il formato degli
assegni era identico...
cmq credo di sì, anceh perche oggi penso che le banche usino strumenti
informatici per copiare le firme e confrontarle  con quelle dei clienti...
almeno credo...
MarioH

 MarioH
Io ho fatto qualcosa di simile qualche anno fa, ed ogni banca aveva un
formato diverso...
Puo' darsi che oggi le cose siano cambiate, ma non ne sarei tanto sicuro.
A suo tempo ho risolto mettendo una decina di template, in modo da
selezionare la banca e quindi stampare l'assegno con i giusti parametri.


già, ma dovrei avere 10 blocchetti degli assegni di 10 banche diverse...
se vado ad uno sportello bancario, e chiedo (anche pagando) di darmi un
blocchetto (si chiama "carnet" o sbaglio?) anche se non sono cliente, mi
fanno arrestare dopo 2 millesimi di secondo, scambiandomi per un falsario un
po' tontolone... ::)))))))))
MarioH


'Azz... stavo per dargli lo stesso consiglio!!!
Pausa pranzo del cacchio! (Mi ha fatto perdere una occasione di rispondere
seriamente a qualcuno... sigh sigh sigh...)
Cmq., no le cose non sono cambiate ed ogni banca ha il suo blocchetto e per
quanto simili possano sembrare sono di dimensioni + o - diverse.
Per "ogni banca" intendo "ogni tipo di banca" e non "ogni filiale".
--
-- Luvme2times
"Love me two times babe | I'm going awayyyy"
J.D.M.
Newsgroup: it.comp.lang.visual-basic
Titolo: domanda OT su msn e il modo in cui sa chi è connesso

secondo voi come fà messanger a sapere se io mi connetto e quindi ad
avvisare gli altri miei contatti che sono online se il mio IP cambia ogni
volta?
Grazie a tutti i guru che mi delucideranno.

 volta?
Non usando il tuo IP come chiave!!
;-)
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

La butto li, ma tutta da verificare. Per ogni messagger installato
crea un GUID, lo registra in un db remoto.
Ti colleghi, a tua insaputa messagger va a fare una query su
un db pubblico, confrontando il tuo guid, marca un flag di attivo
dopodiche passa la palla ad uno script che verificando chi sono
i tizi con i quali ti sei "linkato" manda un alert nascosto che stabilisce
chi è o chi no on line.
Altrimenti non mi spiego i periodi di latenza con il quale ci mette
alcune volte a mostrarti le informazioni.
-- 
Saluti
Andrea Moro

 chi č o chi no on line.
nemmeno cosě, credo. Fai un attimo mente locale: io uso il mio account su
tre PC differenti: il portatile da dove sto scrivendo questo post, il mio PC
server e un altro PC di mio fratello.
Se fossi come dici, ogni setup di msn avrebbe un GUID diverso, perciň non
puň essere cosě.
Credo che molto semplicemente usi username & password, che identificano in
maniera univoca il mio account. Indipendentemente dal PC da cui mi connetto,
sono sempre io.....
quoto invece il discorso dello "script" che dice a tutti che ti sei
connesso.....
good codind!!!
--
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

 non puň essere cosě.
E' che non ho mai provato ad usarlo su + pc contemporaneamente ;)
-- 
Saluti
Andrea Moro

 Andrea Moro
no, attenzione. Non č possibile usare msn contemporaneamente su piů PC:
l'ultimo PC connesso prevale sugli altri, che si sconnettono da msn......
quindi lo puoi usare solo una volta, ma il discorso non cambia. non č il
guid (supponendo che ci sia, perchč non lo so) a determinare l'account che
si connette, ma la coppia username e pwd.......
good coding!!!


Simba883 ha scritto:

Una volta su internet mi ero imbattuto nella descrizione del protocollo
usato dal messenger e in un client scritto in vb. Prova a fare una
ricerca, io non ho più i link.
-- 
Samuele Battarra
prova il mio newsreader:
http://news-navigator.sourceforge.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [?!?!] Aiuto risorse al 9%!!!

Ma com'č possibile che con un progetto di VB aperto le risorse di sistema
piambino al 9%?????
Aprebdo una dozzina di access o word non vanno sotto il 70%.....
premetto che i sorgente saranno max 5mb.....
Ditemi qualcosa.. oggi mi č venuto quasi un colpo.. aperto VB, aperto
access, aperto risorse del computer e mi appare un mesasggio che ho visto
solo 4 volte che recita piů o meno : "chiudi qualcosa perchč il pc sta per
crepare... hai piů del 90% di risorse utilizzate..."
Spero che qualcuno sappia dirmi qualcosa...
Grazie
PS Non ho nulla in background se non i driver della g200, icq, driver del
mouse e utility del plextor....
PPS Ho un PII 400 con 128mb di ram
PPPS Voi quanto avete di risorse? (Guardando brutalmente col misuratore di
risorse...)


Ho appena provato as aprire 15 form con relativo codice ...
winamp in funzione
connessione ad internet attiva
explorer ed outlook aperti
ICQ in funzione
e le risorse sono al 55%
io ho semplicemente un P166 con 64Mb
direi che il tuo VB ha qualche problema
Ciao
Marco

...


---------------------------
Non hai ancora pensato di mettere in esecuzione automatica anche la macchina
per il caffe'? :o)
Ciao
Marco


8-0|
Caro Stefano, che ne diresti di creare il newsgroup
it.informatica.masochismo.tecnologico ???
:-)
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: libreria user 32

Mi è capitato di vedere del codice scritto da altri , dove erano presenti
delle chiamate ad alcune funzioni messe a disposizione dalla libreria USER
32
Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long,
ByVal hWndNewParent As Long) As Long
Ho capito a cosa serve questa funzione , solo che mi chiedo : che funzioni
mi mette a disposizione questa libreria che non conosco ?
Dove posso trovarne documentazione ?


www.allapi.net
Ciao, Vincenzo

 Dove posso trovarne documentazione ?
MSDN
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: vecchi post

Salve, come faccio a visualizzare i vecchi post comparsi su questo NG.
Grazie

 Salve, come faccio a visualizzare i vecchi post comparsi su questo NG.
http://groups.google.com/groups?hl=it&group=it.comp.lang.visual-basic
Invece per fare delle ricerche:
http://groups.google.com/advanced_group_search
Per le FAQ, il manifesto e una marea di altra roba vai al
Sito Comune, indirizzo in firma.
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Cassetto stampante

ciao a tutti
qualcuno saprebbe dirmi come dire alla stampante da quale cassetto
prendere la carta e magari se si può dire per questa pagina
prendi il foglio dal cassetto 1 per ques'altra prendi la carta dal cassetto
2
Vi prego...
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

specifico che per stampare utilizzo un device context
creato con CreateDC("WinSpool".......


 2
A) Leggi le proprietà della stampante (l'esempio qua sotto lo fa) e vedi che
cassetti ci sono.
http://www.gbcweb.com/free/vb_esempi/samples_PrinterINFO.zip
B) In base ai cassetti imposti il codice del tuo programma per stampare nel
modo adeguato.
hola
-> GbC|
www.gbcweb.com

 
http://www.gbcweb.com/free/vb_esempi/samples_PrinterINFO.zip
File request does not exists, download aborted.
Ciao, Vincenzo

 Ciao, Vincenzo
ho appena finito di aggiornare il dns...
un po' di tempo e va a posto :)
-> GbC|
www.gbcweb.com

nel frattempo ho trovato DeviceCapabilities
che mi restituisce l'elenco dei cassetti disponibili ma come
numeri che mi indicano cassetto superiore,inferiore
che non corrispondono al nome che dà il driver della stampante
nel suo pannello di controllo


Newsgroup: it.comp.lang.visual-basic
Titolo: Modificare un DbCombo

Vorrei fare in modo che il testo contenuto nell'elemento selezionato del mio
DbCombo non si possa modificare.
Ho provato con la proprietà Locked, ma finisce per rendere inutilizzabile
l'oggetto (infatti non permette più la scelta dell'elemento).
Come fare?
grazie a tutti
Cristina

 ha scritto

style = 2 - (db)dropdown list

 wrote in message
949dpt$cn4sh$1...@ID-61090.news.dfncis.de...

Imposta la proprietà style = 2
Bye, Enrico.
------------------------------------------------
Dim VbEnry As Enrico
e-mail : 
vbe...@supereva.it
ICQ: 93357350
------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Calcolo.xls ????????

Ciao, per aprire il programma excel faccio:
shell "C:\Programmi\...\...\excel.exe"  Fin quì tutto ok.
ora vi chiedo:
Per aprire il foglio di excel, come faccio?
 ????  "C:\.....\Calcolo.xls" 
Grazie per eventuali risposte.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Per aprire il foglio di excel, come faccio?
Puoi utilizzare l'api shellexecute
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA"
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As
Long) As Long
Dim hFile as Long
hFile = ShellExecute(0&, "open", "c:\path\calcolo.xls", "", "", SW_SHOW)
--
Dark Hado

Dimenticavo:
Public Const SW_SHOW = 1
--
Dark Hado
Newsgroup: it.comp.lang.visual-basic
Titolo: Distribuire freeware su Internet

Qualcuno mi sa indicare il modo più semplice ed economico per rendere
disponibili in rete alcuni miei programmi freeware? Inoltre, è possibile
controllare l'accesso ai file tramite una password?
Grazie.
		Corrado

 controllare l'accesso ai file tramite una password?
Questa mail e' un pochino OT.
Se vuoi distribuire i tuoi programmi FREE pui provare a postarli al
Webmaster del Sito Comune di questo NG
http://members.xoom.com/it_lang_vb
Se li accetta verranno pubblicati con qualli gia' presenti.
Vi sono anche altri siti che accetterebbero molto volentieri i tuoi
programmi, non ti so dare un elenco, ma ce ne sono molti.
Un'altra valida possibilita' e' crearti un tuo sito privato. Puoi farlo
facilmente (e gratis) con 
www.freeweb.org
 o 
www.xoom.com
 o
www.geocities.com
.
-- 
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

controllare l'accesso ai file tramite una password?
  Puoi prendere lo spazio gratuito su uno dei vari siti che lo
offrono. Per quanto riguarda l'accesso protetto ai file, non so se sia
possibile con gli scarni strumenti messi a disposizione da quei siti,
comunque se proprio ci tieni a sapere chi li preleva puoi mettere una
password sui file zip. :-)
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

controllare l'accesso ai file tramite una password?
sicuramente e' possibile, ma non so aiutarti... mi spiace :-)
ciaociao
Francesco Mapelli ( 
mape...@tin.it
 )
http://members.xoom.com/Francesco
Mousestats, il contachilometri per il mouse
http://members.xoom.com/mousestats
Sito comune programmatori Visual Basic
http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Chudere una shell aperto precedentemente

Scusate la banalita' della domanda ma non riesco a chiudere un file exe
attivato precedentemente mediante una shell ,mi potete dare un "dritta"
Grazie
Mike  "
cdn...@netbusiness.it
"

Probabilmente quello che segue non č il metodo migliore, ma č il piů
immediato e funziona...
ID_Applicazione = Shell ("Applicazione.exe",1)  'Avvia l'applicazione
desiderata
.
'
.
' altre istruzioni del programma...
.
'
AppActivate ID_Applicazione                                ' Riattiva la
finestra
' dell'applicazione nel caso che
' abbia perso il focus
SendKeys "%{F4}", True                                         ' Invia
ALT+F4 per chiuderla
Ciao! Buon lavoro e soprattutto BUON 1999 !

Grazie infinite e' la prima volta che ricevo una risposta prima
che.........mi debba arrangiare grazie di nuovo e buon anno


...

------
Ciao!
Guarda sul Sito Comune, 
http://members.xoom.com/it_lang_vb
; trovi un
progetto di esempio chiamato "ProcessVW.zip" (se non erro), che permette di
chiudere i programmi attivi. Dovrebbe aiutarti.
Se hai altri problemi, fammi sapere.
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL, MODULO O OCX?

Ciao amici del NewsGroup,
voglio richiamare la vostra attenzione su un problema che mi si è posto.
Mi sono accorto che durante la stesura di vari progetti ho dovuto inserire
spesso le stesse routine e ho pensato di creare un OCX con tutte queste
routine gia scritte.
In questo modo io dovrei digitare solamente OCX1.MaiuscoloTextBox (ad
esempio) per riportare in maiuscolo i caratteri contenuti in tutte le text
box del form da cui viene richiamato l'OCX.
Teoricamente  dovrebbe funzionare ma nell'attuazione pratica non da alcun
risultato.
Allora ho pensato di creare una Dll ActiveX ed inserire tutto il codice - ma
non so poi come richiamare la dll dal form in cui mi occorre.
Di conseguenza mi è rimasta la possibilità del modulo, ma se ho aperti 2
form contemporaneamente mi cancella le textbox di entrambi.
Per far agire le routine in un solo form devo solamente riscriverle ogni
volta come public sub.
QUALCUNO DI VOI SA AIUTARMI?
COME POSSO FARE? COSI OGNI VOLTA CHE FACCIO UN PROGETTO IMPIEGO MENO TEMPO
PER RISCRIVERE LE STESSE COSE.
Grazie tante
Giovanni Gasparri
in...@gasparrisoft.cjb.net



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Passare parametri a stored procedures

Ciao a tutto il newgroup. Qualcuno mi sa dire se č possibile passare come
parametro a una Stored procedure in SQL 7.0 un parametro di tipo array?
Praticamente dovrei dire alla sp che deve ceracare dei dati relativi a n ID.
n č sempre un numero variabile.
Grazie mille a chiunque mi sappia dare una risposta
--
Raoul BONDONI
--
Raoul BONDONI


Non riesco a capire cosa intendi per numero variabile.Forse un valore che
imposti in una casella di testo di una maschera ?
     Dim PrimoValore As String
      PrimoValore = Me.txt1.Text
      Dim SecondoValore As Integer
      SecondoValore = Me.txt2.Text
      Dim TerzoValore As Variant
      TerzoValore = Me.txt3.Text
      Dim cd As New ADODB.Command
      Dim rs As ADODB.Recordset
      Set cd.ActiveConnection = conn
      cd.CommandType = adCmdStoredProc
      cd.CommandText = "NomeSroreProcedure"
      Set rs = cd.Execute(, Array(PrimoValore, SecondoValore, TerzoValore ))
Il numero degli argomenti presenti nella stored procedure,preceduti dal
simbolo @ , devono corrispondere al numero che riceve
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: Collegare una maschera ad una tabella di un db protetto da password

C'č qualcuno che mi potrebbe aiutare a collegare una maschera ad una tabella
contenuta in un database esterno ?
Il database esterno si chiama  Dati.mdb  ed č nella stessa cartella del mio
programma.
questa riga di codice funziona solo se il database dati.mdb non č protetto
da password
Me.RecordSource = "SELECT  * FROM datigenerali IN '" & CurrentProject.Path &
"\Dati.mdb' "
Come posso ottenere il solito risultato se dati.mdb č protetto per Es. dalla
password    MIAPASSWORD ?
   Grazie anticipatamente per l'interessamento.

    Grazie anticipatamente per l'interessamento.
non uso mai password con access, ma se cerchi "password" nei messaggi del
ng, ci sono state varie risposte alla domanda anche recentemente.

 wrote in message 90ditg$om9v$1...@ID-51318.news.dfncis.de...


 assegnato "ProductName" alla proprieta' DataField.

Newsgroup: it.comp.lang.visual-basic
Titolo: (OT) Prova, non leggere

Prova

 Prova
Le prove si fanno in news:it.test per favore.
Bye, G.

Chiedo venia non lo sapevo...
"Paperino" <non...@lo.dico> ha scritto nel messaggio
news:aenjmk$1nge$1...@stargate1.inet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione UTF

ciao a tutti
qualcuno a per caso fatto una funzione per convertire una stringa in
formato UTF8?
me la posta?
grazie mille
Daniele

 formato UTF8?
Ho scritto UTF8 su google e sono usciti centianaia di info!
Provaci anche tu!
MIk
Newsgroup: it.comp.lang.visual-basic
Titolo: far partire l'ide con controlli aggiuntivi già inseriti

Salve a tutti... è da tempo che mi pongo questa domanda...
esiste un modo per indicare all'IDE che ogni progetto che voglio iniziare
deve avere già alcuni riferimenti e alcuni controlli inseriti?
Tipo i riferimenti Dao 3.6 e i common dialog e windows standard controls
(non mi ricordo se si chiamano così, cmq sono le progress bar, le status bar
ecc...)
Mi scoccia ogni volta doverli reinserire anche perchè non sono solo questi
:-)

 inseriti?
Credo che si possa agendo su qualche *.INI che ora non rammento.
In ogni caso io consiglierei di creare un progetto "base" da usare come
ambiente di partenza...

 ha scritto nel messaggio
news:h3orb.2117$ZH3....@tornado.fastwebnet.it...

basta che crei il tuo prototipo e lo salvi in questa cartella:
C:\Programmi\Microsoft Visual Studio\VB98\Template\Projects
il progetto verra' aggiunto a quelli mostrati nella finestra "Nuovo
progetto"
HTH
bye
r

Newsgroup: it.comp.lang.visual-basic
Titolo: Come ottenimento ID record appena aggiunto

Sto inserendo dei record nella tabella articoli col seguente codice:
Dim MyRS As ADOMyCONN.Recordset, MyCONN As Connection
' apre la connessione
Set MyCONN = New Connection
MyCONN.CursorLocation = adUseClient
MyCONN.Open "PROVIDER=Microsoft.Jet.OLEMyCONN.4.0;Data
Source=nome_file_db.mMyCONN;"
' apre il recordset
Set MyRS = New Recordset
MyRS.Open "select * from ARTICOLI where ID_ARTICOLO=0 ", MyCONN,
adOpenStatic, adLockOptimistic
' aggiunge record
MyRS.AddNew
MyRS("codice") = valore 1
MyRS("descrizione") = valore 2
MyRS("prezzo") = valore 3
id_articolo_letto = MyRS("ID_ARTICOLO")
MyRS.Update
MyRS.Close
MyCONN.close
La tabella ARTICOLI oltre ai campi CODICE, DESCRIZIONE e PREZZO, ha un campo
autoincrementante di nome ID_ARTICOLO.
Tale campo e' anche definito come indice primario della tabella.
La mia domanda e', come leggere il valore di ID_ARTICOLO supponendo di
essere in un ambiente multiutente?
La terz'ultima riga che ho riportato dovrebbe poter leggere tale campo,
pero' restituisce sempre NULL
Porqua?
Grazie e ciao
RobertoA

 Porqua?
perchè hai un cursore lato client
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Grazie mille, sono in debito.
Ciao
RobertoA

Newsgroup: it.comp.lang.visual-basic
Titolo: posizione del puntatore del mouse!

Qualcuno ha quache idea di come posso realizzare un programmino che mi dia
le coordinate del puntatore del mouse sullo schermo?!?!?
Grazie in anticipo!
netse...@yahoo.com

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Controlli Standard

Ho la versione in Italiano di Visual basic. Sto creando un programma
utilizzando le finestre di dialogo standard. I messaggi di queste finestre
ovviamente sono in italiano. Come faccio a cambiare queste scritte in
Inglese ? Avendo la licenza in Italiano posso utilizzare i controlli in
Inglese ? Se si dove li trovo ?
Grazie
c...@eubico.it


I messaggi di dialogo standard sono tutti nella stessa lingua del WIN95
installato.
Quindi se fai girare il tuo programma su un computer svedese avrai i
messaggi svedesi...
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: textbox

Salve a tutti, ho notato che quando assegno parecchio testo a una texbox e
vengono visualizzate le scroolbar, ogni volta la barra di scorrimento non
rimane in fondo al texbox ma rimane a metà o quasi in fondo. In particolare
questo capita quando assegno del nuovo testo: text1.text = text1.text & ....
Si può fare in modo che la barra di scorrimento rimanga sempre ferma in
basso ?
Grazie
Arrivederci



Aggiungi dopo l'inserimento:
Text1.SelStart = Len(Text1.Text)
Ciao

 Ciao
Ciao, grazie però c'è un problema, io uso una specie di ritch text box e non
c'è la proprietà SelStart, come risolvo ? Per essere precisi è il
richetextbox di 
allapi.net
 presente installando Apiguide.
Grazie ancora
ciao