mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: E' POSSIBILE COLLEGARSI A INTERNET???

Volevo sapere se è possibile collegarsi a internet, senza utilizzare una
connessione di Accesso Remoto.
Esiste un controllo in grado di passare il Nome Utente e la Password?
Se si potete darmi un esempio scritto???
Grazie anticipatamente
Fulvio

Se si potete darmi un esempio scritto???
Dai un 'occhiata sul mio sito. Accesso Remoto lo usi sempre: forse intendevi "senza visualizzare la
finestra di connessione di Accesso Remoto"....
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
---------------------------------------------------------------------------

Mi stai dicendo che non esiste la possibilità di collegamento senza
utilizzare Accesso Remoto?

utilizzare Accesso Remoto?
Che io sappia, no. Comunque cos'è esattamente che volevi?


Carino il tuo sito!!!!
Ho trovato tutto cio' di cui avevo bisogno. Grazie ancora per l'aiuto.
Ciao Fulvio

Ho trovato tutto cio' di cui avevo bisogno. Grazie ancora per l'aiuto.
... evidentemente ti bastava non visualizzare la finestra di accesso remoto... ;-)))


Scusa se ti rompo per l'ennesima volta....
Utilizzando il tuo software, mi sono accorto che se durante un collegamento
sbagli a digitare la password o il nome utente, il programma si disconnette
senza avvisarti del problema.
Il server non ritorna un codice di errore dove è possibile identificare il
problema? (ES: Nome o PW non validi!)
Mi sembra che nella routine del TIMER vi siano alcune costanti tipo
"RASCS_..........." che dovrebbero assolvere questo dilemma. Però a quanto
pare se qualcosa nel collegamento non funz. si disconnette visualizzando
sempre lo stesso msg.
Ciao Fulvio



Ci darò un'occhiata...


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

Ciao a tutti.
da tempo mi stavo chiedendo come funzionano gli algoritmi per crittare i
testi, cosě mi stavo chiedendo se qualcuno mi sa dire dove posso trovare
info a riguardo, esempi in vb e roba simile.
Grazie


http://www.enricozimuel.net/
ad esempio!
--
Il Wodkino Nazionale č a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 ...se cercate bene da qualche
parte c'č anche il forum!

 wrote in message
news:gCPta.89411$K35.2...@news2.tin.it...

un articolo introduttivo lo puoi trovare qui
http://www.redangel.it/articoli/articolo.asp?cat=10&art=5
ciao
-- 
Fabio Angela (aka Red Angel) ICQ: 95966807
http://www.redangel.it
 : il portale sulla programmazione
Newsgroup: it.comp.lang.visual-basic
Titolo: Sempre problemi con GetRows

Tornando al problema su GetRows, ho letto che puo' essere che questa
funzione non ricavi tutti i record del RecordSet.
Ho fatto una funzione che restituisce un array variant.
Quando faccio questa assegnazione: varArray = rst.GetRows, non mi venmgono
restituite tutte le righe.
Grazie a Lorenzo ho creato un rst il cui valore .RecordCount e' = a 210. Se
faccio l'UBound(varArray) pero' mi viene 11.
Qualcuno mi sa spiegare il motivo?
Grazie.

 wrote in message
8pkgto$2l6$1...@news.flashnet.it...


Ok adesso funziona.
Grazie.
Volevo chiedere, se ho una funzione che restituisce l'array, se questo array
è vuoto, cosa deve restituire la funzione?
Grazie

 wrote in message
news:8pkll1$3uq$1...@news.flashnet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report [Aiuto?]

Sono un pò arrugginito con il Crystal Report vorrei sapere se qualcuno è in
grado di aiutarmi,
il problema è il seguente, voglio lanciare un report dal mio programma VB.
Ho messo il controllo, legato il file rpt ed ora voglio in RunTime
assegnargli una select e lanciare il report non riesco a farlo, i comandi
che ho usato sono :
Dim strSelect as string
strSelect = "SELECT ...... " & _
                 "FROM Prospetto " & _
                 "WHERE PROSPETTO.DATA_ARRIVO = " & Date & " " & _
ReportCamereArrivo.SQLQuery = strSelect
ReportCamereArrivo.PrintReport
Perchè non funziona ?
Grazie in anticipo
--
Michele

 Perchč non funziona ?


Perchè non funziona ?


Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere simultaneamente

Ciao!
Ipotesi:
Scrivendo ad esempio su un Text1 come posso far scrivere simultaneamente
su un Text2 nello stesso form ???
Ti prego Help!!

Se non ho capito male.
Nell'evento CHANGE di text1 scrivi
Text2=Text1
Bye

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiunta di Excel

Ciao a tutti,
sto costruendo un aggiunta di Excel che, a richiesta  inserisce nella
cartella di lavoro un nuovo foglio, lo formatta in un certo modo, aspetta
l'immissione di dati e  costuisce i grafici relativi.
Ogni volta poi che nel foglio viene modificata un cella, compare (nel
foglio) un controllo ActiveX "Calcola".
Come si fa ad generare l'evento Click del controllo?
Grazie
Nico


Newsgroup: it.comp.lang.visual-basic
Titolo: Passare da VB a .NET

Ragazzi dovrei incominciare a migrare da VB6 a .NET.
1) Quante versioni di 
VB.NET
 sono comparse? Se non sbaglio ce n'č piů di 
una...
2) (Piů importante!) Quale libro di F. Balena mi consigliate per capire 
il nuovo modo di lavorare?
-- 
Quando noi ignoranti eravamo di piů, tutto era piů bello (A. Celentano).
  ___   _   ___ _  _______   _______ ___
|   \ /_\ | _ \ |/ / _ ) \ / /_   _| __|
| |) / _ \|   / ' <| _ \\ V /  | | | _|
|___/_/ \_\_|_\_|\_\___/ |_|   |_| |___|
--
GIGAMAIL By X-Privat - 
http://www.x-privat.org/gigamail.php

 nuovo modo di lavorare?
Programming Microsoft Visual Basic .NET 2003
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://blogs.ugidotnet.org/corrado/

