mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: confronto tra date....

ciao a tutti,
come faccio a sapere se una data in formato gg/mm/aaaa è compresa tra due
date dello stesso formato ?? Basta fare un controllo tipo <= ??? ...
e un'altra cosa come faccio a fare lo stesso controllo ma solo sull'anno
????
Es :
in un campo di un database memorizzo delle date del tipo gg/mm/aaaa  poi in
un form ho un textbox nel quale inserisco un anno (aaaa) e voglio
raccogliere tutti i record della tabella sopra con quell'anno che ho
inserito.
Il mio problema principale è separare nella stringa gg/mm/aaaa, gli anni da
tutto il resto. Mi aiutate ?!
grazie mille,
CLaudio.


Prego
Ciao, Vincenzo

 
Una data è INEQUIVOCABILMENTE identificabile, qualunque sia il suo formato.
Se questo concetto non ti è chiaro ti conviene cercare tra i vecchi post 
di questo gruppo.
Sarebbe come dire che 1.0 euro sono di più o di meno di 1.00 euro.
P.S.: non si fa crosspost
Ciao

 P.S.: non si fa crosspost
perche'?

 anni da tutto il resto. Mi aiutate ?!
Year(campo_data_della_tua_tabella) = CInt(TextBoxAnno.Text)
-- 
3st3b4n
www.seber.it
Questo post è stato scritto con bit riciclati.

 perche'?
Prima di tutto perchè se chi ti risponde non ha sottoscritto uno o più NG
nella tua lista ha problemi nell'invio, a te magari non arrivano risposte,
chi scrive si inca//a perchè si deve smazzare lui la tua pigrizia per
poterti rispondere, e la prossima volta ci penserà due volte.

 e un'altra cosa come faccio a fare lo stesso controllo ma solo sull'anno
Al di là delle risposte al problema che già ti han dato, ti consiglio 
vivamente di memorizzare le date nel db nel formato yyyymmdd, per evitare 
qualsiasi problema di formato sia in caso di modifica della locale, sia 
nell'esecuzione di query su campi data.
Ciao,
Moreno
Inviato da 
www.mynewsgate.net

 vivamente di memorizzare le date nel db nel formato yyyymmdd
Nota che Moreno intende "in un campo TESTO"
Ciao

 Ciao

 fino ad ora non ho mai avuto problemi, ma vorrei capire
Il valore NON E' LA SUA RAPPRESENTAZIONE!!!
Ciao

Mentre mi apprestavo a riciclare alcuni bit, *Zanna* ha scritto:

Non può essere un Long?


 Non può essere un Long?
Sì, anche.
Quello che intendevo è "non un campo data/ora".
Ciao

 Non può essere un Long?
sì, esatto: grazie della precisazione, era dovuta.

Newsgroup: it.comp.lang.visual-basic
Titolo: Stringa Sql Aiuto

Voi come risolvereste questo problema stringa:
"Select * From Archivio where nominativo Like '" + Text1.Text + "' + '%'
order by Nominativo asc"
se qualcuno di digita d'allessio va in error

 ha scritto nel messaggio
news:WkMf8.26395$_u5.7...@news1.tin.it...

fai una sostituzione all'interno di Text1.Text di ogni occorrenza del
carattere apice (') con apice raddoppiato ('')
Ciao
Claudio

 ha scritto nel messaggio
news:WkMf8.26395$_u5.7...@news1.tin.it...

Ciao
fai semplicemente cosi:
"Select * From Archivio where nominativo Like '" + Replace(Text1.Text , "'",
"''")Text1.Text + "' + '%' > order by Nominativo asc"
Ciao
Alex

 ha scritto nel messaggio
news:WkMf8.26395$_u5.7...@news1.tin.it...

"Select * From Archivio where nominativo Like '" & replace(Text1.Text,
"'","''") & "%'"

 order by Nominativo asc"
E' buona cosa NON usare il + per concatenare stringhe, usa sempre &.
Newsgroup: it.comp.lang.visual-basic
Titolo: Passare un comando

Che codice devo scrivere se voglio che premendo un pulsante (command1)
avvio il codice scritto su un altro pulsante (command2)?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie
è brutto come la fame, ma dovrebbe funzionare...
command2_click
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 command2_click
Gia'... appena un pizzico meglio, anche se vale solo per i command button e
non per eventi click di altri controlli:
Command2.Value = True
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Command2.Value = True
Non capisco perchč vi faccia cosě schifo
-- 
Guarda, ma non toccare!
Tocca, ma non gustare!
Gusta, ma non inghiottire!
Per rispondere in privato elimina dall'indirizzo "togliquesto"
MasterDavidex - David Ruscelli

 Non capisco perchč vi faccia cosě schifo
Premesso che nel mio codice e' facile trovarlo ancora, il fatto e' che non
e' particolarmente elegante "forzare un click" per richiamare una parte di
codice... stabilito che hai bisogno di una determinata routine comune, da
richiamare in piu' punti del programma, e' piu' corretto creare una Sub a
parte e fare la chiamata sia dall'evento originario sia dagli altri.
Risulta anche piu' manutenibile, dal momento che se decidi di cambiare il
controllo principale, quello che che contiene tutto il codice, devi anche
stare attento alle chiamate indirette.


Newsgroup: it.comp.lang.visual-basic
Titolo: Array di controlli

ciao a tutti
vorrei implementare in una classe il controllo winsock in un array in modo
da accettare connessioni da più client ma non ci riesco. la mia idea era
qualche cosa del tipo
dim withevents Sock(10) as winsock
ma non me lo accetta. sono riuscito a gestire un controllo correttamente con
il relativo evento ma non riesco a creare l'array
cosa mi dite??
grazie a tutti ciao

 ha scritto nel messaggio
news:tNgRb.280661$vO5.11...@twister1.libero.it...

Purtroppo VB6 non accetta la dichiarazione di oggetti indicizzati con il
withevents ...
il mio consiglio è quello di fare una seconda classe "Sockets" che istanzi
più oggetti Sock e che crei una sorta di indice (sicuramente con una
collection). L'oggeto Sockets emetterà eventi con il relativo indice alla
collection di Sock.
Fammi sapere
Saluti
Newsgroup: it.comp.lang.visual-basic
Titolo: Inputbox

Si puo crare un input box formato da checkbox ??

 Si puo crare un input box formato da checkbox ??
Ti crei una funzione MiaInputBox dove apri una form modale con dentro
quello che vuoi e le fai fare quello che vuoi
Se chiami la funzione "InputBox" sostituisce quella di VB a meno che
non usi vba.InputBox.

Utilizzo Vb6 Quindi credo che va benissimo grazie mille

Ahh ma cosa intendi per Form modale??

 Ahh ma cosa intendi per Form modale??
le basi, ragazzi miei, le basi...
detto anche form a scelta obbligatoria, la caratteristica fondamentale del
form aperto in modalità modale (mi si perdoni il bisticcio di parole) è
quella di sospendere l'esecuzione del codice della routuine chiamante fino
a quando il form stesso non viene chiuso o nascosto.
tale comportamento viene ottenuto al momento dell'apertura del form
stesso, tramite la valurizzazione del primo parametro del metodo show al
valore predefinito vbmodal
vuoi un esempio più esplicativo?
supponiamo che il tuo form si chiami MioMsgBox, in questo caso dovresti
scrivere:
MioMsgBox.Show vbModal
e adesso non chiedere che cosa è la routine chiamante, che tanto il
prossimo problema sarà quello di sapere come fare a capire quali check box
sono stati spuntati dall'utilizzatore
-- 
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

 Utilizzo Vb6 Quindi credo che va benissimo grazie mille
con vba.inputbox non intendo che devi usare vba...
significa che la libreria VBA contiene la funzione inputbox, e che se
tu usi lo stesso nome di funzione nel tup progetto non richiamerai più
la funzione di VBA da nessuna parte nel progetto tranne che
esplicitando che vuoi la funzione della libreria VBA.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Le toolbar che si allungano...

SAlve ho un programma che usa 4 toolbar draggabili e dockabili.. beh quando
le rendo verticali (opzione wrap attiva) le toolbar si allungano (ie in
verticale sono più lunghe che in orrizontale).
se non setto wrap su true i bottoni non si dispongono in verticale... che
fare??
grazie a tuuti i dott. UI in gentile ascolto!!
=)



