mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Domande da neofita

Ciao a tutti !
Spero di essere chiaro nello specificarvi il mio problema.
Ho creato un form in VB nel quale ho inserito due comandi ADO.
Entrambi sono collegati a due tabelle (Y e X) residenti in un DB di Access.
Sul form ho bisogno di crearmi i record da memorizzare nella tabella Y, ma
ogni record include anche un campo con un codice che vado a prendermi dalla
tabella X (anagrafica) selezionandolo con una eventuale combobox.
In access per me risulta elementare crearmi una maschera che faccia simili
collegamenti, ma in VB ho ancora molto da imparare ...... Potete aiutarmi ?
Saluti, fauno68
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Potete aiutarmi ? Saluti, fauno68
Se ho capito, devi semplicemente fare una insert sulla tabella Y.
Quando l'utente da la conferma di inserimento, crei la tua bella stringa sql
prendendo i dati da dove ti pare e fai una Execute sfuttando la Connection
(se la usi), altrimenti, se stai usando i controlli data, agisci
direttamente sul recordset del controllo (datacontrol.recordset)
ciaociao

 collegamenti, ma in VB ho ancora molto da imparare ...... Potete aiutarmi
?
Chi viene da Access, non tutti, va a cercarsi i wizard che lavorino,
costruiscono, ecc. , per lui.
I wizard, come i giochi, mio pensiero, sono inseriti per iniziare a capire
come funziona il sistema.
I wizard sarebbero ottimi se non subentrano variazioni.
Al variare di un minimo parametro, si rimane in difficoltà.
Per padroneggiarsi conviene non utilizzare i wizard, i vari datacontrol, ma
impostare da codice, quindi capire e di conseguenza far propria la materia.
Es.
I problemi rappresentati dai datacontrol, vedi:
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=datacontrol&meta=gr
oup%3Dit.comp.lang.visual-basic
da quando li ho aboliti ed eseguito l'alimentazione dei componenti da
codice,
ho eliminato molti inconvenienti.
Ave
giuseppeD
-------------------------------------------------------------
in VB6 era Caption, in 
VB.NET
 Text
prime info per chi vuol riciclarsi in 
VB.NET


Scusa se solo ora rispondo. Ho avuto dei problemi comunque non gravi.
Potresti cortesemente farmi un esempio di stringa SQL e dell'Execute.
Grazie.
Fauno68


 Fauno68
ciaociao


Grazie! Proverò ad applicare quanto da te suggerito.


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB e TCP

Siccome vorrei creare un programma di posta e non solo... per puro sport...
qualcuno potrebbe indicarmi un URL dove possa prendere le specifiche del
protocollo TCP-IP?
Gracie
Lorenzo


Il solito indirizzo con le RFC
http://www.faqs.org/rfcs
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud


TCP dovrebbe essere la 793, IP invece 791... per la posta poi la 821 (SMTP)
e la 822 (POP) anche se non sono sicuro di quest'ultima. ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Help - ActiveX DLL

Ciao
qualcuno mi sa dire in cosa differiscono e come funzionano le ActiveX DLL
rispetto a quelle tradizionali scritte in C ?
Grazie,
ciao
Ferrux Palmer

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca in un file di testo

Scusate la domanda da dilettante; il fatto e’ che ... lo sono !
Dunque, ho questo problemone: da un file di testo (piu’ di 100.000 
righe, circa 10 Mb) devo estrarre le righe che  contengono una certa 
stringa. Ho usato l’approccio piu’ elementare possibile, facendo una 
ricerca con InStr; purtroppo si e’ rivelato,pero’, troppo lento (circa 
10.000 righe esaminate al minuto) . Forse esiste una maniera per 
caricare il file in memoria una volta per tutte e non dover usare il 
line input per ogni riga ?
Perche’ ho la sensazione che il collo di bottiglia sia proprio
quello ...
Grazie per l’aiuto e cari saluti a tutti.
Ciao !!

 quello ...
Il comando per leggere tutto il testo in una variabile stringa c'è scritto
qualche post fa in un post del 12/02 nel post del lotto.

 quello ...
Il comando per leggere tutto il testo in una variabile stringa c'è scritto
qualche post in data 12/02 che parlava del lotto.

Andrea [Work] ha scritto:

Yeah! il mio post :P
Tra l'altro, il programma l'ho quasi terminato e penso sia possibile 
inserirlo nel sito comune. Più che per il programma vero e proprio, che 
calcola ritardatari e ambi, terni ecc... può essere utile perchè 
raccoglie un po' di informazioni sulla gestione dei file (grazie al 
post) e qualche query.
Finisco le stampe e mi faccio risentire.
Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: -> la TrayIcon non se ne va

tramite la funzione Shell_NotifyIcon (vedi sito comune) sono riuscito
a creare la mia icona nella Tray di Windows (area che contiene
l'orologio).
Il problema e' che quanto chiudo la form (cliccando sulla X,oppure
Unload Me),l'icona rimane visualizzata,e scompare solo ripassando il
mouse su di essa.
PS
Ho provato anche:
sub form_unload
Call Shell_NotifyIcon(NIM_DELETE, nic)
end sub
RISPONDETEMI SUL NEWSGROUP

Probabilmente la chiamata API ha dato un valore di errore in ritorno che tu
non hai testato.
L'esecuzione della funzione API non e' andata a buon fine e la icona dalla
Tray Bar non e' stata rimossa.
Poiche' pero' il programma termina, appena ci passi sopra con il mouse il
sistema operativo la toglie.
....penso
Ciao
Stefano
<le...@no.spam> wrote in message 38b69bce...@news.tin.it...


 wrote in message news:893mvj$8h5$1...@nslave2.tin.it...


 wrote in message
Yssu4.32977$qv.3...@news.infostrada.it...


rimossa senza causare errori di protezione generale...
ehhh.......!!!!!!!!!
Rispondetemi sul NewsGroup


Rispondetemi sul NewsGroup
Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET Modificare nome colonne a ListView

Ciao a tutti,
ho già cercato su google, ma probabilmente utilizzo dei termini di 
ricerca sbagliati.
 
Ho assegnato il nome delle colonne di una ListView1 dall'interfaccia 
utente di VS.
 
Ora vorrei modificare questo nome da codice.
Come si fa?
 
Ho provato con
 
ListView1.Columns(1).Name = "TEST"
 
ma non funziona.
 