|___/_/ \_\_|_\_|\_\___/ |_|   |_| |___|
Ciao, 
Parlando del Balena di "Progammare microsoft visual basic .net" ne
esistono 2 versioni una per il vecchio framework (con vs2002) ed una
per il nuovo (vs2003).
Ho acquistato solo la seconda, a quanto ho sentito la traduzione della
prima in italiano era veramente orribile.
Non è un manuale da consigliare ad uno "di primo pelo" ma credo che tu
abbia superato da un pezzo quel periodo.
Se poi non ti piace lo puoi sempre usare come corpo contundente, vista
la sua corposità.
Se vuoi spendere meno ci sono anche i manuali di Hoepli/Wrox.
=======================================================================
Se mi vuoi scrivere togli le maiuscole
cteniza...@hotmail.com
=======================================================================
Newsgroup: it.comp.lang.visual-basic
Titolo: Raccoglire dati da un file xml da Browser

Ciao a tutti.
Vi pongo il mio problema.
Ho una funzione che dato un certo valore XY, apre una pagina web
http://mioserver/Controlladato.xml?dato=
<xy> .
ho pensato di utilizzare il  browser di default con una chiamata
shellexecute.
Fin qui, potrebbe anche andare bene, ma ...io devo recuperare alcune
informazioni all'interno della pagina resituita.
Il problema è come accedo a quel file visualizzato? è possibile salvarlo in
locale senza affidare questa operazione all'utente?
Una volta aperto il file, so come fare a recuperare i dati...
La cosa ottimale, sarebbe quella di non far vedere all'utente la finestra
del browser ma solo un maschera in cui inserito il dato da cercare, si
riempiono i restanti campi con i valori restituiti dal file.XML
Non so se mi sono spiegato...ma io e l'italiano siamo lontani parenti ;-)
-- 
Casty
http://iatter.altervista.org

 informazioni all'interno della pagina resituita.
usa un oggetto webbrowser.
in questo modo avrai accesso a tutti gli elementi della pagina raggiunta.
-- 
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

 raggiunta.
Grazie mille!!!
ho cercato un pochino in rete su come utilizzarlo per salvare il file e
sembra funzionare...non parlo troppo forte....
-- 
Casty
http://iatter.altervista.org

 Una volta aperto il file, so come fare a recuperare i dati...
Usa Inet. E' più leggero del webbrowser ed è specifico per problemi come il
tuo.
bye
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.sinapsi-antispam.tk
http://www.nicolaottomano.it/sinapsi.htm
Ingrosso Orologi.
http://www.supertop.it
email spamtrap: 
spam...@nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Disattivare Ctrl + Alt + Canc e Alt + Tab con XP

Come posso fare a disattivare le combinazioni di tasti Ctrl + Alt + Canc e
Alt + Tab con Windows XP? Ho provato con la funzione SystemParametersInfo&
ma non li disattiva affatto, a differenza di quello che il mio manuale dice
(Visul Basic 6 Tutto & Oltre, Rob Thayer)
Ringrazio possibili "risponditori" anticipatamente
Feli
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