>SAlve ho un programma che usa 4 toolbar draggabili e dockabili..
Draggabili & dockabili? Come ci sei riuscito? Hai preso un OCX o te li sei
fatti a mano?
Scusa se non rispondo alla tua domanda, ma appena letta la prima riga sono
andato in shock...
E.G. er Cicca
Newsgroup: it.comp.lang.visual-basic
Titolo: Compatibilità VB e Win 2000-Win 98

Ciao,
Io quando era appena uscito Win 2000 in versione trial lo avevo messo come
s.o. sul mio pc e avevo provato a programmare in Visual Basic....i programmi
che avevo creato avevano il grave problema di crashare completamente Win 98
(una volta compilati col 98 andavano benissimo) E' ancora cosģ? Se compilo
con VB in Win 2000 non devo assolutamente distribuire il programma a chi ha
il 98?
Saluti
Paolo



Non c'č una risposta definitiva, dipende molto dalle tecnologie e soprattutto dalle API che utilizza
il tuo programma. Molte funzioni dell'API, infatti, o possono aver una sintassi diversa a seconda
del SO, oppure possono esistere solo in un SO. Dovresti consultare MSDN per vedere se tutte le
funzioni utilizzate dal tuo programma sono compatibili con entrambi i SO e, in caso negativo, che
soluzione alternativa adottare...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Come ottenere il giorno della settimana...

Ciao utilizzo VB 6.0
Ho la necessita' di ottebere un valore intero che rappresenta il giorno
della settimana partendo da una generica data.
Ad esempio:
oggi che e' Martedi' 16 / 01 / 2001 la funzione dovrebbe ritornarmi il
valore 2 (supponendo che lunedi' sia il primo giorno).
Potete aiutarmi???
Ciao e grazie.

 wrote in message
lk396.2371$FL1....@twister2.tin.it...


MsgBox Format$(Now, "dddd")
Paolo P. ha scritto nel messaggio ...


 giorno)
Il primo Giorno della Settimana è pero' impostabile come parametro Optional.
Ciao, Peja
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Debug - Perchè non si chiude?

In fase di Debug se esco dal programma non si chiude completamente il debug
(Resta attivi il quadrato). Come faccio a sapere che cose c'è di aperto o
attivo?
--
Grazie
Gabriele F.
gfio...@NOSPAMbresciaonline.it.it
Eliminare NOSPAM per scrivermi

Che mi risulti puoi solo seguire il flusso del programma e vedere quale
oggetto che hai caricato e che non hai scaricato.
Puoi tentare mettendo sulla funzione di uscita dei set  xxxx = nothing,
quando imposti l'oggetto che non si scarica vedrai che uscendo dal programma
il debugger esce dallo stato di debug e entra in quello di progettazione (si
chiude insomma).
Salve
                Dbg
Gabriele F. ha scritto nel messaggio ...


Spero di non dire Cavolate:
Vb non si chiude solo se mantieni dei riferimenti alle form che non
sono state settate a nothing, mentre per altri oggetti (creati con
New, createObject), se non sono stati rilasciati li termina brutalmente
(una cosa tipo l'istruzione end).
prova a fare sul unload della form principale.
dim f as form
    for each f in forms
        msgbox "Form non scaricata : " & 
f.name
        set f =nothing
    next each
Una volta visto il nome della form č, o lasci il codice cosě e commenti il
messaggio, oppure cerchi di scoprire perchč ti mantiene il riferimento alla
form.
Su chiusura di ogni form metti un bel set Nome_Tua_Form = nothing
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


[...]

 ha scritto nel messaggio
news:T0Nk6.344$Op3....@news4.aus1.giganews.com...


Dopo tutti questi pareri aggiungo anche il mio.
Si deve fare attenzione ai processi iniziati dai componenti OCX utilizzati.
Si deve attendere che i processi iniziati siano conclusi, altrimenti lo fa VB
per noi (di attendere).
Un esempio di situazione di questo tipo è facilmente riproducibile utilizzando
RAS: finché le funzioni di connessione o disconnessione non hanno concluso il
loro 'ciclo' (compresa la composizione del numero nel modem), il controllo
'totale' non si ottiene.
E se a runtime interrompiamo un programma, le finestre di controllo di VB non
saranno utilizzabili: sia quella del debug che quella principale con il menu ed
i comandi non risulteranno attive.
Apparentemente il programma non si 'fa' fermare, ma è perché VB stesso è in
attesa della conclusione di un processo.
---
GbC
http://www.chiappori.net
---
Newsgroup: it.comp.lang.visual-basic
Titolo: Classi nelle Matrici

Domanda da neofita: è possibile inserire una classe in una matrice?
Ad esempio:
Ho il modulo di classe pippo
  dim gigi as pippo
  Set gigi = new pippo
  Dim array(10,10) as Variant
  array(5,5)= gigi
ottengo errore, come mai?
Ciao e Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ottengo errore, come mai?
A naso stai usando VB6 quindi manca un "SET".
Attento che nell'array viene salvato solo un riferimento a "gigi" (se non 
ricordo male) e non una sua copia.
Ciao
-- 
I.d.N.
.oO Please cut "SOME TREES" for reply Oo. 

 ottengo errore, come mai?