Avete qualche consiglio?

 Come si fa?
 
A me funziona... che versione di VS? va in eccezione o semplicemente non lo fa?


Ho trovato!
 
Devo scrivere:
ListView1.Columns(1).Text = "TEST"
 
e non ".Name"!
 
A te funziona anche con ".Name"?

 A te funziona anche con ".Name"?
 
Si, pensavo intendessi proprio .Name, per fare qualche "intrigo" particolare, non il semplice testo della colonna

Newsgroup: it.comp.lang.visual-basic
Titolo: LZ32.DLL

Insomma nessuno sa come comprimere un fle senza ricorrere alla schell
brutale PKZIP ... ETC ETC .
Grazie
Antonio Tanzillo  
a...@pippo.netgroup.it
KillPippoforrepondez

Antonio Tanzillo  
a...@pippo.netgroup.it
Io ho provato a risponderti,  ma anche se tolgo Pippo non arriva lostesso...
Ciao. Fabio

Se hai una risposta postala (se vuoi anche in privato), perchè interessa
anche a me (uso VB4).
Ciao Franco
--
Automatic posted from 
ro...@edy.ivg.it
 [194.184.152.232]
via Mailgate Server - 
http://www.mailgate.org

 in 'it.comp.lang.visual-basic'
ha scritto:

Rispondi sul NG, cosě gli diamo un senso...
Saluti
Saluti, Tizio
EX utente tin, e appena possibile, anche TELECOM.

Vuoi dire che devo allegare un file di 200k sulle NG?

 
Che ne dici se lo mettiamo sul Sito Comune?
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Urgente OCX

Potreste dirmi da dove scaricare ( o invirmalo direttamente ) l'ocx
Windows Media Player 5.2 o superiore?
    Tingrazio anticipatamente
        Ale
http://www.adamello.it/webbing/dinamic/

 wrote in message
news:37185C32...@adamello.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Url sito comune

non trovo + il sito comune. ringrazion in anticipo chi mi fornisce l'url

 wrote in message
89jo3m$9vq$1...@fe1.cs.interbusiness.it...
non trovo + il sito comune. ringrazion in anticipo chi mi fornisce l'url
Eccotelo qui:
http://www.murialdo.it/it_lang_vb
Ciao !
Lorenzo



 wrote in message
news:89jo3m$9vq$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: In ricerca di un consiglio(esecuzione esterno)

Salve trovando questo newsgroup ho deciso di scrivere il mio problema magari 
qualcuno mi sa dire qualcosa.
Ho fatto un programma che una volta installato ti permette di crittare 
l'eseguibile e proteggere la sua esecuzione con una password
Es. Outlook express che puoi avviarlo solo aver digitato una password
il software funziona perfettamente ma non sono soddisfatto perchè l'intero 
software decritta e interpreta il codice del programma scelto autonomamente 
rallentandone la velocità di esecuzione perchè ne fa una specie di debug.
Sarebbe possibile passare l'esecuzione al sistema invece di interpretarlo ?
riesco a decrittarlo e caricarlo interamente in memoria ma non conosco la 
procedura per fare il passaggio dall'interpretazione all'esecuzione diretta 
magari passando il controllo al kernel.
In questo modo posso far gestire i bug di alcuni software direttamente al 
kernel anzichè crearmi delle routine che mi controllano errori assurdi 
dimenticati dai programmatori . 

 dimenticati dai programmatori .
Per rimediare quindi delle belle schermate blu mandando in crash il kernel?
A mio avviso la gestione degli errori 'deve' essere implementata all'interno 
del software, mai delegata al sistema operativo per un'infinita' di ragioni 
a partire dalla gestrione della memoria.
Tu avevi gia' qualche idea su come implementare il tutto?
Mandi!
Newsgroup: it.comp.lang.visual-basic
Titolo: Sono solo! Faccio un [OT]

Ragazzi, la programmazione, specialmente di sabato e specialmente dopo un
tot di sabati, crea le condizioni per uno stato alquanto strano, seppure non
raro: Ci si sente un po' coglioni.
Ecco, l'ho detto e ora, visto che siete tutti fuori a cena, a donne e fra
luci e suoni artificiali, vi saluto e vado avanti a rincoglionirmi ancora un
po'.
Ma ho quasi finito, mi manca Where, la più tosta. ;-)))
Lupo.rinco.

 ha scritto nel messaggio
news:zTnT8.86233$j65.2...@twister1.libero.it...

Non per consolarti,
ma stasera tocca pure a me stare al chiodo.
giuseppeD

stasera... idem per me :c (
--
"I grandi spiriti hanno sempre incontrato violenta
opposizione da parte delle menti mediocri."
A.Einstein

 stasera... idem per me :c (
maledetti gestionali ....
.... siamo in 4, ci scappa un pokerino ?


in 5 .....un' orgia????

 in 5 .....un' orgia????
Chi č la donna (ooooooohhh, non chi la fa, chi č)?


In 6... beh, lasciamo perdere.
Bye, G.

 In 6... beh, lasciamo perdere.
evvai " Io ho finito ragazzi ! " Lunedi (domani) se consegna il lavoro e si
pigliano i soldini , tutto ok pero' che faticaccia !

 pigliano i soldini , tutto ok pero' che faticaccia !
Passa nel pomeriggio, ti offro un caffè :-).
Bye, G.

 Passa nel pomeriggio, ti offro un caffè :-).
umm io prendo i soldi e tu mi inviti a prendere un caffe' ?
non e' che sotto c'e' un supermazziatone a sorpresa per fottermi i soldi
come alle vecchiette ? :p

 come alle vecchiette ? :p
LOL, malfidato ! E dire che pensavo di essere io il paranoico... :-)
Bye, G.

 LOL, malfidato ! E dire che pensavo di essere io il paranoico... :-)