(Visul Basic 6 Tutto & Oltre, Rob Thayer)
Eh, non te la cavi con la SystemParametersInfo :-(
Trapping Special Key Events using a Low Level Keyboard Hook
http://www.mvps.org/vbnet/code/hooks/lowlevelkeyboardproc.htm
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: creare pgm eseguibile in background

Qualcuno sa come creare un pgm VB6 eseguibile come se fosse un servizio
windows(orologio, firewall, antivirus .....) quindi in background?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 background?
Hai già fatto una ricerca su 
groups.google.it
?
http://groups.google.it/groups?q=servizio+visual+basic
Se ne è discusso diverse volte...
Leggi i post precedenti, ed eventualmente riformula una domanda più 
specifica.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 windows(orologio, firewall, antivirus .....) quindi in background?
Questo russo ha fatto un buon lavoro:
http://www.smsoft.ru/en/ntservice.htm
Guarda anche qui:
Microsoft Knowledge Base Q137890, Q170883, Q175948,
http://msdn.microsoft.com/library/techart/msdn_ntsrvocx.htm
,
http://msdn.microsoft.com/library/periodic/period98/service.htm
,
http://msdn.microsoft.com/library/periodic/period98/vb98j1.htm
http://vbwire.com/advanced/howto/service.asp
http://vbwire.com/advanced/howto/service2.asp
Bye
Raf

 windows(orologio, firewall, antivirus .....) quindi in background?
Questo russo ha fatto un buon lavoro:



Dovrebbe essere lo stesso autore di questo esempio
(con il codice)
http://www.freevbcode.com/ShowCode.asp?ID=4317
NT Service in VB6 Without NTSvc.ocx
ciao
  Stefano

 ha scritto nel messaggio
news:mlm9k1lv806anv79l...@4ax.com...

Proprio lui... in effetti non trovavo pių il link che hai postato tu, cosė ho
indirizzato l'op direttamente al sito.
Ciao
Raf

 windows(orologio, firewall, antivirus .....) quindi in background?
Ti faccio osservare che stai riproponendo, alle 20.21, la stessa 
domanda posta in mattinata, a cui avevi ricevuto risposte.
Ciao
Alberto
-- 
Ma noi no
Newsgroup: it.comp.lang.visual-basic
Titolo: ACTIVEX NON PUÒ CREARE L'OGGETTO

ECCO LE DLL incriminate.
Una o piů di queste, dopo installazione o update, non fann piů funzionare il
programma non funziona piů
sotto win98 se non lasciando le sue originali.
La risposta durante l'accesso al file mdb:
ACTIVEx NON PUŇ CREARE L'oggetto.
Cioč quando tratta o vuole aprire il file MDB.
Riproponendo le DLL precedenti tutto rifunziona OK.
Lo strano che appunto su due dei miei PC non danno alcun problema!
Le stesse copiate a mano, danno lo stesso risultato, quindi risulta che una
o piů di queste sono colpevoli di non funzionare su altri PC.
Salvo errore di trascrizione:
DAO360.DLL
MSADO15.DLL
MSADOR15.DLL
MSADOX.DLL
MSJRO.DLL
ASYCFILT.DLL
COMCAT.DLL
COMCT332.OCX
MSCOMCTL.OCX
MSCOM32.OCX
MSDATGRD.OCX
MSHFLXGD.OCX
MSMASK32.OCX
MSSTDFMT.OCX
MSVBVM60.DLL
MSWINSCK.OCX
OLEPRO32.DLL
STDOLE2.TLB
TABCTL32.OCX
COMDLG32.OCX
Ora copiarli uno alla volta, resettare ecc.. risulta forse lunga la
storia... ma la gabola c'e'.
Quali potrebbero creare un difetto di lettura sul file MDB dando appunto al
tentativo di apertura creazione:
ACTIVEX NON PUŇ CREARE L'OGGETTO?
E perchč il mio si  e su altri no?
Il dilemma continua... sig!
ciao e grazie per l'aiuto.
Fr @ nco

 ha scritto nel messaggio
news:9h2u7c$fca$1...@news1.sunrise.ch...


 ha scritto nel messaggio
news:9h2u7c$fca$1...@news1.sunrise.ch...

A me č successo lo stesso problema quando il mio programma faceva
riferimento agli ADO 2.6.
Una volta cambiato il riferimento ad ADO 2.5 (vanno bene anche 2.1 o 2.0),
sui computer sui
quali l'ho installato č endato tutto bene !!!!
Prova controllare la versione degli ADO
Ciao
Franco L.

 > E perchè il mio si  e su altri no?


 Prova controllare la versione degli ADO
Sry.. in quale/i dll/ocx li trovi?
Si fa spessa la faccenda... accidenti... ma qualche cosa cambia tra il nuovo
e il vecchio ma non so come e quale...
Mi sa che devo farle passare una a una! ma poi perchè qui da me funziona e
sull'altro PC solo con le vecchie DLL/OCX?
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: hwnd parent di un'applicazione visual basic

Mi servirebbe sapere se č possibile definire (come per una dialog in visual
C)
e se sě come, l'hwnd dell'owner window di un'applicazione visual basic.
Grazie.
Paolo

e se sě come, l'hwnd dell'owner window di un'applicazione visual basic.
Ogni finestra (form o control) in vb ha la proprieta' hWnd.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Istruzione LIKE in ado data control

In una applicazione utilizzo ado data control con ado grid. La proprietą
recordsource dell'oggetto data č impostata usando una istruzione SQL contenente
una clausola WHERE con l'opertaore LIKE. L'istruzione SQL in questione
restituisce i record esatti se la eseguo in MSACCESS ma l'oggetto data non
restituisce alcun record. Percaso l'operatore LIKE non č supportato
dall'oggetto data? Qualcuno sa aiutarmi?
-- 
Posted from 
adsl-50-55.38-151.net24.it
 [151.38.55.50] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 dall'oggetto data? Qualcuno sa aiutarmi?
E' supportato.
Probabilmente c'è qualche altro errore.
Ci fai vedere il codice?
Ciao,
Carlo.

 Carlo.
HO RISOLTO! USAVO IL SEGNO * INVECE DEL SEGNO %.
GRAZIE COMUNQUE.


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

Buongiorno a tutti.
E' possibile in Visual Basic, rilevare l'smtp configurato sul
proprio pc? 
Grazie a tutti
-- 
Postato da Alice Newsgroup: lo usi da web ma con le funzioni del newsreader 
http://newsgroup.alice.it
Gerarchie it, italia, it-alt, tin, it.binari. Unico!

 proprio pc?
si, servirebbe anche a me. uso 
vb.net
 ma se trovate roba vb6 va bene
lo stesso.
Newsgroup: it.comp.lang.visual-basic
Titolo: Bug oggetto printer con Access 2003 - confermato da Microsoft Corporation

- Avvia Access 2003
- Crea un nuovo database (formato 2000 o 2002/2003)
- Crea un report ed aggiungi un'etichetta nella sua sezione Corpo
- Salva il report come Report1
- Copia Report1 in Report2
- Apri Report1 ed inseriscici Report2 come sottoreport
- Salva Report1
- Crea una maschera e, usando il wizard, inseriscici un pulsante che
apra Report1 in anteprima
- Vai nel VBE all'interno dell'evento Click del pulsante
- Cambia le seguenti due righe
stDocName = "Report1"
DoCmd.OpenReport stDocName, acPreview
con queste quattro righe
stDocName = "Report1"
Printer.PrintQuality = acPRPQMedium
DoCmd.OpenReport stDocName, acPreview
Printer.BottomMargin = 5
- Salva la maschera come Maschera1
- Apri normalmente la maschera
- Premi il pulsante
- Eccoti il bug scoperto
Ho contattato Microsoft Italia. Loro hanno informato
Microsoft Corporation, la quale ha risposto confermando che si tratta
di un bug di Access 2003 e che sarà corretto. Non hanno però fatto
sapere se sarà corretto mediante una patch specifica o con il Service
Pack 2 di Office 2003.
Non troverai alcuna documentazione riguardo a questo bug su internet
(né sul sito web di Microsoft né su MSDN né da altre parti) fino a
quando la correzione sarà stata sviluppata.
Spero che queste informazioni possano aiutare.

 Spero che queste informazioni possano aiutare.
Grazie, e' sempre utile tenere traccia di queste informazioni.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: Utilizzare codice in C

 trascrivere.
Francamente non ho ben capito cosa vuoi fare. Se vuoi utilizzare una 
"funzione" scritta in C la metti in una dll liscia e la richiami da VB 
(nella sezione del tuo link c'è un articolo che ti spiega come fare). Se è 
una "classe" C++ diventa un po più brigoso. Ho la incapsuli in un controllo 
activeX usando librerie tipo ATL, oppure potresti provare con una dll liscia 
che al caricamento crea un' istanza della classe (una class factory) e ti 
scrivi una funzione C che fa da interfaccia per ogni funzione membro della 
classe che vuoi esportare. Mi raccomando occhio al tipo dei dati della firma 
delle funzioni.
Ciao
Michele
-- 
*** MoxCdBurn ***
Add the cd writing power to your programs!
Open source C++ class and ActiveX control
www.moxcdburn.net
 

[dot.NET - solo visual basic]
Salve a tutti,
come è possibile utilizzare una classe in linguaggio C all'interno del mio 
codice in VB?
E + in dettaglio devo inserire all'interno del mio datagrid il controllo 
DateTimePicker, e visto che dal sito 
http://www.visual-basic.it/areaarticoli.asp
 esiste del codice in C già 
pronto preparato dal Sig. Barillari, volevo sapere come posso utilizzare (se 
è possibile)  la classe scritta C senza doverla trascrivere.
grazie in anticipo e saluti
alberto 

 delle funzioni.
Sě č una classe in C++ e la volevo utilizzare direttamente dal mio codice
VB. Credevo la si potesse importare e utilizzare...
saluti
alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] creare copia temporanea di una classe

Salve,
so che il quesito di seguito forse nasconde un mio errore enorme :)... vi
prego di essere clementi...
se devo creare una copia di una variabile di tipo classe  (da codice) per
poi cancellarla come faccio a far si che l'originale non venga cancellato?
il codice è :
dim a as classe1
dim b as classe1
set a = new classe1
set b = new classe1
set b = a
set b=nothing '<-  a questo punto anche a = nothing
ora come posso fare per far si che b sia una copia di a e non un riferimento
ad a?
Grazie
Davide

 ad a?