Vogliamo vedere l'errore!!!
Comunque, puoi fare anche cosě:
Dim array(10,10) As pippo
Che sarebbe meglio.
Ciao 

 Ciao
Ottengol'erroere di Run.time 438: proprietà o metodo non supportati
dall'oggetto.
Cmq ho provato come dici te ma ottengo un altro errore.


 Ciao
Stò difatti utilizzando il VBA di Access 2000, puoi spiegarti meglio? Dove
andrebbe fatto questo set?


 Cmq ho provato come dici te ma ottengo un altro errore.
Sì?
E quale?
Codice?
Uff... ma devo chiederlo ogni volta???
Ciao 

 Ciao
Ecco il codice:
Public Sub prova()
  Dim arra(10, 10) As Variant
 
  Dim v As Viaggio
 
  Set v = New Viaggio
 
 arra(5, 5) = v
 
End Sub


 End Sub
Vabbeh, continuiamo pure a postare solo quello che ci pare... ;)
Comunque, come diceva Iuza, basta usare il SET per l'assegnazione di 
oggetti:
SET arra(5, 5) = v
E se vuoi che l'intellisense funzioni dichiara l'array As Viaggio.
Ciao 

 andrebbe fatto questo set?
A cinecittà o a hollywood.
Guardare sulla guida no, eh?
(La guida di VB, non quella turistica di hollywood)
Ciao

 Ciao
Dubito che abbia colto la "sottigliezza" del riferimento all'oggetto....
Riuscira' mai a venirne a capo?


 Riuscira' mai a venirne a capo?
Beh, dai, almeno il copia-incolla...
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Icone per voci menu..

Ho provato a "incollare" delle icone a un menu ma non ci sono riuscito.
Qualche suggerimento?
Includo il codice del form_Load che mi č stat detto che doveva funzionare.
Grazie per i suggerimenti
**********************************
Dim iRis As Long
Dim iBitmap As Long
Dim hmnMenuPrinc As Long
Dim hmnPopup As Long
    hmnMenuPrinc = GetMenu(Me.hWnd)
    hmnPopup = GetSubMenu(hmnMenuPrinc, 0)
    iBitmap = img.ListImages(1).Picture
    iRis = SetMenuItemBitmaps(hmnPopup, 3, MF_BYPOSITION, iBitmap, iBitmap)
****************************************************************************
**************************
Andrea DALIA

 Includo il codice del form_Load che mi è stat detto che doveva funzionare.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Statistiche it.comp.lang.visual-basic

Ciao ragazzi,
perdonate l' OT. So che c'è già una persona che si occupa delle statistiche
del ng, ma volevo comunque segnalarvi questo link:
http://newsstat.musicoff.com/it.comp.lang.visual-basic/200206.html
Sono le statistiche del mese di Giugno.
Regards,
e scusate ancora.
Antonio
--
"I grandi spiriti hanno sempre incontrato violenta
opposizione da parte delle menti mediocri."
A.Einstein

 Sono le statistiche del mese di Giugno.
'azz, è ora che mi metta a pulire un po' la casa, magari buttando anche il
cavetto modem/telefono...
Newsgroup: it.comp.lang.visual-basic
Titolo: programmino per invio automatico email

Salve vorrei creare un programmino che mi permetta l'invio in automatico 
ogni  tot tempo di una e-mail  contenente l'indirizzo IP della connessione 
internet, per poter accedere al computer con VNC anche se questo indirizzo 
cambia.
Sapete se č possibile, mi date qualche dritta.
Grazie.

"TheCBc"

- per l'ip, puoi usare un controllo winsock, proprieta' .localIP.
nb: qui mi da' l'ip della rete interna, non quello della dsl, quindi 
probabilmente devi cercare un po' per proprieta' ecc.
- per l'invio,
http://www.freevbcode.com/ShowCode.Asp?ID=7790
ma controlla che l'antivirus non ti blocchi la porta 25.
ciao, a.

 Grazie.
Senza scriverti un programma tuo, potresti utilizzare uno devi vari 
servizi di DNS dinamico presenti in rete.
Io personalmente uso 
http://www.dyndns.com/
 che ha il client integrato 
in molti routers.
Ma ce ne sono molti altri, anche italiani.
Ciao.
Daniele.

 Sapete se č possibile, mi date qualche dritta.


 > Sapete se è possibile, mi date qualche dritta.


 ha scritto nel messaggio
news:nlvvh.10733$422.1...@twister2.libero.it...


 ho sbagliato
A quotare?
Puoi starne certo che hai sbagliato.
Ciao

 ha scritto nel messaggio
news:45c0ec49$0$1750$4faf...@reader4.news.tin.it...



SendEmail
Download Link :
http://www.rogepost.com/n/9438391914
--
Fosco

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore Activex

Salve a tutti, chi mi sa dire come mai un'istruzione del tipo:
Set wrkODBC = CreateWorkspace("Name", "User", "", dbUseODBC)
Genera un errore del tipo "IL componente Activex non può creare l'oggetto"
Grazie Michele


Hai controllato che sia stato inserito sotto preferences la voce:
Microsoft DAO 3.5 Object library?
Ciao,
Michele.
______________________________________________________
Get Your Private, Free Email at 
http://www.hotmail.com
--
Posted from [194.184.164.235] by way of 
law-f40.hotmail.com
 [209.185.131.103]
via Mailgate.ORG Server - 
http://www.mailgate.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Execute

C'č un modo per far fiunzionare una riga di codice tipo:
db.execute query_salvata_nel_database_access97 ???
Greg

 Greg