[ giusto per stiracchiare l'OT ]
Oggi ho passato tutto il giorno alla caserma di polizia , maledetti semafori
che cambiano sempre colore GRRRRRR !!! E anche sto mese 130Neuri di multa
che palle !

 che palle !
Daltonico?

 Daltonico?
No : Golf GTI 1,9 !
:p

Newsgroup: it.comp.lang.visual-basic
Titolo: Inizializzare a zero un campo privato della classe

Salve,
Nel mio programma VB sto creando una classe che dovrò inserire in una
collection.
Ho una DIM di questo tipo :
Dim PersRec As TPersRec
Nella parte  "generale" sezione "dichiarazioni".
Ora io ho la mia bella :
Public Sub Create()
  ' Altro codice qui
  Azzero PersRec ' Come lo faccio?
End Sub
Grazie dell'aiuto,
Andrea

Non è molto chiaro cosa intendi per azzerare...cmq in vb gli oggetti vengono
posti a zero automaticamente nel momento della dichiarazione
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: ma è un bug del controllo RadioButton?

Quando apro un form ( a run time) contenente alcuni pulsanti di opzione 
raggruppati (cio� mutuamente esclusivi),nessuno � selezionato di default.
 
Se ne clicco uno,viene selezionato ,ma se poi cambio idea,non c'� verso di 
deselezionarlo,rimane selezionato(posso solo selezionarne un altro,ma non 
riesco a ritornare alla situazione iniziale in cui nessun pulsante era 
selezionato).
 
Si pu� risolvere questo disguido?
 
Grazie e ciao ( il problema � sia su VB che 
VB.NET
 ) 
 
 

 Si può risolvere questo disguido?
 
Ti serve un opzione "nessuna selezione", che puoi fare ad esempio con un
nuovo radiobutton specifico.
 
-- 
Freccia@Bulldozer63 :D
Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare immagini PCX

un ciao a tutto il NG
nel programma che sto realizzando ho la necessità di visualizzare delle
immagini in formato PCX. dato che il VB non le supporta, qualcuno di voi
conosce una soluzione ( ..... possibilmente freeware........ )  ???????.
Mi serve proprio un aiuto !!!!!! ringrazio chiunque mi darà un consiglio.
grazie. Andrea Sanavia.

 Converti le immagini in JPG con il Bacth Converter di Paint Shop Pro 4. 
Di Free se ne trovano molte versioni.
Ciao

Salvo ha scritto nel messaggio <01be64c3$174746a0$0a0201c0@dambrosio>...

purtroppo non posso farlo, le immagini PCX che devo leggere sono in una
stazione CAD. e non voglio crearmi delle copie per i motivi che immagini.
hai qualche altra idea ??????
grazie.

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

CIAO!
Immagino che la mia domanda sarà già stata fatta da qualcuno, però io sono
da poco nel campo del Visual Basic e ci capisco ancora poco...
Tanto per allenarmi un po', sto facendo una rubrica....i dati li voglio
inserire in un database Access.
Ho però alcuni problemi. Prima di tutto, quando associ al comanda Data il
file di database, lui memorizza il percorso...ho provato a spostare il file
e non mi trovava più il file di database...Come faccio, una volta che il
programma è compilato? Bisogna essere liberi di installarlo nella directory
che si vuole...
Altro problema: l'ordinamento!
Potrei anche evitare di mettere la funzione di scorrimento della rubrica e
fare solo una semplice ricerca in base al nome, però sarebbe bello anche
poter scorrere l'elenco o comunque averlo ordinato anche nel caso in cui si
voglia per esempio stampare tutta la lista dei nominativi...
Ho però visto (più che visto, letto su un manuale) che i dati vengono
inseriti nel database in coda....
C'è un sistema per ordinare automaticamente il database in base ad un campo
scelto oppure bisogna fare una procedura che ordina ogni volta che si vuole
stampare la lista? Intendo dire, c'è una funziona di ordinamento come in
Excel, magari richiamabile dal VB che ordina da sola il database?
Per ora è tutto....so che saranno domande stupide, però se non mi aiuta
qualcuno non riesco ad andare avanti...
Grazie
BYE
--
----------------------------
Zizzo 
webm...@srt.nu
Webmaster S.R.T. Sondrio Rally Team WebPage 
www.srt.nu



Innanzitutto per ritrovare il file, metti il database nella stessa directory
del eseguibile e quando devi accedere al database lo richiami con il
percorso relativo all'applicazione (App.path).
Ad esempio:
-------
Dim strDatabasePath as string
strDatabasePath=App.Path & "\database.mdb"
--------
Per quanto riguarda l'ordinamento del database puoi utilizzare la proprieta
"Sort" di DAO oppure puoi usare la proposizione ORDER BY in una query SQL.
Per entrambi i metodi trovi vari esempi sulla guida in linea.
Personalmente ti consiglio il secondo metodo (creare un recordset ordinato
in base a una query SQL).
_   _
0   0
   |
\___/......(Ciao!)
Pasquale
mine...@libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Da principiante ...

Ciao a tutto il NG
sono alle prime armi con questo linguaggio di programmazione.
Vorrei sapere ove è possibile reperire del materiale da studiare, come
codici sorgenti e simili,
al fine di realizzare un database gestionale.
Grazie
Angelo

 Grazie
prego
ciaociao

Newsgroup: it.comp.lang.visual-basic
Titolo: E' possibile (e credo di sì) connettere una unità di rete con codice VB ?

Ciao a tutto il NG !!!
Come da oggetto, vorrei sapere se è possibile e se si, soprattutto come,
creare (o meglio connettere) per mezzo di codice sorgente VB, una unità di
rete col percorso specificato da me.
Grazie in anticipo per la vostra attenzione e soprattutto per i consigli...
P.S.: non trovando più il sito comune, vorrei sapere il nuovo indirizzo, me
lo comunicate, per favore ?
Ancora grazie.
Ciao,'''2FB®foolbrain®'''
Visual Basic Programmer
Database Manager
ICQ 88912631

E' possibile.
Dichiarazioni globali:
Type NETRESOURCE
        dwScope As Long
        dwType As Long
        dwDisplayType As Long
        dwUsage As Long
        lpLocalName As String
        lpRemoteName As String
        lpComment As String
        lpProvider As String
End Type
Public Const RESOURCETYPE_ANY = &H0
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal
lpBuffer As String, nSize As Long) As Long
Declare Function WNetAddConnection2 Lib "mpr.dll" Alias
"WNetAddConnection2A" (lpNetResource As NETRESOURCE, ByVal lpPassword As
String, ByVal lpUserName As String, ByVal dwFlags As Long) As Long
Es:
    Dim ll_Ret As Long           'Valore di ritorno chiamate API
    Dim l_NetRes As NETRESOURCE  'Struttura per connessione
    l_NetRes.dwType = RESOURCETYPE_ANY
    l_NetRes.lpRemoteName = vs_NetPath
    l_NetRes.lpProvider = ""
    ' Impostazione del driver locale su cui creare la mappatura
    l_NetRes.lpLocalName = "H:"
   ' Creazione della connessione
   ll_Ret = WNetAddConnection2(l_NetRes, "", Net_GetUserlog(), 0)
   If ll_Ret <> 0 Then
            rs_MsgErr = "Impossibile effettuare la connessione a " &