Dovresti specificare cosa intenti per copia.
immagino tu voglia dire che tutte le proprietà siano impostate con gli
stessi valori.
Per quanto ne so io devi assegnare manualmente i valori per entrambe.
Saluti

 ad a?
non puoi copiare in quel modo.
DEvi copiare ogni variabile e array :))
Magari dai un'occhiata al propertybag dove puoi memorizzare tutte le
variabili e copiarle in una volta sola...
Ci sarebbe l'api  copymemory però non devi usare variabili che allocano
memoria dinamicamente.Ma anche in questo modo non so quanto sia applicabile
ad una classe.Vb gestisce un po le cose a modo suo . :)))
ciao

 variabili e copiarle in una volta sola...
temevo fosse la triste verità ....:(
volevo snellire un pò il codice.. proverò con la property bag .. grazie per
l'info...
Davide

 Per quanto ne so io devi assegnare manualmente i valori per entrambe.
infatti č quello che faccio. .speravo di poter snellire un poco il codice...
grazie lo stesso
davide

 ha scritto

Ciao
Scusami, forse sono io che sono lento a capire, ma ho provato ad assegnare
alla classe1 due proprieta' stringa pippo e pluto. Quando setto "b" a
nothing l' istanza della classe originale "a" mi rimane cosi' com'era e non
va a nothing. Infatti facendo un degug.print delle proprieta' queste vengono
regolarmente stampate ed anche nella finestra della variabili locali non si
vede mai "a" andare a nothing. Ho capito male io quello che vuoi fare o c'e'
qualcosa che sfugge ?
Ciao
Michele

 qualcosa che sfugge ?
hai fatto tutto giusto.. io uso vb5 e quando metto b=nothing anche a mi va a
nothing... :(
mi devo decidere a passare al 6 :(
ciao
Davide

 l'info...
Devi rendere persistente la classe, in modo che possa esserne fatta una
copia "fisica".
Mai fatto, ma so che sul sito comune c'è qualcosa, in particolare Moreno ha
scritto un articolo sull'argomento.
Ciao

 mi devo decidere a passare al 6 :(
Ahhh! Allora c' era qualcosa che mi sfuggiva. Come non detto.
Ciao
Michele
Newsgroup: it.comp.lang.visual-basic
Titolo: CERCO URGENTEMENTE UN DECOMPILATORE BASIC...

Cerco urgentemente un decompilatore per Visual Basic (possibilmente
Visual Basic 5).
Ringrazio tutti anticipatamente
Artemis 23am

 Ringrazio tutti anticipatamente
Non trattenere il fiato mentre lo aspetti...
... il decompiler per VB5 NON ESISTE !
Zeross

 wrote:
 " NON ESISTE "
http://www.support.ems.ru/~gold/vb5/index.html


 
http://www.support.ems.ru/~gold/vb5/index.html
AHAHAHAHAHA.... ma davvero credete a tutto quello che leggete ?
Mah...
Cmq sia ho voluto fare una prova... gli ho dato in pasto un
EXE VB5 costituito da un Form e un CommanButton che se
premuto visualizzava un MsgBox.
Ecco il risultato (penoso).....
Progetto1.vbp===================
Type=Exe
Form=Form1.frm
Startup="Form1"
ExeName32="Ciao.exe"
Command32=""
Name="Progetto1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
CompilationType=0
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
ThreadPerObject=0
MaxNumberOfThreads=1
Form1.frm==========
VERSION 5.00
Begin VB.Form Form1
   Caption         =   "Prova decompilazione"
   ClientHeight    =   1320
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   3120
   LinkTopic       =   "Form1"
   ScaleHeight     =   1320
   ScaleWidth      =   3120
   StartUpPosition =   3  'Windows Default
   Begin VB.CommandButton Command1
      Caption         =   "&Ciao"
      Height          =   375
      Left            =   240
      TabIndex        =   0
      Top             =   480
      Width           =   2535
   End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Scusate... ma... il codice dell'evento Command1_Click ???
La mia msgbox dov'è sparita ?
Fagocitata dalla Grande Rete ?
Chi ha premuto il Grande Tasto Annulla sul mio codice ?
Domande che non troveranno risposta in questa vita...
...così come non si troverà mai un decompiler per VB5.
Passo e chiudo! Click!
Zeross





_quali_ altri linguaggi hanno il decompiler?
Se stai parlando di disassembler (che, per come si intende generalmente il
termine, NON e' un decompiler, anche se tecnicamente lo e'), allora VB
compilato in nativo si comporta pressoche' come gli altri linguaggi.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Intercettare il Login su windows

'Sera a tutti...
se utilizzo la funzione sgetcomputer name, ottengo il nome del pc
sul quale sto lavorando, ma (è questa la domanda) se volessi sapere
l'id utente con il quale qualcuno si connette?
Grazie 

 ha scritto nel messaggio 
news:etrn89$esb$1...@nnrp-beta.newsland.it...

Api GetLoginName
Mandi 

 l'id utente con il quale qualcuno si connette?
oppure ENVIRON("USERNAME")
Newsgroup: it.comp.lang.visual-basic
Titolo: <no subject>

Subject: Stampa con Dataenvironment
Ciao a tutti.
Avrei una domanda da porgere.
Vorrei usare DataEnvironment per poter stampare un datareport collegandomi
ad un database ODBC
Nessun problema ad impostare connection e command, ma in questo modo, il
report mi mostra tutti i record presenti in database. Come posso impostare
un filtro che mi mostri soltanto i record che desidero, tutto via codice e
non direttamente in fase di progettazione ?
Grazie
-- 
Posted from 
mail-3.tiscalinet.it
 [195.130.225.149] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:NFBBIKPPILHKFJGHMG...@tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto setup x VB

	Ho creato una mia applicazione VB, ora ho la necessità di creare dischetti
di setup, dove posso trovare il software ? 
Grazie 
s...@netsystem.it

 scritto nell'articolo
<01bcbaf3$0d562560$3b8af3c2@maverick>...


nell'elenco delle applicazioni di VB c'è anche il generatore di setup
(facile da usare e veramente efficace)...

Newsgroup: it.comp.lang.visual-basic
Titolo: VI SUPPLICO DATEMI UNA MANO SONO REALMENTE DISPERATO!!!

Naaaa!!! Ho cambiato sistema operativo ... da win98 a NT!
E non riesco piu' a utilizzare nessun componente ocx!!!
Se apro un nuovo documento e faccio clic destro sulla barra degli
strumenti e scielgo componenti mi da il seguente messaggio d'errore:
Classe non registrata.
Si sta cercando di l'oggetto con CLSID:
{0002E005-0000-0000-C000-000000000046 }.
Datemi una mano vi prego!!!!
P.S. Ho installato il service pack 3 dopo aver disinstallato tutto,
reinstalalto in versione minima e aggiunto successivamente tutte le
parti che mi interessavano (consigliatomi).
grazie, grazie
Werewolf: "Questo e' l'ultimo colpo lo sento"!
gio...@iol.it

// \/\//\\/E++
void message () {
Uhmm, MOOOLTO STRANO DAVVERO!!
Lavoro col vb in NT da sempre e non ho avuto mai questi problemi :-)
Allora, vediamo: io ho installato NT, ilstallato il modem, dopo RAS, SOLO
DOPO, il service pack3 e infine l'explorer4.
L'explorer dà funzioni a delle chiavi nel registro che nt non crea senza
l'aggiornamento di explorer.
Un consiglio? Disintalla nt, lo reinstalli, installati il modem e ras, dopo
il service pack 3 e infine l'explorer SENZA l'aggiornamento del desktop, poi
lo disinstalli (explorer), se vuoi ti metti netscape 4.5 free (come ho fatto
io) e installi quello che ti pare...
E' una procedura ostica, ma permette un corretto aggiornamento senza difetti
e problemi.
Se si installano in altra maniera o ordine nt crea problemi di instabilità
(l'ho provato sul mio pc)
Per il fatto che bisogna installare prima di tutto modem e ras è un difetto
della versione italiana che non verrà risolto, se hai la versione inglese,
lo puoi installare pure dopo. (forse si risorverà col service pack 4 (per
ora è beta))
Comunque ti consiglio di installarti il vb con installazione custom e
installare TUTTo di un colpo e poi ci applichi il service pack 3 del vb
(anche stavolta come ho fatto io)
}
// \/\//\\/E++
// \/\//\\/E_SOFT '98
// 
wave...@iol.it
// 
members.xoom.com/wave_soft
// Mental-motion;
// Programmer and much more :-))



.... ho provato ad installare Internet Explorer 4.01 service pack 1 e
adesso funziona tutto alla perfezione ... tranne il sistema operativo
aggravato da altri bachi ma l'importante e' che adesso posso
finalmente utilizzare VB5!!!
Grazie a tutti e scusate per il disturbo!
Werewolf: "Chi fa per se fa per tutti"!
gio...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: API per selezionare il testo nel Textbox

Qualcuno sa dirmi che funzione API o che messaggio usare per selezionare tutto
il testo all'interno di un textbox. Non sto a spiegarvi perche' ma praticamente
devo fare l'equivalente delle proprieta' selstart e sellenght con le api.
Grazie mille
Jerry
-- 
Posted from [151.99.182.101] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 devo fare l'equivalente delle proprieta' selstart e sellenght con le api.
Public Const EM_SETSEL = &HB1
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
        (ByVal hwnd As Long, _
        ByVal wMsg As Long, _
        ByVal wParam As Long, _
        lParam As Any) As Long
   Text1.SetFocus
   Call SendMessage(Text1.hwnd, EM_SETSEL, &H0, ByVal -1)





Forse Sbaglio però prova con 
questo    


 


Private Declare Function SendMessage Lib "user32" 
Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As 
Long, lParam As Any) As Long


 


Private Const EM_SETSEL = &HB1


SendMessage text1.hwnd,em_setsel,0,-1


 


 


CIAO




Dove si possono trovare i valori delle costanti da passare alla funzione
sendmessage per eseguire anche altre operazioni ???

 sendmessage per eseguire anche altre operazioni ???
Nell'Api Text Viewer.
Quelli relativi agli oggetti Edit Control (Textbox) e RichEdit
(RichTextBox) sono elencati sotto il prefisso EM_*
Per gli altri oggetti di sistema, che hanno un oggetto corrispondente
in VB (listbox, combobox ecc.) occorre consultare MSDN o
il Platform SDK.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Risolvere gli indirizzi IP da VB

Se qualcuno ne ha mai fatto uso, vorrei sapere se esiste in Visual Basic una
procedura per ottenere il nome dell'host e il relativo dominio conoscendone
l'indirizzo IP (un qualcosa simile alla funzione GetHostByAddr() presente
nel
C++).
Grazie anticipate
-------------------------------------
Maurizio "Diaspar" Sani
e-mail : 
ms...@bin.it

Ho gia' postato questo messaggio in passato,ma a causa di problemi con il
server news non so se qualcuno ha risposto. Comunque, ecco la domanda :
Vorrei sapere se esiste in Visual Basic una procedura per ottenere il nome




Newsgroup: it.comp.lang.visual-basic
Titolo: Dos e richtextbox

c:\io.txt) mi da errore dicendo che mancano i parametri (-dc) allora ho
pensato di salvare il comando su un file .bat e li funziona ma il prompt di
msdos rimane aperto e cosě ho inserito il comando exit(alla fine del file
bat) ma niente non funziona.
Domande
1) Come posso tramite il comando I=shell spedirli tutto il comando
(miofile -dc >c:\io.txt)  senza usare il file bat
2)Come posso salvare da una richtextbox in formato testo(txt) ric.savefile
"c:\desti",cosa?
Scusate ma non mi ricordo + o provato con Text ma non funziona!!!!
Grazie in anticipo

 "c:\desti",cosa?