basta che fai select <tuoi_campi> from <query_nel_db>
con una connessione valida verso quel db.
--
Saluti
Andrea Moro

 con una connessione valida verso quel db.
========
Si, questo lo so, ma volevo farlo con vb5 e dao, ma senza select.
Greg

 Greg
le query nel db vengono viste come tabelle a sua volta e quindi devi fare
almeno
select * from query_nel_db

 Greg
una cosa come
set Nomerecordset = NomeDatabase.OpenRecordset("nomedellaquerysalvata",
ApriloUnPoComeTiPare) ?
--
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi di spazio.

Prima di tutto salve a tutti.
Volevo porre questo problema:
Ho finito la mia applicazione e ora la sto distibuendo agli utenti tramite
INTERNET ma mi arrivano lamntele perche' il programma si presenta con circa
5Mb.
Sapete meglio di me che 5 mb per scaricarli ci vuole un po di tempo.
Avete qualche soluzione per far dimagrire il file .CAB?
il file .EXE e' di circa 1,3 Mb.
Attendo con ansia vostre risposte.


Prova a creare il file di installazione con l'InstallShield, al posto
del SetupWizard di VB. Screma meglio i files non usati dal tuo progetto
(io sono passato da 9 Mbyte a circa 6MByte)
Inoltre (ma e' una modifica a livello di programma) prova a ridurre il
numero di componenti utilizzati (= minor numero di OCX/DLL che il CAB
deve portarsi dietro)
Bye by Massimo 8-]

 wrote in message
news:3A67F629...@txt.it...


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

Salve a tutti,
ho un grandissimo problema, come apro Excel e cerco di avviare una macro
oppure di registrarla
 o più semplicemente di fare una qualsiasi operazione mi appare il seguente
messaggio:
EXCEL ha provocato un errore di pagina non valida nel
modulo VBA332.DLL in 016f:6510ec86.
Registri:
EAX=00000001 CS=016f EIP=6510ec86 EFLGS=00010202
EBX=0043d500 SS=0177 ESP=0062e578 EBP=0062e57c
ECX=00000035 DS=0177 ESI=00000026 FS=0fd7
EDX=00000000 ES=0177 EDI=00400036 GS=0000
Byte all'indirizzo CS:EIP:
66 8b 32 57 66 8b ce bf 01 00 00 00 80 e1 03 8b
Immagine dello stack:
00000026 00620035 6510ec78 00000000 00000001 00000015
0062e834 00407d70 00000000 6517f3f0 6510e94f 00000001
00000015 00000000 01121804 00000000
l'ho disinstallato e reinstallato già 2 volte ma non è cambiato nulla.
Come posso fare??
grazie a tutti.

 Come posso fare??
1. Formattare HD e reinstallare;
2. Se il problema si dovesse ripresentare puoi postare nuovamente fornendo
informazioni riguardo sistema operativo, versione di excel, hardware... Non
che serva a molto sapere queste informazioni, pero'. Cosi', giusto per
conoscerci meglio.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: CDONTS

Ho provato le poche righe di codice che allego ed ho ottenuto l'errore
"Error 429 - ActiveX cannot create object ", bug riconosciuto dalla
Microsoft.
Private Sub Form_Load()
     Dim mycdonts As CDONTS.NewMail
     Set objCDOnts = CreateObject("CDONTS.newmail")
     objCDOnts.Send "Sen...@Company.com", "Re...@Company.com", "Message
Subject", "Message Body"
     Set objCDOnts = Nothing
End Sub 
Qualcuno sa come utilizzare le CDONTS in VB senza avere errori?
Grazie
Alessandra Grassi
-- 
Posted from [213.26.185.226] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:91A6AA381A41D41185E20006295706321F040D@SAS5000_1...


Newsgroup: it.comp.lang.visual-basic
Titolo: pacchetto di installazione

Ciao
ho sviluppato un programma in visual basic 6 che utilizza crystal
report 4.6. Non sono più riuscita a creare il pacchetto di
installazione direttamente con visual basic (ho provato anche a
modificare il file crystal32.dep, ma non ha funzioanto cmq) e ho
utilizzato i seguenti programmi (premetto che ho necessità che il
programma si installi correttamente su qualsiasi pc indipendentemente
dalle impostazioni):
CyberInstallerstudio che però mi ha dato diversi problemi
Visual studio installer 1.1 che ho scaricato dal sito del microsoft.
L'installazione in questo caso è quasi perfetta (a parte la
registrazione dell'ocx di crystal report) solo che il visual studio mi
funziona solo il primo giorno che lo installo sul pc poi mi da un
errore con il file devenv.exe e ntdll.dll e non riesco più a creare
nessun pacchetto di installazione.
Mi potreste suggerire come creare in modo corretto il pacchetto di
installazione o cosa devo fare con visual studio installer 1.1  che cmq
con l'unico pacchetto che sono riuscita a creare non mi ha dato errori
a parte per la registrazione dell'ocx di CR?
grazie
ciao

 a parte per la registrazione dell'ocx di CR?
Io non uso CR ma con InnoSetup e l'interfaccia grafica ISTool mi sono
trovato bene.
Importa anche i pacchetti già salvati col tool di vb.
-- 
DBMS Firebird
VB6 + Ado
Newsgroup: it.comp.lang.visual-basic
Titolo: Differenza di RecordSet

Quale e' la differenza fra questi 3 esempi ?
a=rs("NomeCampo")
a=rs.Fields("NomeCampo")
a=rs!NomeCampo
C'e' differenza ?

Io penso di no.
Cmq io utilizzo l'ultima!
Ciao
Oz

 3) a=rs!NomeCampo
Beh, diciamo che la seconda riga riporta in maniera esplicita tutta la
gerarchia di oggetti ADO... ad essere precisi viene sottointesa la proprietà
Value:
' Sintassi completa
a=rs.Fields("NomeCampo").Value
La Collection Fields è la proprietà di default dell'oggetto Recordset quindi
può anche essere sottointesa (vedi 1). La terza riga è alquanto "strana" nel
senso che non aderisce al classico standard COM di VB che prevede il punto
"." come separatore tra i vari oggetti, metodi e proprietà, però è quella
più efficiente di tutte!!!
Quindi il mio consiglio è quello di utilizzare la terza sintassi.
HTH,
--
Lorenzo Benaglia
24 Ore Personal Finance S.p.A.
Milano
Italy

 gerarchia di oggetti ADO...