vs_NetPath & ", verificare il collegamento alla rete"
   End If
' Funzione per ottenere il nome dell'utente connesso in rete
Function Net_GetUserlog() As String
    Dim ls_user$
    Dim ll_ris&, i%
    'Ricavo il nome utente
    ls_user = Space$(255)
    ll_ris = GetUserName(ls_user, 255)
    If ll_ris > 0 Then
        i = InStr(ls_user, Chr$(0))
        Net_GetUserlog = IIf(i > 0, Left$(ls_user, i - 1), "")
    Else
        Net_GetUserlog = ""
    End If
End Function

 E' possibile.
Eheheheheheheh !!! Lo sapevo !!! !!! !!!
Grazie tante, sei stato molto gentile e spero di poter ricambiare un giorno
o l'altro !!! !!! !!! ;)


Newsgroup: it.comp.lang.visual-basic
Titolo: nomi form

ciao
come faccio a trovare tutti i form presenti in un progetto
con forms vedo solo quelli aperti, posso ricercarli nel file .vbw ma devo
sempre sapere il percorso (app.path) e il nome
ma non esiste un modo piu' diretto?
ciao
Ilairo



Fai il parsing del file .vbp cercando le righe che iniziano per
"Form="
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Come fare?

Gradirei che qualcuno mi facesse un esempio con questi nomi perche sono un
novello e non capisco molto.
Allora ho messo esempio: Command1, Command2, Command3 su FormA che comandano
rispettivamente Picture1,Picture2,Picture3.
Il problema che ho e quello di spostare completamente i 3 comandi su una
nuova form FormB, e che continuino a svolgere le funzioni che
gli avevo assegnato in precedenza come posso fare? Grazie anticipatamente.

 ha scritto nel messaggio
news:XG0G9.10755$fa.3...@news1.tin.it...

devi richiamare dal FormB l'oggetto che ti interessa controllare nel FormA.
Nel tuo caso se dal formb devi controllare picture 1 con un pulsante
command1 posto in formb devi fare:
FormA.Picture1.(blablavlablabla) = blablabla...
al posto di bla bla bla metti quello che ovviameente ti serve. io spero di
averti dato l'input necessario per operare.
Ciao
Deimos

Grazie ho gia modificato e spostato le mille righe
sui 2 nuovi form e funge tutto grazie ancora.
Newsgroup: it.comp.lang.visual-basic
Titolo: stringa update

Stò cercando di realizzare una rubrica, con la possibilità tra le altre cose
di aggiornare i campi del database da programma.
Il punto su cui mi blocco è quello che riguarda la stringa update, non
riesco a scriverla correttamente, infatti l'errore che ne esce è un errore
di sintassi nella stringa update.Ho incollato qui sotto il passaggio con la
speranza di ottenere aiuto da qualcuno:
----------------
Private Sub cmdUpdate_Click()
CnDatabase.ConnectionString = "provider=microsoft.jet.oledb.4.0; data
source=C:\Documents and Settings\Memmo\Desktop\Agenda\agenda.mdb"
CnDatabase.Open
CmAggiornamento.ActiveConnection = CnDatabase
CmAggiornamento.CommandType = adCmdText
CmAggiornamento.CommandText = "UPDATE nominativo SET nome = '" &
txtNome.Text & "', cognome = '" & txtCognome.Text & "', telefono = '" &
txtTelefono.Text & "', cellulare = '" & txtCell.Text & "', mail = '" &
txtMail.Text & "', indirizzo = '" & txtIndirizzo.Text & "', note = '" &
txtNote.Text & "' WHERE idnome=" & idnome
CmAggiornamento.Execute
End Sub
------------------
Grazie di tutto
Memmo77

 = '" & txtNote.Text & "' WHERE idnome=" & idnome
quando si ha un campo chiamato note, bisogna mettergli intorno le parentesi
quadre, nelle istruzioni sql
questo se il database è access
--
Salutoni
Sergio

Grazie mille, una cosa cosě banale mi aveva bloccato :)
La stessa vale per una stringa di inserimentoe per quella di canecellazione
immagino.
Avrei anche il bisogno di implementare una classe che mi permetta di portare
il mio idnome del database anche in altre tabelle.Pe ora la cosa l'ho
risolta con un modulo, ma vorrei inserire la classe:
----------------
Private Sub cmdDettagli_Click()
RsDettagli.ActiveConnection = CnDatabase
RsDettagli.Source = "select * from nominativo where idnome=" &
lstNomi.ItemData(lstNomi.ListIndex)
RsDettagli.Open
frmDettagli.txtNome = RsDettagli("nome")
frmDettagli.txtCognome = RsDettagli("cognome")
frmDettagli.txtTelefono = RsDettagli("telefono")
frmDettagli.txtCell = RsDettagli("cellulare")
frmDettagli.txtMail = RsDettagli("mail")
frmDettagli.txtIndirizzo = RsDettagli("indirizzo")
frmDettagli.txtCitta = RsDettagli("citta")
frmDettagli.txtNote = RsDettagli("notepart")
idnome = lstNomi.ItemData(lstNomi.ListIndex)
frmAgenda.Visible = False
frmDettagli.Visible = True
End Sub
------------------------
Non so se sono stato chiaro, ma comunque ti ringrazio ancora per la tua
conulenza.
Ciao Memmo77
Newsgroup: it.comp.lang.visual-basic
Titolo: [INFO] Winsock + IRC

vorrei mandare dei semplici comandi ad un server irc per eseguire in
automatico delle operazioni, ma nn ci riesco!
usando telnet funziona tutto perfettamente, ma quando mando le stesse righe
tramite il metodo SendData() del winsock nn ricevo risposta dal server! dove
sbaglio?
grazie in anticipo
--
"Perché si chiama contagocce, se poi le gocce te le devi contare tu?"
(autore sconosciuto)

metti chr(10) alla fine della stringa o vbcrlf nn ricordo bene..
uno dei due!

 uno dei due!