(cdl e' un common dialog)
RTF.SaveFile CDL.FileName, rtfText

Newsgroup: it.comp.lang.visual-basic
Titolo: Informazione sull'uso di ORACLE in VB6

Salve a tutti,
io sono nuovissimo di qui e quindi mi scuso da subito se porrò una domanda
magari già trattata, ma mi serve un aiuto.
Dunque, devo realizzare una connessione ad un DB Oracle mediante un form in
VB6, ma non so da dove cominciare!!! In effetti, ho già usato VB6 per
realizzare connessioni a DB Access (e fin qui ci riesco abbastanza bene), ma
sull'argomento Oracle/VB6 ho tutto da imparare!!!
Un grazie anticipato a chiunque abbia voglia/tempo di aiutarmi, magari
indicandomi dove reperire informazioni o tutorial a riguardo.
Ciao
Giovanni

VB6, ma non so da dove cominciare!!! 
Prima di tutto occorre una entry nel tnsnames.ora, generabile attraverso
l' utility Net Configuration Assistant. Con questo strumento indichi il nome del server,
il nome del servizio sul server, la porta (1521, mi pare) e dai un nome a questa
configurazione.
Per provarla puoi lanciare 
tnsping <nome_appena_assegnato> 
dalla console.
Per sapere come deve essere la stringa di connessione ADO e' sufficiente
creare un nuovo file .udl, lanciarlo e seguire le istruzioni (scegli il provider
per oracle, indichi nome del servizio, user e password).
Con il pulsante "Test Connection" verifichi che sia tutto ok.
Chiudi il file .udl e riaprilo con un qualsiasi editor di testo:
copi la stringa che contiene et voila'!
-- 
hth, hal

 hth, hal
Grazie 1K per la dritta, hal!!! Sono riuscito ad impostare la connessione al
server del DB e sto cominciando anche a scrivere delle query di retrieval,
avendo aperto un'area di lavoro ODBC e usando i metodi OpenDatabase e
OpenRecordset.
A questo punto, se puoi, mi dovresti dare un altro suggerimento, in quanto
OpenRecordset (com'è logico) non mi è d'aiuto per le query di update e non
ho mica capito come fare a creare tabelle e/o inserire/cancellare record.
So di essere un po' esigente, ma se non ti scoccia e se hai tempo, gradirei
ricevere nuovamente il tuo aiuto!!!
Comunque, grazie lo stesso!!!
Ciao
Giovanni

ricevere nuovamente il tuo aiuto!!!
Dai un' occhiata ad ADO, anzi, puoi partire da un articolo su msdn che confronta
DAO con ADO:
cerca "Retrieving and Modifying Data" su msdn (anche online)
-- 
ciao, hal

 ciao, hal
Ciao
Giovanni
P.S. l'OT nel subject l'ho messo perche' trattasi solo di ringraziamenti e
non di un'argomentazione di pubblico interesse!!! ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Vi può servire questa ? :-)

Guardate che ho trovato nel mio navigare alla ricerca di nuovi siti VB...
http://www.geocities.com/SiliconValley/Bit/3240/index.htm
...può servire a qualcuno ? ;-)
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
-
--
---
Curatore della "zona links" de:
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/
Leggete le regole di questo newsgroup:
http://www.murialdo.it/it_lang_vb/docs/Manifesto.txt

 ....
Newsgroup: it.comp.lang.visual-basic
Titolo: interprete di formule in stringhe; senz'altro non esiste.

Buondi' a tutti.
Sto cercando 'qualcosa' che mi risolva questo problemino da nulla . . .
Dim a,b,c,d,x$
a=10
b=20
c=30
x$="((a+b)*c)/2"
d=???(x$)	' d=450.
(??? corrisponde alla soluzione del problema. . . !)
In Clipper e Visual Fox Pro e' molto semplice, in VB credo di dovermi
arrendere.
Se c'e' qualcuno che ha una soluzione (OCX, DLL, source code, etc...)
Grazie !
;-)
Alfredo Volpari

 arrendere.