ehmmmm... ci tenevo a dire che la stessa sintassi è valida anche per il buon
vecchio DAO
Ciao
Faber

Quindi il mio consiglio è quello di utilizzare la terza sintassi.
Credo sia stata mantanuta per la compatibilità con Access.
Visto che la tua spiegazione è completa, volevo solo puntualizzare che, per quanto riguarda il terzo
metodo (che poi sarebbe il secondo visto che il primo è un "condensato" del secondo, ma on
incasiniamoci la vita... ^__^), nel caso in cui il nome del campo contenga degli spazi, bisogna
racchiuderlo tra parentesi quadre:
a=rs![Nome Campo]
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
---------------------------------------------------------------------------

 a=rs.Fields("NomeCampo").Value
Sintassi ancora piu` completa:
    a = rs.Fields.Item("NomeCampo").Value
;-)
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Ed ecco la sintassi piu` veloce, non documentata ma garantita da Francesco
Balena:
a = rs.Collect("NomeCampo")
Lunga vita e prosperita`
Joshua
"Maurizio Borrelli" <Please...@To.Newsgroup> ha scritto nel messaggio
news:8pjom8$c33$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Internet Explorer FullScreen

Dopo aver creato la mia ActiveX.exe, vorrei, all'interno della stessa
controllare le funzioni di Internet Explorer.
Per fare questo, ho selezionato come riferimento Microsoft Internet control,
ed ho scritto le seguenti righe:
Dim ie As New shdocvw.InternetExplorer
....
ie.fullscreen  = true
...
ma non riesco ad ottenere l'effetto desiderato, ossia la funzione a pieno
schermo di I.Explorer (tasto F11)
Ho come l'impressione che questa dll sia riferita all'oggetto Ms Internet
control e non al programma.
Come posso fare?
Grazie, Luca.


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per la tray di un programma

Sono un novellino di VB, uso VB 6.0, sono riuscito a fare un prg che mi
permette di metere un form nella tray, vicino all'orologio, ma tutto questo
agendo su un bottone da me creato.
Il mio problema è questo:
1) è possibile assegnare la minimizzazione del form invece che a un bottone
sul form al bottone che mette in background il form (la linietta in cima
vicino alla "X" di chiusura)????
Sarei grato a ciunque mi trova la soluzione.
Ciao
----------------------------------------------------------------------------
----------
Nick: Pipistro
E-mail: 
salva...@tin.it
UIN ICQ: 7283050
----------------------------------------------------------------------------
----------

Ciao
Basta che metti il tuo codice dell'evento Form_Resize() e controlli il
valore di ME.WindowState
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb


Nell'evento Resize della Form, se Form.WindowState = vbMinimized allora e'
stata minimizzata.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Istruzioni di VB6

Scusate la mia domanda, sicuramente per voi stupida...
ma vorrei sapere dove posso reperire, in formato elettronico, una lista  
delle istruzioni esistenti in VB6
Ho il MSND Library, ma è molto scomodo!! Non puoi farti un segnalibro per  
riaprire la pagina velocemente ..
Qualcuno sa darmi qualche info a tal proposito?
Grazie a tutti.
-- 
Creato con il rivoluzionario client e-mail di Opera:  
http://www.opera.com/m2/

 Qualcuno sa darmi qualche info a tal proposito?
Sě.
1) l'untima tab di MSDN č "preferiti".
2) l'elenco per VB ce l'hai nel primo tab "indice" filtrando per
VisualBasic.
Se cerchi un indice analitico completo non lo troverai, anche perchč č un
approccio all'utilizzo di MSDN stupido.
Ciao
--
Reporting tool: 
http://www.neodatatype.net
Qualunque mentecatto puň scrivere codice che un computer possa capire.
I buoni programmatori scrivono codice che gli uomini possano capire.
[Martin Fowler]

 delle istruzioni esistenti in VB6
Ma a che serve un indice analitico delle istruzioni di VB6?
Anche quando ce l'hai, che cosa te ne fai?
Tanto, guarda, la maggior parte delle cose "utili" le fai
attraverso le API non con le istruzioni VB6, oppure con degli
oggetti COM.
Vuoi sapere come si dichiara una variabile?
Dim I As Integer
come si fà un ciclo?
for I = 0 to 6
Next I
Il problema è che se anche te lo diciamo, poi TU ci devi
mettere del tuo!
Ciao,
Andrea

 Scusate la mia domanda, sicuramente per voi stupida...
Hai visto questo?
http://digilander.libero.it/hcezar/TITITA_TITUTU_TIIIPATITITUUU.html

 VisualBasic.
Grazie Zanna per la riposta...
Non avevo fatto caso al Tab Preferiti :(
Newsgroup: it.comp.lang.visual-basic
Titolo: [?2]Problema con la creazione guidata pacchetti di installazione.

Negli ultimi giorni, presumo da quando ho installato SP3 per windows 2000 
sulla macchina che utilizzo abitualmente per sviluppare mi è sorto un 
problema piuttosto fastidioso:
Quando genero dei pacchetti di installazione con l' utility di visual 
studio essi risultano inutilizzabili nel senso che quando parte la copia 
dei file su windows 98/95/XP home mi segnala il seguente errore:
SETUP1 ha provocato un errore di pagina non valida nel
modulo KERNEL32.DLL in 015f:bff87eb5. 
E poi mi si chiude...
Se invece il kit gira su windows 2000/NT/XP professional quando dovrebbe 
partire la copia semplicemente si chiude tutto senza segnalare niente!!!
Il PC di sviluppo ha windows 2000 professional SP3 e visual studio 
enterprise SP5 ed è aggiornato con tutti i windows e office update 
disponibili.
Gli stessi pacchetti di installazione se li genero da altri PC con visual 
studio funzionano perfettamente...
Qualcuno ha qualche idea per risolvere il problema, non mi va 
assolutamente di spianare la macchina di sviluppo perchè mi ci vorrebbe 
veramente troppo tempo... e perderi sicuramente qualcosa.
Ciao a tutti e grazie dell' interessamento, Daniele.

 E poi mi si chiude...
Hai provato a reinstallare il wizard di generazione dei pacchetti di
installazione?
Se invece hai proprio modificato il codice che genera il setup per
personalizzarlo con immagini o scritte personalizzate, mi risulta che ci
sia un bugfix sul sito microsoft.
hth
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

Purtroppo non ho modificato niente ed ho già provato a reinstallarlo...
Niente...

Newsgroup: it.comp.lang.visual-basic
Titolo: Memorizzare caption di una label in progettazione

Ciao a tutti,
ho un centinaio di label a cui assegno il nome a runtime.
Mi piacerebbe però vedere quel nome anche in fase di progettazione.
E' possibile quando assegno un lbl.caption, memorizzarlo anche per la
progettazione?
Tipo.
lbl.caption="pippo"
Vorrei che quando torno in progettazione quella caption sia "pippo".
Questo non lo devo fare ogni volta, mi basta memorizzarlo la prima volta.
Oppure devo riscrivere tutto a mano?
Il nome mi servirebbe perchè almeno in fase di progettazione so già a cosa
corrisponde quel campo, e per ora l'ho messo a runtime perchè ho fatto tutto
con un file di testo e qualche copia/incolla con excel.

 ha scritto nel messaggio 
news:E5Qte.13931$yM4.1...@twister2.libero.it...

l'unica cosa che miviene in mente è di editare direttamente il file .dfm del 
form sul quale sono le label.
ciao! 


ciao

 ha scritto nel messaggio 
news:0pofb1dcb3gfe25hh...@4ax.com...

si scusa , sto lavorando con diversi tools e a volte faccio confusione :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: File cobol

Dovrei leggere dei file cobol (Dat) utilizzando visual basic.
Come posso fare?
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Come posso fare?
Penso tu debba aprirli come semplici files di testo .. ma devi conoscere il
formato dei singoli campi ( che so ... da carattere 1 a 25 = primo campo ,
da 25 a 35 = secondo campo etc etc)
Ciao
                       Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: Video in una Form

Ciao a tutti,
sono Kaa.
E' la prima volta che vi scrivo. Ho lurkato un po' il newsgroup, mi sembrate
decisamente competenti e quindi ho deciso di chiedervi aiuto.
Premetto che le applicazioni che sviluppo sono per uso, diciamo,
"interno"... cioč utility o sw per risolvere questo o quel problemino che mi
nasce in ufficio.
Spero che questo non sia motivo per snobbarmi... :-))
Scherzi a parte: avevo bisogno di inserire in una FORM un riquadro nel quale
visualizzare un video.avi.
Ho inserito un controllo "Windows Media Player" e definito il nome del file
da lanciare nella proprietą FILENAME.
Il mio problema č: quale proprietą dell'oggetto attiva il PLAY del movie in
seguito ad un evento?
L'unica cosa che riesco a fare č far partire il video con l'autostart al
FORM_LOAD.
Qualcuno mi aiuta?
Dimenticavo: non se se č importante, ma lo dico, utilizzo VB 6.0.
Grazie in anticipo e buon lavoro.
Ciao.
--
Kaa
www.filmakers.tv
_______________________________
Togliere nospam dall'email per scrivermi

 Qualcuno mi aiuta?
Se usi l'ocx di MediaPlayer 6.4 devi usare questo codice:
MediaPlayer1.Open "miovideo.avi"
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 Ciao.
ciaociao

 ha scritto nel messaggio
news:dmwic.22185$eR5....@tornado.fastwebnet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Finestra intro

Non sò come fare per mettere una finestra di introduzione (del tipo
microsoft) mentre si carica un mio programma. Sapete aiutarmi ?
Grazie

Inserisci in un modulo, quello di avvio, il seguente codice prelevato
dall'autocomposizione di VB5.
Option Explicit
Public fMainForm As frmMain
Sub Main()
    frmSplash.Show
    frmSplash.Refresh
    Set fMainForm = New frmMain
    Load fMainForm
    Unload frmSplash
    fMainForm.Show
End Sub
___________________________
Dove frmSplash è la tua Form di  intro e frmMain è la form pricipale del
programma.
CIAO !!!
Newsgroup: it.comp.lang.visual-basic
Titolo: input controllato al 100%

Salve a tutti.
Vorrei chiedervi se esistono degli OCX o delle routine per v.b. 5 in grado
di permettere un input controllato al 100%, che permettano di inserire in un
text solo dei numeri, o solo delle lettere, che non permettano di
abbandonare il text se non sono stati digitati determinati dati ecc......
Grazie.

 wrote in message
news:CKQ26.17573$ag5.1...@twister1.tin.it...

Riguardo ad ocx non saprei, io me ne sono fatto uno, cmq possono bastare gli
eventi KeyDown, KeyPress, KeyUp e magari anche LostFocus
In piu' con vb6 e' stato introdotto l' evento Validate.
All' interno degli eventi inserisci il codice che ti serve.
Ciao
Aldo

 wrote in message
CKQ26.17573$ag5.1...@twister1.tin.it...

Hai provato ad usare MaskEdBox al posto del TextBox ?
Ciao
Sir Jo

 wrote in message
CKQ26.17573$ag5.1...@twister1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Project in VB4 possolo leggerli con VB5?

i project in VB4 si possono leggere con il VB5? in caso negativo,
esiste un modo per trasformare il project VB4 in project VB5?
Ciao e Grazie!

...


Non ci sono problemi,VB5 legge i progetti VB4.32.Attenzione perň che se li
salvi con VB5,VB4 non potrai
piů rileggerli con VB4.Per i progetti VB4.16 non ci sono problemi se hai
usato solo OCX se hai usato qualche
VBX VB5(essendo a 32 bit) non ti permette di caricarli.
Ciao
Corrado


Ciao e Grazie!
La compatibilità verso l'alto é sempre garantita, casomai é il
contrario che è più difficile...

Newsgroup: it.comp.lang.visual-basic
Titolo: Parallela...

Come faccio a comunicare con la parallela? Mi serve inviare a questa a
seconda delle necesità uno 0 o un 3... vi è un modo semplice per farlo?


Puoi usare VBIO.DLL che ti permette di scrivere direttamente sul port
hardware della parallela senza far..."arrabbiare" Windows.
La trovi in giro....... se non la trovi scrivimi in privato e te la mando.
Fab, 
kayman-E...@infinito.it

Newsgroup: it.comp.lang.visual-basic
Titolo: E' possibile spostarsi di applicazione con VBA

Ciao a tutti,
quale funzione devo utilizzare ( e magari come si utilizza) per poter
passare da un'applicazione all'altra, cioè quello che di solito si fa
premendo contemporaneamente il tasto ALT+TAB.
Nel mio caso specifico devo passare dall'applicazione Microsoft Excel dove è
residente il codice VBA all'applicazione AutoCAD e tutto tramite codice.
Si può fare? se si come?
Ringrazio tutti in anticipo.
Ciao da Emiliano

 Ciao da Emiliano
Ciao
Andrea


Ti ringrazio per la risposta, ma per favore potresti essere un po' più
preciso?
Sono un principiante e pur avendo provato a leggere la guida MSDN non ci ho
capito molto.
Come si usano passo per passo i due comandi?
Mi rendo conto che forse chiedo un po' troppo ma ne ho assoluto bisogno.
Grazie ancora.
Ciao da Emiliano

 ci ho capito molto.
Devi leggerti sul manuale del VBA come si richiamano le funzioni nelle DLL.

Newsgroup: it.comp.lang.visual-basic
Titolo: Unions in VB.NET

Ho l'help incompleto ad una voce sul layout delle strutture.
Qualche anima pia mi posterebbe uno snippet con le giuste 
dichiarazioni di layout degli offset in una struttura (CLR 
compliant) che emuli una union del C# ?
Ad es. se voglio trasformare in union questa robettina
Structure BytesCouple
	High As Byte
	Low As Byte
End Structure
Union Nibbles
	BB As BytesCouple
	UI As UShort
End Union
vorrei scrivere (ma non so dove né di preciso cosa) delle 
meta-direttive di allineamento degli offset in modo che gli 
indirizzi di BB e UI coincidano.
Uffff
ciao e grazie
Soviet_Mario

 union del C# ?
sul serio nessuno si è mai trovato a dovere emulare una UNION in 
visual basic ? Poffarbacco, ciò mi perplime.
Cmq scusate se ritento, magari qualcuno che non sa come fare non 
aveva letto il post precedente.
ciao
Soviet:Mario

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Listiview

Ciao a tutti...
vediamo se se po fa...
ho una listview con circa 40 colonne, avrei bisogno di visualizzare una 
specifica colonna sennza scorrere con lo Horizzontal scroll bar.
Qualcosa tipo
Listview.columns(25).ensurevisible
ma non sembra cosi semplice.
avete qualche idea ?
Ciao e grazie 

 ha scritto nel messaggio 
news:46a64b96$0$36441$4faf...@reader5.news.tin.it...

Dim Riga As Integer = ListView.SelectedIndices(0)
Dim Telefono As String = ListListaContatti.Items(Riga).SubItems(3).Text 
'il numero 3 rappresenta la terza colonna.

 ha scritto nel messaggio 
news:sxDpi.74640$U01.6...@twister1.libero.it...

 correggo
 Dim Riga As Integer = ListView.SelectedIndices(0)
 Dim Telefono As String = ListView.Items(Riga).SubItems(3).Text

 ha scritto nel messaggio 
news:2zDpi.73513$%k.21...@twister2.libero.it...

Ciao Raffaele, e grazie per la tua risposta,
ma credo di non essermi ben spiegato.
a me non serve ottenere il valore di un determinato item di una determinata 
colonna.
A me serve "scrollare" la listview fino a visualizzare una data e nota 
colonna

 ha scritto nel messaggio 
news:46a79266$0$17945$4faf...@reader1.news.tin.it...

Spero di aver capito:
Prova cosi
For Ind5 = 0 To Me.ListView.Items.Count - 1
primo=Me.ListView.Items(Ind5).SubItems(0).Text
secondo=Me.ListView.Items(Ind5).SubItems(1).Text
Next

Newsgroup: it.comp.lang.visual-basic
Titolo: NetMeeting 3 OCX

Ragazzi, c'č qualcuno interessato ad un OCX che replichi in tutto e per
tutto il vecchio Xmsconf.ocx per NetMeeting 2.1 ma utilizzando NetMeeting
3??? Lo sto realizzando col Borland c++ Builder...(   cosě magari me lo
testate un pochino  :-\ )
Saluti
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
news:192Z92Z126Z164Y...@usenet.iol.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: data types & ecc

ciao a tutti , sono alle prime armi con VB 5 . ho un problema su un
programmino che sto costruendo.
non riesco a definire una label con determinate proprietą.
la label in questione conterrą degli importi che vorrei visualizzare con i
punti come separatori di migliaia. ho seguito gli esempi del manuale "step
by step", ma non mi funziona . Perche' ?
la funzione č questa
Dim prezzo&
prezzo& = Val(PBase) + Val(PProc) + Val(PHD) + Val(POpz) + Val(PMul) +
Val(PMem) + Val(PSoft)
TPrez.Caption = prezzo&
grazie
davide
dmanz...@raphael.it


Prova con:
TPrez.Caption = Format$(prezzo&, "#,###")
Ciao
Riccardo
Newsgroup: it.comp.lang.visual-basic
Titolo: MSOUTL32.OCX

Per quale recondito motivo non riesco a far funzionare il componente
MSOUTL32.OCX (Microsoft Outline Control)? Mi da l'errore "License
information for this component not found..."!!!
Ho anche re-installato (per altri motivi) interamente Windows 95 e dato che
prima avevo anche SP3 installato ho fatto anche la prova senza SP3, ma il
risultato non cambia; qualcuno puņ aiutarmi?

Questo messaggio proviene da: microsoft.public.vb.bugs
FILE: Vbc.exe Fixes VB 5.0 Control Installation Problem
Last reviewed: March 13, 1998
Article ID: Q181854
http://support.microsoft.com/support/kb/articles/q181/8/54.asp
The information in this article applies to:
Microsoft Visual Basic Control Creation, Learning, Professional, and
Enterprise Editions for Windows, version 5.0
SUMMARY
Vbc.exe installs the Vbcmpfix.exe utility, that fixes problems with the
following three symptoms:
Symptom I
When trying to site a control within your project, you receive the following
error message:
   License Information For This Component Not Found.  You Do Not Have An
   Appropriate License To Use This Functionality In The Design Environment.
Symptom II
When trying to compile your project, you receive the following error:
   Compile Error : Permission Denied
Symptom III
When trying to run your project, you receive the following error:
   Runtime Error '429' : ActiveX Component Can't Create Object
Newsgroup: it.comp.lang.visual-basic
Titolo: query con parametri con ADO

HO la necessità di eseguire delle query da dBase IV parametriche che fanno
riferimento ad un parametro di una forms di VB6.
Ho una DataGrid che vorrei popolare, usando ADO, in funzione del textbox di
una form.
Ho provato con database ACCESS e funziona con un codice del tipo:
    Private cnGriglia As ADODB.Connection
    Private rsGriglia As ADODB.Recordset
    Private cmd As ADODB.Command
    Private prm As ADODB.Parameter
    Set cnGriglia = New ADODB.Connection
    cnGriglia.CursorLocation = adUseClient
    Set rsGriglia = New ADODB.Recordset
    rsGriglia.CursorLocation = adUseClient
    cnGriglia.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data
Source=PROVA.mdb"
    cnGriglia.Open
    cmd.CommandText = "SELECT * From anagrafica Where ragionesociale>=
[inpMin] ORDER BY ragionesociale"
    cmd.CommandType = adCmdText
    Set prm = cmd.CreateParameter("inpMin", adVariant, adParamInput, ,
PARAMETRO)
    cmdInterrogazione.Parameters.Append prm
    rsGriglia.Open cmd, , adOpenForwardOnly, adLockReadOnly
Con accesso al DBF ho cambiato la ConnectionStrin in questo modo:
    cnGriglia.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\path_del_DBF;Extended Properties=dBase IV"
alla istruzione rsgriglia.Open    ottengo un errore del tipo "PARAMETRO
NECESSARIO NON COMPLETO" ;
 se tolgo il parametro dalla istruzione SQL (select * from anagrafica) torna
a funzionare.
come faccio a passargli il parametro?
grazie anticipatamente

 a funzionare.
Crea direttamente la  query concatenando le stringhe:
"SELECT * From anagrafica Where ragionesociale>='" & mioparametro & "' ORDER
BY ragionesociale"
(nota gli apicetti tra le virgolette)
ciao
ugo


Perchè non provi a recuperare la tua tabella con i comandi prori di ADO ?
Utilizza il metodo GetRows che restituisce un array bidimensionale Variant
Arr = rsGriglia.GetRows(<rows>, <start>, <fields>)
Dove:
<rows> = nr di record da recuperare (omettere se vuoi leggere tutto)
<start> = puntatore al recorda dal quale iniziare valori validi:
0-adBookmarkCurrent 1-adBookmarkFirst 2-adBookmarkLast
<fields> = Opzionale array di filtro per laggere solo i campi che ti
interessano
comunque io ho usato stringhe di comando SQL utilizzando il codice sotto
Dim CN      As New ADODB.Connection
Dim RS      As New ADODB.Recordset
Dim m_Cmd   As String
' Apertura collegamento ad Database
CN.Open "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & m_Path
Set RS.ActiveConnection = CN
' Specifica la tabella origine dati
RS.Source = m_Source
RS.Open , CN, adOpenKeyset, adLockPessimistic
' Scrivo il nuovo record
m_Cmd = "INSERT INTO Wmbar934 VALUES('" & g_Seak & "','" _
& g_Item & "', '" & g_Cprj & "', '" & g_Exin & "', '" _
& g_Dscc & "', '" & g_Refe & "', '" & g_Stat & "', '" _
& g_Dtrg & "' )"
CN.Execute m_Cmd
RS.Close
CN.Close

Scusa ! quello che ti ho postato non č pertinente abbi pazienza ho frinteso
l'oggetto del tuo post.
JKLJKL :-(
Newsgroup: it.comp.lang.visual-basic
Titolo: Bloccare esecuzione di un ciclo

Qual'e' il comando Visual Basic che consente di bloccare l'esecuzione
di un ciclo ? (qualcosa del tipo exit for?)
Devo creare una form (o altro) in cui avvenga un'elaborazione (che
possiamo ridurre
alla visualizzazione di un contatore che si incrementa con un ciclo) e
contemporaneamente
deve essere disponibile un pulsante (o altro) che possa arrestare
questa
elaborazione.



 di un ciclo ? (qualcosa del tipo exit for?)
exit for
dalla guida di vb5:
For counter = start To end [Step step]
[statements]
[Exit For]
[statements]
Next [counter]
ciao, a.


 elaborazione.
Il comando Exit Function o Exit Sub si usa nei loop x uscire direttamente da
funzioni o sub  in risposta ad una certa condizione. Altrimenti per uscire
solo da loop esistono Exit For e Exit Do. Vedi Help.

Ciao,
'//Dichiarazione
Dim Blocca as Boolean
Sub Form_Activate()
    Ciclo
End Sub
Sub Ciclo()
    Blocca = False
    Do
        '//Tue istruzioni del ciclo
        DoEvents
        If Blocca = True Then Exit Do
    Loop
    Msgbox "Ciclo Terminato"
End Sub
Sub Command1_Click()
    Blocca = True
End Sub
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------

 Devo creare una form (o altro) in cui avvenga
un'elaborazione (che possiamo ridurre alla visualizzazione di
un contatore che si incrementa con un ciclo) e
contemporaneamente deve essere disponibile un pulsante (o
altro) che possa arrestare questa elaborazione.
Allora "Do..Loop" forse non c'entra. Sembrerebbe che un
DoEvents nel ciclo, seguito dal test di una variabile esterna
ad esso, possa fare al caso tuo:
Dim m_blnFermati As Boolean
Private Sub cmdFerma()
  m_blnFermati = True
End Sub
Private Sub cmdConta()
Dim i As Integer
m_blnFermati = False
For i = 1 To 30000
  DoEvents
  If m_blnFermati Then Exit For
  With lblContatore
    .Caption = i
    .Refresh
  End With
Next
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Newsgroup: it.comp.lang.visual-basic
Titolo: Porta Parallela In VB5

Chi mi puo aiutare per fare una applicazione dove si deve usare una porta
parallela (LPTx)
Che controlli ci sono disponibili ?
Come si usa ?

>Che controlli ci sono disponibili ?
win95io.dll dal sito comune
Ciaps
Stracca
http://www.stracca.net
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------

solo win 9x...
---
GbC
http://gbc.homeip.net
---

 solo win 9x...
NTPort Library
http://winfiles.cnet.com/apps/98/vb-comp-h.html
NTPort Library enables your Win32 application to real-time direct access to
PC I/O ports without using the Windows Drivers Development Kit (DDK) -
NTPort Library provides support for Windows 95/98 and Windows NT/2000.
NTPort Library is easy to use. Under Windows NT, NTPort Library driver can
be load and unload dynamically, so you need not any configuration
$30