tnx! adesso provo!
cmq vbcrlf equivale a chr(10)+chr(13)!


 ha scritto nel messaggio
news:alnvc6$8d9$1...@newsreader.mailgate.org...


se ti capita di leggere ancora qesto post, puoi dirmi che tipo di 
applicazione stai facendo??
avrrei bisogno d info X creare un client per mIRC.
grazie
ciao
newbie_...@katamail.com
semmai scrivimi qì ;)


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo DATA ...AIUTOOOOOOO

Scusate, forse la mia domanda vi sembrerà sciocca però sono agli inizi con
la programmazione VB e non capisco come superare un ostacolo.
Devo far utilizzare un programma per interrogare un certo database a utenti
che si trovano in sedi diverse dell'azienda. Ho deciso di fare in notturna
una copia del database nelle diverse sedi.
La mia domanda è:
come faccio a far si che i controlli DATA puntino a diversi percorsi??
Nella sede1 puntaranno sul server X percorso 1
Nella sede 2 punteranno sul server Y percorso 2
etc.
Posso fare un collegamento dinamico?? Cioè far sceglire all'utente il
percorso dove si trova il database?? e se si come faccio a modificare
dinamicamente i controlli DATA perchè puntino correttamente?
Vorrei evitare di compilare più volte il programma uno per ogni sede con il
percorso corretto.
Grazie per le risposte che mi saprete dare... vi seguo sempre con molta
attenzione

 Vorrei evitare di compilare piů volte il programma uno per ogni sede con


 wrote in message


Newsgroup: it.comp.lang.visual-basic
Titolo: e possibile fare....

un codice che apra la finestra dos e avviii un comando dos tipo ren...o cd o
altro.... chiedo troppo????????? grazie a tutti


si', ma perche' ?

 wrote in message 8vrgra$dsr$1...@nslave2.tin.it...


 chiedo troppo?????????
No. Lo chiedi solo con un oggetto troppo soggettivo. Se non ti vanno le
"regole" di questo ng approfitta ora e partecipa al dibattito sulle
modifiche al Manifesto di questo ng.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 modifiche al Manifesto di questo ng.
non ne sono sicuro, ma forse intendeva qualcosa tipo
http://peccatte.karefil.com/software/EasyConsole/EasyConsoleEng.htm

 
http://peccatte.karefil.com/software/EasyConsole/EasyConsoleEng.htm
Intanto l'ho scaricato...


 Intanto l'ho scaricato...
se poi si lamenta in it.discussioni.sentimenti, non lamentarti tu.
c'e' modo e modo...

 c'e' modo e modo...
L'importante e` che venga a piangere sulla tua spalla e non la mia che ci ho
i reumatismi. L'hai ancora tu il fazzoletto di Desdy, vero?


desdy ?
quella di iago o quella di yoghi ?

 quella di iago o quella di yoghi ?
quella di OTello

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] SQL Server: come eseguire una stored procedure di sistema da VB?

Ho provato ad eseguire il rename di un indice da codice, ma ottengo
sempre un errore ( "Errore di sintassi o violazione di accesso").
Mi connetto come "sa", quindi non  dovrei avere problemi di accesso.
Ho gia' provato in molte maniere, letto BOL, Google ma niente.
Sapete dire dove sbaglio?
Grazie
Gianluca
------------ codice ---------------
Public Sub EseguiSP()
Dim lCn As New ADODB.Connection
Dim lCommand As New ADODB.Command
Dim lLong As Long
lCn.Open "Provider=SQLOLEDB;Server=.;Database=dbstore;User
Id=sa;Password=xxxxxx;"
With lCommand
    .ActiveConnection = lCn
    .CommandType = adCmdStoredProc
    .CommandText = "sp_rename 'art2.aaaaaArt2_PK', 'Art2_PK', 'INDEX'"
    .Execute , , adExecuteNoRecords ' <--- "Errore di sintassi o
violazione di accesso"
End With
lCn.Close
End Sub

Gian wrote:
Usa:
 With lCommand
    .ActiveConnection = lCn
    .CommandType = adCmdText
    .CommandText = "EXEC sp_rename 'art2.aaaaaArt2_PK', 'Art2_PK', 
'INDEX'"
    .Execute , , adExecuteNoRecords
 End With
 lCn.Close
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 End With
Dim param as ADODB.Parameter
With param
     .Direction = adParamInput
     .Name = "NomeParam"
     .Type = adChar
     .Value = "art2.aaaaaArt2_PK"
     .Size = Len(.Value)
End With
With lCommand
      Call .Parameters.Append(param) ' un parametro con 1 tecnica
      Call .CreateParameter("NomeSecondoParam", adChar, 
adParamInput, _				Len("Art2_PK"), "Art2_PK")  ' un parametro con 2 tecnica
      .ActiveConnection = lCn
      .CommandType = adCmdStoredProc
      .CommandText = "sp_rename"
      .Execute
  End With
And so on...

 And so on...
Codice più verboso ma più elegante e corretto di quello da me proposto...


 Codice più verboso ma più elegante e corretto di quello da me proposto...
Non era mia intenzione oscurare la tua tecnica, che è ottima perchè 
risparmi memoria e codice, demandando tutto al server SQL.
Però è meglio esporre le varie tecniche...e poi è anche divertente 
sfruttare al massimo ADO!!

GRAZIE a entrambi! Funziona
Gianluca

 sfruttare al massimo ADO!!
Sono perfattamente d'accordo! (ma quale oscuramento!)
Spesso, la soluzione, si può raggiungere con strade differenti... e' bene 
quindi mostrarne piu' di una...
Ciao!


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ocx & htmlhelp

Ciao a tutti,
ho creato un componente ocx per la de/codifica dei messaggi mime.
Fatto l'help in formato chm, l'ho collegato al progetto e quando mi
posiziono sul controllo in design time e premo F1 mi si apre l'help.
Ora mi piacerebbe di riuscire a visualizzare nella finestra delle proprietą
e nel visualizzatore degli oggetti la descrizione sintetica, rendendo
inoltre sensibili al contesto le varie proprieta' e metodi.
Ho googlato disperatamente ma non ho trovato una sana fava e non ho trovato
nulla neppure sul sito.
Qualcuno saprebbe darmi qualche dritta?
beppe

 beppe
Ok.
Ho risolto.
Newsgroup: it.comp.lang.visual-basic
Titolo: Numeri decimali