Non ti arrendere mai ! ;-))
Sul sito Microsoft c'è lo Script Control. E' un' OCX free, devi solo registrarti e scaricarlo.
http://msdn.microsoft.com/scripting/default.htm
 , vai sotto Script Control, poi download ecc.
Una delle funzioni della nuova versione si chiama proprio Eval. :-))
Installalo, poi crea un programmino di prova con un form, un textbox e un commandbutton.
Inserisci questo codice:
'_______________________________
' In generale - dichiarazioni :
Option Explicit
Dim SC1 As New ScriptControl
Dim Variabili As String
Dim Espressione As String
Dim Risultato As String
'--------------
'In Form_Load:
Text1 = "(((a+b)*c)/2)"
'-------------
'In Command1_Click:
    SC1.Language = "VBScript"
    Variabili = "a = 10"
    Variabili = Variabili & vbCrLf & "b = 20"
    Variabili = Variabili & vbCrLf & "c=30"
    SC1.ExecuteStatement Variabili
    Espressione = Text1
    Risultato = SC1.Eval(Espressione)
    MsgBox Risultato
'_________________________________
Dai il run e divertiti a cambiare il contenuto della text box e fare click sul pulsante...
Ricorda che puoi usare tutti gli operatori standard, quindi puoi inserire ad esempio
(a>b) or (c>b)  e ottenere il risultato "Vero", oppure cose simili.
Lo Script Control è in pratica un vero interprete Visual Basic, sia pure con qualche
limitazione, quindi puoi inserire in una textbox multiline un programma completo di
if then else, select case ecc. ed eseguirlo utilizzando .Execute al posto di Eval.
Sul Sito Comune (URL nella firma in fondo) c'è anche, alla voce documentazione,
il manuale del VBScript.
Se hai bisogno di altro, chiedi pure :-))
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: db grid e database

qualcuno sarebbe cosě gentile da spiegarmi, ed al limite mandarmi un esempio
di codice, come legare i dati di una tabella di database ad una griglia?
Grazie in anticipo!

 ha scritto

1. usi il data form wizard di vb, che e' (vb5) regolato per un dynaset sql,
ma puoi poi modificare se credi per usarlo con tabelle indicizzate.
2. metti e setti un controllo data, metti una dbgrid e come datasource setti
il datacontrol, poi clic dx sulla griglia -> proprieta'
3. un esempio in pctrix sul mio sito. e' vb5/dao, ma suppongo che con ado la
logica sia simile. oddio, conoscendo ms, "logica" e' una parola grossa...
nb che del datacontrol e della datagrid ado ci sono infiniti post che dicono
peste e corna, ultimo quello di davide di poco fa. dato che dici dbgrid
suppongo tu intenda dao, ma non si sa mai.
--
ciao, j.
www.sundaysw.com

 suppongo tu intenda dao, ma non si sa mai.
Qualcuno allora mi legge!!!!!
:-)
Si, datagrid ha dei problemi di refresh (più o meno documentati) in modalità
bound, se però la usi in unbound seguendo l'esempio che trovi nel mio post
poco sopra questo (oggetto Ado funziona male) dalle prove che ho fatto mi
sembra che non abbia problemi.
Dico "mi sembra" perchè "non ha problemi" con Ado è una parola grossa.
Davide

 :-)