Ciao a tutti.
Ho il seguente problema:
Ho un data base con un campo che
si chiama numero, in questo campo vengono memorizzati dei numeri decimali
(es.12,45).
Il programma che sto scrivendo dovremme dividere il numero
intero in un textbox e la parte decimale in un altro text box.
La parte
intera massimo è di 6 cifre (non so se può essere utile).
Grazie a tutti.
______
Shiryu
--------------------------------
Inviato via 
http://usenet.iol.it

 ha scritto nel messaggio
news:151Z24Z189Z174Y...@usenet.iol.it...


 Grazie a tutti.
Prego
--
Ciao, Pascal ;)

Newsgroup: it.comp.lang.visual-basic
Titolo: OUT OF MEMORY.

Sto lavorando con VB6 e SP3 su un celeren 550 con 128 Mb e Windows 98II,  in
ambiente di sviluppo VB6 clicando nei vari form mi da il msg.. Ho compilato
il programma succede lo stesso (anche se con minore frequenza).
Cosa posso fare.
Qualcuno mi puo aiutare ?
Ciao a tutti
Veronica


Se e' sempre il programma con 30 form, o riduci il numero di form o cambi
piattaforma di sviluppo...
Ciaotutti,
*

 Veronica
Premessa: non posso affermare che quanto riferò della mia
          personale esperienza con i limiti dei processori
          celeron, dirima i conflitti su altri sistemi.
Il solo palliativo per limitare la comparsa del messaggio
è chiudere qualche finestra.
Alcuni anni fa sviluppavo, utilizzando VB5, su una macchina 
con processore celeron, situazione analoga alla tua quindi;
spesso, lavorando ad un progetto di dimensioni medie,
incorrevo nella disdicevole situazione di memoria
insufficiente.
Empiricamente scoprii che ripristinavo uno spazio sufficiente
a proseguire senza problemi, chiudendo, nell'IDE di VB, 
le finestre, sia di codice sia di design, eccetto quella su 
cui operavo.
E, per garantire l'assenza di noiose interferenze, compilavo con 
tutte le finestre di progetto chiuse.
Poi cambiai PC.
[Eccesso di zelo: per chiusura delle finestre intendo proprio il 
 click sulla X nella barra del titolo di ogni form di progetto,
 di modo che vedi gli oggetti caricati nella finestra di Browse
 Project, ma l'area di sviluppo è grigia per assenza di finestre 
 aperte].
Una nota: 
Vb5 era così delicato da ricordare lo status di ogni finestra
per cui, alla riapertura del progetto, le finestre erano chiuse.
Ignoro se il difetto riguardi solo la mia personale installazione,
ma VB6, nonostante registri le impostazioni delle finestre alla 
chiusura, non è così gentile da leggerle alla riapertura.
È  quindi estremamente probabile che ogni volta dovrai chiuderle 
nuovamente tutte, ovviamente se seguirai quanto da me indicato e,
soprattutto, se avrà successo anche sulla tua macchina.
Come vedi quella che suggerisco non è una soluzione, ma 
*a me* ha permesso di proseguire *normalmente* nello
sviluppo.
Meglio, comunque, sarebbe trovare del tempo per poter spostare
alcuni form dalla applicazione principale, in DLL esterne. 
HTH
Ciao
	Adriano

 wrote in message
9l0f9n$pad$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic 6

Ciao a tutti.
Visto che sono alle prime armi, quale libro o manuale mi consigliate per
avvicinarmi in maniera non traumatica a questo linguaggio.
E poi vi chiedo ancora:
se volessi fare qualche corso, a chi posso rivolgermi?
Io sono della provincia di Avellino.
Ciao e grazie

 ha scritto nel messaggio
news:9gcsn0$pvu$1...@lacerta.tiscalinet.it...

Io sto usando:
Il manuale ufficiale di Microsoft Visual Basic 6.0
<titolo>
    <h1>Microsoft Visual Basic 6.0</h1>
    <h2>Manuale del programmatore</h2>
<titolo>
Della Mondadori Informatica

 ha scritto nel messaggio
news:q5oW6.5985$T52.1...@news.infostrada.it...


 Alex
io sono arrivato al 4° capitolo (I Form), quindi sono proprio agli inizi
inizi e non so dirti se nei capitoli piů "avanzati" sia buono o meno, per
adesso lo trovo buono! .-)
Michele

 wrote in message
news:9gcsn0$pvu$1...@lacerta.tiscalinet.it...


 Gianluca
Hai detto per "cominciare"??
..ma non conoscevi il VB dalla versione 3?
Michele

..ma non conoscevi il VB dalla versione 3?
non mi sembra un controsenso, vb e' cambiato molto rispetto
alla versione 3.
ciao, hal

 l'ho


 Gianluca
Scusa per la domanda diretta, ma sei di Matera?

 wrote in message
news:F0LW6.6731$Cq5.2...@news.infostrada.it...


 Gianluca
Scusa allora, ti ho confuso con un'altra persona! :-(
Michele
Newsgroup: it.comp.lang.visual-basic
Titolo: Campi data nei database, come fare?????

Ho un problema che suppongo sia già stato affrontato (e spero risolto,
in qualche modo...) da tutti coloro che scrivono applicazioni gestionali
con database (sicuramente, quindi, da molti...): non esiste in VB un
controllo funzionale per l'inserimento delle date. Posto che far
inserire le date all'utente in una semplice TextBox non mi pare corretto
(mancano infatti le "/" che delimitano giorno, mese ed anno), e che il
controllo Masked Edit non funziona a dovere se collegato a un
DataControl (non accetta, infatti, valori di record nulli), non capisco
proprio come si possa ovviare al problema. Voi, se avete affrontato il
problema, come avete fatto?
-------
Stefano
--
Posted from 
ro...@soarisc.comune.firenze.it
 [159.213.248.2]
via Mailgate.ORG Server - 
http://www.mailgate.org

...


Io l'ho risolto semplicemente intercettando valori nulli provenienti dal
database, e valori non validi e/o nulli inseriti dall'utente nella Masked
Edit.
------------------------------------------------
Luke
supe...@iname.com
http://www.sp-italia.com
http://www.sp-italia.com/luke