si', non temere, c'e' vita sulla terra :)
j.earth

Newsgroup: it.comp.lang.visual-basic
Titolo: [Semi OT] Info sul file

Ciao a tutti,
è possibile secondo voi conoscere in una rete LAN(tramite VB6 ) il Mac 
Address / l'IP / l'utente dell'ultimo computer che ha modificato un file in 
rete?
Grazie
Ciao 

Gianricus ha scritto:

Il file lo modifica solo un tuo programma oppure vi si può accedere in 
altri modi?
bye
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/sinapsi.htm
email spamtrap: 
spam...@nicolaottomano.it

Gianricus wrote:

no, a meno che non attivi l'audit di WinNT/2000/XP
(vedi: 
http://support.microsoft.com/default.aspx?scid=kb;en-us;301640
)
In tal caso puoi interrogare l'Event Log di Windows alla ricerca degli 
eventi che ti interessano, relativi al file da monitarare.
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

Newsgroup: it.comp.lang.visual-basic
Titolo: Fatturazione vb.net

Qualcuno sa indicarmi dove poter trovare un esempio pratico completo
per la gestione della fatturazione ?

 per la gestione della fatturazione ?
Mi sembra ci sia anche la versione .net:
http://www.fatturafast.org/
Se poi parli di regole contabili ecc. devi fare l'analisi con uno che ne
sappia. Se invece parli di stampare una fattura su carta con gli articoli e
i dati del cliente, allora è come una normale stampa.
Newsgroup: it.comp.lang.visual-basic
Titolo: Help per gestione modem

Salve, qualcuno mi sa dare delle indicazioni (sono un semi-principiante) per
gestire un modem interno con VB?
Vorrei fare una pseudo segreteria telefonica con le seguenti operazioni:
- Conteggio squilli; dopo x squilli prendere la linea
- Avviare un file wav preregistrato
- Staccare la linea
Il modem non è voice, ma pensavo di fare un collegamento hardware dalla
scheda sonora alla linea telefonica
Saluti e grazie

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

Sto realizzando applicazioni in VB6 che installo nei PC dei miei clienti.
Il problema che non riesco a risolvere è come riuscire a diminuire lo spazio
occupato dal pacchetto creato con l'utilità di VB6. Per applicazioni di 20 k
di codice, non posso creare pacchetti di più di 20 MB !.
Qualcuno sa risolvere questo problema ?
Grazie Massimo.



...


trovi dall'utente finale.
Ecco, ma che ci vorrebbe a fargli compilare per bene?
E' possibile che, con tutti i miglioramenti che apportano con le nuove
versioni, debba sempre rimanere la compilazione zoppa che per stare in
piedi ha bisogno di 1 MB o piu' di roba?

Carlo <car2...@NOSPAMgeocities.com> wrote in message
36fece63....@news.iol.it...

Come già detto tempo fa, il native code che genera VB5 e VB6
è native a tutti gli effetti. Le DLL di runtime che ci portiamo dietro
dalla versione 1.0 servono (nel caso degli eseguibili native code)
solo per l'interfaccia del programma. Come avrete notato, i
controlli base di VB non sono gli stessi implementati in Windows.
Sono versioni simili, ma proprietari di VB.
Inoltre nella DLL di runtime c'è il codice necessario per far
funzionare gli eseguibili p-code (ecco il motivo per cui ci tocca
smadonnare da mattina a sera sul numero di dischetti necessari
per uno stupidissimo programma da 200 Kb ^^;)
In pratica ora si apre uno scenario in cui sono possibili diverse
strade per far sì di migliorare la prossima versione di VB:
1- Eliminare la compilazione in p-code
2- Eliminare i controlli proprietari e far si che VB utilizzi i
    controlli standard di Windows, oppure mantenere tali
    controlli in una libreria a collegamento statico che possa
    essere linkata nell'eseguibile dal LINK.EXE.
NB: applicando entrambi questi due punti, si eliminerebbe
       la necessità della libreria di runtime.
Preghiamo quindi tutti insieme per non vedere mai
la Microsoft Visual Basic Virtual Machine 7.0
(MSVBVM70.DLL per gli amici). Amen !
Zeross

    essere linkata nell'eseguibile dal LINK.EXE.
Sai che non sapevo che VB usasse controlli taroccati?
E io che credevo fossero griffati "W95"... :(
Beh, questo spiega appunto molte cose... e poi e' vero c'e' anche il
supporto per il P-Code... almeno lo levassero se uno compila
normalmente...
Speriamo!




Newsgroup: it.comp.lang.visual-basic
Titolo: Help Urgentissimo

Come posso unire Unire piu' Recordset (disconnessi ) ?

) nell'altro thread.
Se invece vuoi unire tre tabelle qualsiasi connesse a tre database di tipo
differente (per es. Accesso, Oracle, Excel) in una sola grande tabella penso
che non sia fattibile in un solo passo, ma devi utilizzare una tabella
temporanea (ammesso che la clausola IN 'nomedatabase.mdb' non possa essere
estesa anche ad altre sorgenti).
Comunque dovresti riportare un esempio concreto.
Michele
--
Per l'e-mail togli "xxx".
Home page: 
http://spazioweb.inwind.it/fochinet

Esempio :
Option Explicit
Private adors As New ADODB.Recordset
Private rs2 As New ADODB.Recordset
Private rs3 As New ADODB.Recordset
----------------------------------------------
Private Sub Form_Load()
Dim sqlstring As String
Dim adors As New ADODB.Recordset
Call add
Ora vorrei nel adors i due recordset cioe' rs2 e rs3
End Sub
-------------------------------------------------
Private Sub add()
rs2.Fields.Append "Test", adLongVarChar, 40
rs2.Fields.Append "Test2", adLongVarChar, 40
rs2.Fields.Append "Test3", adLongVarChar, 40
rs2.Fields.Append "Test4", adLongVarChar, 40
rs2.Fields.Append "Test5", adLongVarChar, 40
rs2.Open
rs2.AddNew
rs2.Fields("test") = "CIAO"
rs2.Fields("test2") = "CIAO"
rs2.Fields("test3") = "CIAO2"
rs2.Fields("test4") = "CIAO3"
rs2.Fields("test5") = "CIAO4"
rs2.Fields("test6") = "CIAO5"
rs3.Fields.Append "Test", adLongVarChar, 40
rs3.Fields.Append "Test2", adLongVarChar, 40
rs3.Fields.Append "Test3", adLongVarChar, 40
rs3.Fields.Append "Test4", adLongVarChar, 40
rs3.Fields.Append "Test5", adLongVarChar, 40
rs3.Open
rs3.AddNew
rs3.Fields("test") = "SGR"
rs3.Fields("test2") = "SGR1"
rs3.Fields("test3") = "SGR2'"
rs3.Fields("test4") = "SGR3"
rs3.Fields("test5") = "SGR4"
----------------------------------------------------
End Sub

 Ora vorrei nel adors i due recordset cioe' rs2 e rs3
Sarebbe sufficiente replicare tutte le righe trovate anche sul nuovo
recordset, come per es:
==BEGIN==
Dim F As ADODB.Field, S As String
For Each F In rs2.Fields
    adors.Fields.Append F.Name, F.Type, F.DefinedSize, F.Attributes
Next F
adors.Open
rs2.MoveFirst
While Not rs2.EOF
    adors.AddNew
    For Each F In rs2.Fields
        adors(F.Name) = rs2(F.Name)
    Next F
    adors.Update
    rs2.MoveNext
Wend
rs2.Close
==END==
e poi replicarlo anche per il secondo recordset. Puoi benissimo fare una
procedura che ti replica il contenuto di un record sull'altro (passi due
parametri di tipo ADODB.Recordset).
Fai attenzione ad eventuali errori (null non ammessi, ecc.).

Newsgroup: it.comp.lang.visual-basic
Titolo: Come si fa a far partire applicazioni da vb6?

Come si fa a far partire applicazioni da vb6?
scusate la domanda sciocca...ma mi rompo a cercarlo nella guida!
spero solo che non si fa con il FileSystemObject che è molto palloso...a
volte mi pare che le cose piu semplici in vb diventano piu complicate...tipo
per verificare l'esistenza di un file....oltre alla creazione del
FileSystemObject + ecc ecc c'e un modo piu semplice?
Che ne so tipo come si fa con i file Batch "if exist"!
Grazie  nticipatamente per la risposta!

> scusate la domanda sciocca...ma mi rompo a cercarlo nella guida!
E io mi rompo a risponderti !!!!
Cmq ... cerca nella guida l'istruzione Shell
o usa l'API ShellExecute
--
Ciaps
Stracca
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Cerca le risposte alle tue domande sul Sito Comune del
newsgroup it.comp.lang.visual-basic: 
http://www.murialdo.it/it_lang_vb
Magari prima leggi l'Help in linea!
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Come si fa a far partire applicazioni da vb6?
---CUT---


Dovresti usare il comando Shell, di cui trovi spiegazioni nella guida.
Questo pero' ha un vantaggio-svantaggio, mi spiego. Il comando shell, manda
in esecuzione un qualsiasi programma, ma il tuo programma in visual basic
continua a funzionare, e questo qualche volta non e' un bene, perche' magari
bisogna attendere che il programma lanciato termini la sua esecuzione per
poi proseguire con il programma in basic.

 Che ne so tipo come si fa con i file Batch "if exist"!



Se usi il comando ShellExecute puoi ricavare l'handle di quel programma e
fai un loop di attesa finche quell'handle e' presente...
In rete esistono mucchi di esempi...
-- 
Sidewinder  
---------------------------------------------------------------------
"Every time you try to operate one of these weird black controls that are
 labeled in black on a black background, a little black light lights up
 black to let you know you've done it." - RAEU
---------------------------------------------------------------------

da un'occhio su 
http://members.xoom.it/CesareRizzi
 alla Pagina delle API
ci sono delle API tipo shellExecute, o WinExec che fanno al caso tuo !!
Un consiglio, evita di "romperti a consulate la guida... anche se può
sembrare palloso, è una fonte piena di idee da attingere.
Ciao
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

 scusate la domanda sciocca...ma mi rompo a cercarlo nella guida!
come avrai senz'altro notato dal numero e dal tono delle risposte,
IL NG NON SOSTITUISCE LA GUIDA, LA INTEGRA !
pensa se il tuo pc si rompesse a fare j volte sempre lo stesso for..next :)
ciao pal

 scusate la domanda sciocca...ma mi rompo a cercarlo nella guida!

Newsgroup: it.comp.lang.visual-basic
Titolo: Start da Editor VB6 o da .Exe ?

E' una domanda alla quale avrete già risposto un milione di volte, ma non è
molto che leggo questo newsgroup e non ho trovato sulle faq la risposta al
quesito che sto per proporvi:
Ho creato una routine (Main) che viene mandata in esecuzione prima di
caricare il form principale che mi controlla con l'istruzione
app.previstance che il mio programma non sia già in funzione (nel qualcaso
lo mette in primo piano) ora voglio aggiungere che scelga tra due file
(setup1.txt / setup2.txt) differenti a seconda che parta dall'editor del VB6
o dall'eseguibile già compilato, come posso fare ?
Grazie Luca

"Luca" <x...@xx.xx> ha scritto nel messaggio news:ado629$ffh$1...@news.ngi.it...

Vedi App.EXEName. In EXE restituisce il nome dell'EXE senza estensione, in
ambiente il nome del progetto.
Questo però ti costringerebbe a dare un nome diverso all'EXE rispetto al
progetto. A me non piace. ;-)

"Luca" <x...@xx.xx> ha scritto nel messaggio news:ado629$ffh$1...@news.ngi.it...

Un vecchio trucco e' questo:
Function IsRunningIDE() As Boolean
On Error Resume Next
'le istruzioni debug.xxx non vengono compilate
Debug.Print 1 / 0
IsRunningIDE = CBool(Err.Number > 0)
On Error GoTo 0
End Function
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: open/close/open connesione ado

Dopo aver chiuso una connessione ADO ad un database la connessione mi
risulta aperta ma non valida. Perchè non posso chiudere e riaprire una
connessione?

 connessione?
Certo che puoi chiudere e riaprire la connessione.
Ovviamente devi controllare la gestione delle password, nel senso che non
tutti i DB supportano la "Persist Security Info", ossia la persistenza nella
connectionstring della password. Ma questo ti darebbe problemi alla
riapertura della connessione, non alla chiusura.
Se il tuo problema è in fase di chiusura della connessione, non so
esattamente cosa dirti. A meno che tu non abbia dei controlli settati su un
recordset aperto, e alla chiusura si scatena qualche evento change o simile,
che ti dà problemi.
Ciao
Alberto

 ha scritto nel messaggio
news:1RU_8.15535$s74.4...@twister1.libero.it...