Nel database, imposta il tipo di dati del campo "Data" in "text"
oppure "data", ma in questo caso, imposta il formato in "gg/mm/aaa"
(oppure "dd/mm/yyyy" se è inglese) se vuoi ad esempio una data del
tipo 12/02/1998.
In VB, crei un textbox avente il seguente codice nell'evento LostFocus
(se ad esempio vuoi che il campo sia aggiornato quando ti sposti nel
controllo successivo per la modifica)
	If Data.Text = "" Then Data.Text = Date
	Data.Text = Format(Data.Text, "dd/mm/yyyy")
tutto qua...
On 9 Oct 1998 14:29:54 +0200, 
pm.support...@comune.fi.it


-------
Io mi sono scritto un OCX composto da un normale textbox e uno
spinbutton che permette di modificare la data un giorno per volta.
Questa funzionalità è stata duplicata dai tasti + e - per velocizzare
il tutto. Ne esiste anche una versione con due spin control: il
secondo permette di modificare il mese. Prima di salvare controllo che
contenga una data corretta.
Nella maggior parte dei casi è possibile proporre una data di default:
ad esempio per una fattura puoi proporre la data del sistema.
Per quei pochi casi in cui presenti il textbox vuoto non ci vuole poi
tanto a premere due volte la sbarra.
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Form Load

Ciao a tutti,
                il mio problema è che al caricamento del form, eseguo un tot
di operazioni, ma quando vado a chiamare una determinata sub, non viene
eseguita neanche una riga di codice dentro quella sub, mi ricordo che c'è un
modo per forzare l'esecuzione della sub, ma non ricordo qual'è il comando.
Vi ringrazio per l'aiuto.
                                                        Ciao Gab



modo per forzare l'esecuzione della sub, ma non ricordo qual'è il comando.
codice, codice, codice!!! Posta il codice!
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.it-lang-vb.net
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:f05imtcibkbvjg2kj...@4ax.com...


 ha scritto nel messaggio
news:6p8a7.34$6V1....@nreader1.kpnqwest.net...


neanche un'operazione al suo interno.
mmm... il codice di get_data?


 ha scritto nel messaggio
news:kb6imtcrcmpojkobg...@4ax.com...


 ma non compare mai
Scusate se mi intrometto ma hai provato a mettere Call Get_Data nell'evento
Form_Activate???
Ciao
Fabio

ma non compare mai
hai attivato qualche gestore degli errori? Cosa fa Timerx_timer?
Get_data dove è stata dichiarata? E Come?


 ha scritto nel messaggio
news:9kb6qk$j35$1...@lacerta.tiscalinet.it...


 > > qualsiasi cosa, perchč nella prima riga ci ho messo un msgbox "Sei


 ha scritto nel messaggio
news:dk7imtg3t0uca38md...@4ax.com...


avverrà più avanti...
OK, ma non mi hai risposto...
hai attivato qualche gestore degli errori?


 ha scritto nel messaggio
news:dp9imtgjtfro0ue2j...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: COme faccio una form che restituisca una variabile

in vb me la cavo abbastanza, se anche non avete voglia di spiegare i
dettagli credo di potermi accontentare
di qualche dritta...
Il problema č questo:
vorrei definire una funzione che apra una form, chieda alcuni input
all'utente e restituisca un valore alla form chiamante
ad esempio
id_persona = RichiediSelezioneTra("attori")
questa dovrebbe aprire una form, passandole il valore "attori", sulla base
di questa stringa la form si collega ad
un db mostra gli attori, permette alcune altre funzioni (tipo aggiungi
attore o cose cosě) poi a seconda che venga
selezionato o meno un attore restituisce l'id della persona selezionata
oppure 0.
č possibile fare una cosa del genere?
Grazie a tutti, Claudio
cosa ne dite di una copia della risposta anche in e-mail? Rigrazie...

 : 

_______________________________________________
M$ Upgrade: Windows98 + 2 Windows = Windows2000
Submitted via WebNewsReader of 
http://www.interbulletin.com
Complaint against spamming pls. to: abuse @ 
interbulletin.com

 ...

 è possibile fare una cosa del genere?
Si`. Per fortuna;)
Usa il form come classe (Dim f As Form1 ... Set f = New Form1
... Set f = Nothing) e aggiungi le proprieta` necessarie. Poi
ne leggi i valori.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: help file

Ciao a tutti, dovrei aggiungere nella mia applicazione una guida in linea,
ho provato a leggere l'help del "help workshop" ma non ho ben capito la
sintassi che devo usare nel file di testo rtf.
Qualcuno potrebbe spedirmi un esempio e spiegarmi come scrivere questo file
?
Grazie Ciao Simo
--
          Simone viganò
¨¨°şİoż,,żoİş°¨¨°şİoż,,żoİş°¨¨°şİoż,,żoİş°
 
simone...@mail.omnitel.it
 
seldo...@tiscalinet.it
        ICQ 66944560
¨¨°şİoż,,żoİş°¨¨°şİoż,,żoİş°¨¨°şİoż,,żoİş°

 ?
devi creare un nuovo documento word, e salvarlo come file word di una
versione precedente, vecchia. se tenti di salvarlo come RTF non funziona
(almeno a me, stranamente, non funziona)
all'interno di questo file word, poi, devi tenere presenti solo alcune
regole, se vuoi realizzare un file hlp elementare.
per le parole sottolineate, quelle che se ci clicki sopra ti portano ad
un'altra pagina, devi procedere come segue:
scrivi la parola, poi subito dopo, senza spazi, tutto attaccato, scrivi il
nome del bookmark al quale rimanderanno (ogni bookmark corrisponderą ad una
nuova pagina). quindi, la parola la formatti come sottolineato doppio, e il
nome del bookmark come nascosto (ctrl+q).
a questo punto devi crearti i bookmark.
e anche qui č semplicissimo.
devi fare inserisci pagina, affinche ogni bookmark abbia una pagina tutta
sua. quindi all'inizio della pagina fai inserisci nota a pie di pagina. stai
attento qui, perche la nota non dovra essere numerica, ma dovra avere un
nome (c'č un apposito spazio), che sarą il nome del bookmark preceduto da #.
queste sono le due regole fondamentali per crearti il file doc da compilare.
poi vabbe devi aprire il programma della MS per compilare, lģ devi creare un
nuovo progetto che avrą estensione hjp credo. all'interno di questo progetto
imposti il nome del file doc che hai creato. fai save & compile e il lavoro
č fatto.
diverso discorso se poi vuoi assegnare un numero ad ogni bookmark, per far
si che quando premi F1 nel tuo prog VB lui non apra semplicemente la guida,
ma vada in un determinato punto. per fare cio, il file doc non deve essere
modificato, ma devi operare solo sul file hpj. devi fare Map, e poi da lģ
devi dare un valore numerico ad ogni bookmark.
spero di essere stato chiaro.
MarioH

Bravo, MarioH, questo articoletto mi e' piaciuto :)
Ehi, cosa ho detto ?
Ah, si' ho detto _articolo_.
Visto che anche questa e' una FAQ, cosa ne diresti di postare un articolo
sul sito comune ?
Penso che lo apprezzerebbero in molti ;-)
ciao, hal


ok, dammi 2 giorni di tempo (o meglio 2 notti, non so se noti l'orario dei
miei ultimi post) e lo aggiusto un pochino, ok?
MarioH

 ha scritto nel messaggio
news:hqWS6.1193$Zo3....@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore in TreeView

Faccio un'esempio:
Il 10/01/02 acquisto Topolino a 500
e imposto
listino1 a 510
listino2 a 550
listino3 a 600
Il 10/05/02 acquisto Topolino a 550
e imposto
listino1 a 560
listino2 a 610
listino3 a 650
Io vorrei caricare nella TreeView
10/01/02
            |---Listino 1
                     |------510
            |---Listino 2
                     |------550
            |---Listino 3
                     |------600
10/05/02
            |---Listino 1
                     |------560
            |---Listino 2
                     |------610
            |---Listino 3
                     |------650
......
Ho fatto cosi ma mi da un'errore 35610 Oggetto non valido
'Costruisce la radice.
          Set objNode = tvListini.Nodes.Add(, , "DtaAcq", "Date acquisto",
1)
          intParentKey = objNode.Index
          objNode.ExpandedImage = 2 ' 2 è l' index Images del controllo
ImageList
'Recordset date listini
          Set rstListParte = New Recordset
          rstListParte.Open "SELECT ListinoParti.IDListino,
ListinoParti.IDParte, ListinoParti.Data " & _
          "From ListinoParti " & _
          "WHERE ListinoParti.IDParte = " & Me.dgPezzi.Columns(2) & _
          " ORDER BY ListinoParti.Data ", DbCon, adOpenStatic,
adLockOptimistic
          Do While Not rstListParte.EOF
            Set objNode = tvListini.Nodes.Add("DtaAcq", tvwChild,
rstListParte!Data, rstListParte!Data, 3)
            Set objNode = tvListini.Nodes.Add(rstListParte!Data, tvwChild,
"List1", "Listino 1", 3)
            Set objNode = tvListini.Nodes.Add(rstListParte!Data, tvwChild,
"List2", "Listino 2", 3)
            Set objNode = tvListini.Nodes.Add(rstListParte!Data, tvwChild,
"List3", "Listino 3", 3)
'Recordset Listini data
            Set rstListPzParte = New Recordset
            rstListPzParte.Open "SELECT * " & _
            "From ListinoParti " & _
            "WHERE Data Like #" & rstListParte!Data & "#", DbCon,
adOpenStatic, adLockOptimistic
            Set objNode = tvListini.Nodes.Add("List1", tvwChild, "Listino
1", rstListPzParte!Listino1, 3)
            Set objNode = tvListini.Nodes.Add("List2", tvwChild, "Listino
2", rstListPzParte!Listino2, 3)
            Set objNode = tvListini.Nodes.Add("List3", tvwChild, "Listino
3", rstListPzParte!Listino3, 3)
            intParentKey = objNode.Index
          rstListParte.MoveNext
          Loop
Dove sbaglio ??
--
VB6 Sp5
Grazie, Alcau

           Loop
Ti consiglio un indice che si incrementa ogni volta tipo:
listino1 = "L1" & I (I=I+1 ad ogni ciclo)
listino2 = "L2" & I (I=I+1 ad ogni ciclo)
listino2 = "L3" & I (I=I+1 ad ogni ciclo)
Ciao, Luciano.

credo che tu non possa inserire un nodo la cui chiave inizia con un numero


> credo che tu non possa inserire un nodo la cui chiave inizia con un numero
Penso che si possa, purche' lo si converta in stringa con CStr() o simile...
Fabio
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] crystal report

salve
sono un novizio con vb6
Vorrei sapere se tramite vb e crystal report esiste un modo per usare
come sorgente dati non un db ma una qualche altra forma di dati
tipo array
il problema di fondo e che i dati nel db non possono essere presi 
direttamente
ma devono essere eleborati via codice
e poi stampati quindi non posso fare una conn. diretta al database trami 
crystal
l'alternativa sarebbe creare tutto il report runtime via codice a botte di 
addTextObject
ma i report sono tanti e cosě facendo perderei tutti i vantaggi di usare 
crystal
potete darmi qualche consiglio ?
grazie
ciao

 ha scritto nel messaggio
news:43f2ec59$0$5986$4faf...@reader2.news.tin.it...



Non c'è altra soluzione ?
cioè io una l'ho trovata creo un recordset temporaneo ed uso quello l'ho 
provato e funziona
assegno tramite gli ubound i campi a runtime
...la tua è un casotto da appliccare perchè i report sono tanti....
Ora il problema è un altro via codice faccio una cosa del genere:
uPeriodo.SetUnboundFieldSource "{tab.nomecampo}"
solo che a volte la query è complessa e non sempre posso mettere il nome 
tabelle ad esempio nelle join etc.
come risolvo ?
grazie
ciao


Credo di aver capito il problema solo non so come risolverlo:
Io ho una query molto complessa con join etc.
-la eseguo e va tutto ok
-poi eseguo un while per copiare tutti i dati della query (elaborati) dentro 
un altro recordset
infine setto con crystal il nuovo report come sorgente dati solo che lui 
come campi punta sempre a quelli vecchi (perchè nel nuovo i nomi sono 
cambiati)
se avete capito potete darmi qualche aiuto ?
grazie
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Word questo sconosciuto..

Sono un novello quanto ignorante manipolatore di vb5..
Sto cercando di pilotare word ,o meglio stampa unione del word, per la
creazione di buste e di lettere in automatico....
Non so nemmeno da che parte iniziare....ho visto che si possono limitare i
campi e record con tab o altro !><.;. ma mi serve decisamente aiuto...
nemmeno F1 mi aiuta HELP....
Grazie a tutti .....    Paolo

...
