mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Domanda forse stupida...

Ancora una questione... mi chiedo se l'eseguibile generato con VB6 ha
bisogno di una DLL (che windows 9x non ha di default) o è già "veramente"
eseguibile su tutti i pc con win95...
Ho trovato info solo su VB5!
Grazie,
        Giovanni

eseguibile su tutti i pc con win95...
Le DLL necessarie non sono solo una, ma possono essere più di una, alcune
generali puoi trovarle già installate da altri programmi, altre devi
installarle con il programma di installazione. La lista delle DLL usate la
trovi nel menù Progetto|Componenti

Ciao
Ha bisogno di DLL sue.

...


...

Tutte quelle che ti elenca quando fai la composizione dei dischi
d'istallazione.

eseguibile su tutti i pc con win95...
Se ti limiti a programmare con i controlli standard e con le API serve
solo MSVBVM50.DLL che hanno quasi sicuramente tutti e che si trovano
anche sulle riviste (pure di videogames o shareware in generale)
Le altre servono solo per API veramente particolari o librerie di
controlli aggiuntivi o per i DataBase.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore con TableDefs.Append

Ciao a tutti,
ho questo problema lavoro con Visual Basic 6 + Access tramite DAO ho due 
db gdb e gModDb creati con gWs.OpenDatabase(App.Path + "\xxxxxxx.mdb").
Io vorrei accodare una tabella che appartiene a gModDb a gdb in questa 
maniera:
gDb.TableDefs.Append gModDb.TableDefs("nome")
Però mi dà questo errore:
Tipo:  3367 - Impossibile accodare. Nome di oggetto già presente 
nell'insieme.
Non riesco a capire come fà a dire che l'oggeto in gdb esiste???
Cosa posso fare?...Grazie

Marco ha scritto:

Mi rispondo da solo e potrebbe interessare anche a voi ho trovato un 
codice della Microsoft che funziona, tranne la riga:
to_db.TableDefs.Delete to_db.TableDefs(to_nm)
dove cerca di cancellare la tabella se esiste non funziona il controllo 
melo sono fatto io esternamente.
Come copiare la tabella da un database a altra in VB prof 3,0 all'indirizzo:
http://support.microsoft.com/default.aspx?scid=kb;it;108147

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Form e pagine html

Salve,
come posso far visualizzare una pagina html creata dallo stesso software 
all'interno di un form?
P.S. naturalmente la devo anche poter stampare.
Grazie

 ha scritto

http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/webbrowser/browser_control_node_entry.asp
= 
http://tinyurl.com/bgtvp
http://www.itportal.it/developer/vb/webrowsing/
-- 
hth, ciao, a.
http://www.sundaysw.com
hobbits use their real names

 ha scritto nel messaggio 
news:4umvrdF...@mid.individual.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: Volete guadagnare? è un metodo sicuro legale e poco impegnativo... Leggete non vi costa nulla! by [JoTaRo]

 sono una marea !!! Puoi spedirlo come vuoi, anche con Email, Chat ad
amici!). Te ne bastano 200.
Chiaramente se ne mandi a 200 e piu' aumenti le possibilita' di trovare
ragazzi disposti a fare questo stravagante gioco ! Pensa che tutti quanti
leggono questomessaggio e giocano, nessuno e dico nessuno di loro ci
rimetterebbe nulla, anzi tutti ne trarrebbero beneficio !
Piu' ne mandi e piu' soldi ti arrivano credimi !!!!
Questo è tutto, adesso devi andare nei vari NEWSGROUP e spedire il tutto,
come avrai preso la mano ci metterai un attimo ! E se poi sai programmare,
puoi farlo in modo automatico come me !
ORA LA PARTE PIU' INCREDIBILE.
4 Parte
Dai 200 contatti diciamo che solo 5 persone ti inviano il tutto (media
bassissima, di solito e' piu' alta...almeno la mia). Quindi con il tuo
nome
al 6 posto hai ricevuto 10.000 lire. Quelle 5 persone il tuo nome lo hanno
messo al 5 posto ora. supponendo che anche loro ricevano 5 adesioni tu
sarai arrivato a ricevere 50.000. Ora queste 25 persone fanno altri 200
messaggi ciascuno con il tuo nome al 4° posto e nelle stesse sfortunate
situazioni ricevono solo 5 adesioni.
A te arrivano 250.000. Ora queste 125 persone continuano con la medesima
sfortuna a ricevere sempre solo 5 risposte da 5 persone (il tuo nominativo
è
al 3 posto) ancora con 5 adesioni arrivi a 625 persone e quindi 1.250.000
ire a te.
5 Parte (LA PARTE PIU' BELLA)
Queste 625 persone con altre 5 persone ciascuno e con 200 inviti e con il
tuo nominativo al 2 Posto ti fanno ricevere 6.250.000 !!!!!!. Pensa quando
arrivi al 1 posto...... 3125 con soltanto 5 adesioni e con 200 inviti
mandati fanno arrivare il tutto a 31.250.000 ! Tutto con un investimento
di
16.800 compresi i francobolli da 800 lire cadauno!!!
Tieni conto che 5 adesioni e' un numero bassissimo... pensa con 15
adesioni..........
Senza sognare ad occhi aperti il gioco ha delle potenzialita'
assurde........ basta solo provare...... con un investimento cosi'
basso......
Io ho solo rinunciato a giocare per una settimana al superenalotto dove non
ho mai vinto nulla e nel giro di una settimana mi sono ritrovato un
gruzzoletto corrispondente ad un "4".
Allora perché non provi come me?
Saluti e in bocca al lupo!!!!..
ps.
venite in MIRC nel canale #mole con
un server dalnet dalle 24 in poi
per maggiori informazioni

Se e' legale e guadagni tanto perche' non lo tieni per te?!!

>...Quindi spedisci il tuo messaggio, modificato ad almeno 200 NEWSGROUP
(c'e
ne sono una marea !!! Puoi spedirlo come vuoi, anche con Email, Chat ad
amici!). Te ne bastano 200.
Chiaramente se ne mandi a 200 e piu' aumenti le possibilita' di trovare...
Più ne spedisci, più aumenti la possibilità che qualcuno ti mandi affanculo.
Chiedo scusa al NG: quanno ce vò, ce vò.
Cesare Nicola
Newsgroup: it.comp.lang.visual-basic
Titolo: DA DAO A ADO

Ciao a tutti.
Devo fare il passaggio da DAO a ADO utilizzando MSDE.
Ho già sviluppato un programma con Sql Server come db,ma volevo avere
conferma del fatto che l'unica differenza che devo apportare sta nella
stringa di connessione.
Mi spiego meglio.Con Sql Server passavo una stringa come in esempio:
sStrConnect = "Provider=SQLOLEDB.1;Password=Pwd;Persist Security
Info=False;User ID=User;Initial Catalog=NomeDb;Data Source=NomeServer
Per utillizzare MSDE cosa devo scrivere nel provider???
Ed è l'unica modifica necessaria?
Grazie
Deborah

 Devo fare il passaggio da DAO a ADO utilizzando MSDE.


 stringa di connessione.
[...]
Newsgroup: it.comp.lang.visual-basic
Titolo: Printer con Excel

Utilizzo VB editor di Excel per far girare la sub sotto riportata solo che
mi dà sempre  errore ( necessario oggetto ). Infatti su VBA di excel non
esiste l'oggeto Printer.
Essite un modo per farla stampare ?
Poichè sono agli inizi si prega di fornirmi i dettagli, su come devo
procedere.
Public Sub Stampa()
Dim stringa As String
stringa = "Prova di Stampa"
Printer.Print stringa
Printer.EndDoc
End Sub
Andando su Debug -> C'è ( compila VBA project ) questo significa che posso
compilare il progetto ? Ho provato ma non trovo nessun file *.exe dove viene
registrato ? Compilandolo risolverei il problema ma si può fare con VBA di
excel ?

 procedere.
Vediamo...
VBA non e' nato per fare da linguaggio applicativo, quindi molte funzioni
mancano.
Effettivamente avere l'oggetto Printer sotto Excel, se permetti, e' alquanto
strano.
Cmq, se devi per forza stampare da Excel, il metodo piu' semplice e rapido
e':
1) Scegliere una zona di un foglio da usare come buffer per il testo.
2) Impostare la il buffer come area di stampa con
ActiveSheet.PageSetup.PrintArea = "$??$??:$??$??"
(ovvero, cellainiziale:cellafinale)
3) Usare il metodo PrintOut per stampare.
Per i dettagli dai un'occhiata all'Help
Newsgroup: it.comp.lang.visual-basic
Titolo: shell domanda difficile

Salve a tutti
Vorrei che il programma Dos che lancio con la funzione
Shell occupasse poco le risorse della CPU:
non mi interessa che impieghi piu' tempo per essere eseguito,
mi interessa invece che rallenti poco il programma in Visual Basic.
E' possibile fare questo?
Ringrazion chi mi vorra' rispondere.
Saluti Paolo

...


Grazie per la risposta, ho letto anche quella su "C".
Ho usato con il Visual Basic la chiamata
SetPriorityClass(CurrentProcess, IDLE_PRIORITY_CLASS),
provando anche con NORMAL_PRIORITY_CLASS,
IDLE_PRIORITY_CLASS e REALTIME_PRIORITY_CLASS per
vedere cosa succede.
Il programma che lancio con shell viene eseguito piu' lentamente e
quello in Visual Basic rallenta di meno.
Purtroppo non rallenta come vorrei.
Vorrei poter dire: esegui questo programma per 20 millisecondi ogni 200
millisecondi;
oppure: eseguilo per questo numero di millisecondi ogni volta che lo chiedo.
Tuttavia grazie alla tua risposta spero che mi riesca di realizzare qualcosa
che vada bene lo stesso.
Saluti
Paolo
P.S.
I programmi che lancio con shell sono "Pkzip Pkunzip"

Su Windows NT 4.0 (e mi pare, ma non sono sicuro, 95/98) esiste un
afunzione (mi pare qualcosa tipo SetThreadPriority) che imposta la
priorità. I valori possono essere:
-2: Priorità Bassissima
-1: Priorità Bassa
0: Priorità Normale
1: Priorità Alta
2 (da usare SOLO in casi estermi, può causare il Crash del sistema):
Esecuzione in tempo reale
Facendo 1+1, esegui la funzione impostando la priorità a -2 e sei a
posto. (assicuro il funzionamento su WinNT, sono quasi certo del
contrario, come sempre, su 95/98)
Approfitto per porre un problema: come faccio a fare in modo che un
programma abbia una temporizzazione tra una istruzione e l'altra?
Mi spiego: devo connettermi ad un server UNIX via Telnet. Visto che,
data la distanza, il server mi risponde con dei timeout che possono
raggiungere anche i 3 secondi, devo impostare dei timeout per impostare
login e Password.
Come posso fare?
Asta la vista
Morenz
mor...@geocities.com

Newsgroup: it.comp.lang.visual-basic
Titolo: copiare un dir

come fgaccio a copiare una directory??
--
                                                            Piccoloweb
mailto: 
p.t...@usa.net
----------------------------------------------------------------------------
-------
***\\\ Tell me for a problem ///***
§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
\                                               /
 \ ______________________/

>come fgaccio a copiare una directory??
La cosa è un po' lunga, ma mi è capitato di imbattermi nel tuo medesimo
problema ieri.
La sub qui sotto permette di copiare una directory con tutte le eventuali
sub-directory.
I parametri 'Origine' e 'Destinazione' devono contenere anche l'eventuale
percorso.
Fammi sapere se ti crea dei problemi perchè correggere eventuali bug è di
importanza vitale anche per me.
es:
da="c:\documenti\cartella_da_copiare"
a="c:\documenti\cartella_destinazione"
call CopiaDir(da,a)
Ciao
Daniele
Public Sub CopiaDir(Origine As String, Destinazione As String)
Dim pstrDirectory() As String, pstrFile() As String, pstrAgg As String
Dim pstrPercorso As String, pstrNome As String
Dim plngNumDir As Long, plngNumFile As Long, plngCont As Long
'Sistema le eventuali imperfezione nei percorsi
If Right(Origine, 1) <> "\" Then Origine = Origine & "\"
If Right(Destinazione, 1) <> "\" Then Destinazione = Destinazione & "\"
'Se non esiste crea la dir di destinazione
If Dir(Destinazione, vbDirectory) = "" Then
MkDir Destinazione
End If
'Inizializza le variabili
pstrPercorso = Origine
'Corpo della routine
Scannerizza:
If Right(pstrPercorso, 1) <> "\" Then pstrPercorso = pstrPercorso & "\"
pstrNome = Dir(pstrPercorso, vbDirectory)
Do While pstrNome <> ""
     If pstrNome <> "." And pstrNome <> ".." Then
        If (GetAttr(pstrPercorso & pstrNome) And vbDirectory) = vbDirectory
Then
         plngNumDir = plngNumDir + 1
         ReDim Preserve pstrDirectory(plngNumDir)
         pstrDirectory(plngNumDir) = pstrAgg & pstrNome
        Else
         plngNumFile = plngNumFile + 1
         ReDim Preserve pstrFile(plngNumFile)
         pstrFile(plngNumFile) = pstrAgg & pstrNome
        End If
   End If
   pstrNome = Dir
Loop
'Esamina le sotto-directory
If plngCont < plngNumDir Then
    plngCont = plngCont + 1
    pstrPercorso = Origine & pstrDirectory(plngCont)
    pstrAgg = pstrDirectory(plngCont) & "\"
    GoTo Scannerizza
End If
'Crea la struttura delle direcory
'nel cassetto destinazione
For plngNumDir = 1 To UBound(pstrDirectory)
    pstrNome = Destinazione & pstrDirectory(plngNumDir)
    'crea la directory solo se non esiste
    If Dir(pstrNome, vbDirectory) = "" Then
        MkDir pstrNome
    End If
Next plngNumDir
'Copia i file
For plngNumFile = 1 To UBound(pstrFile)
    FileCopy Origine & pstrFile(plngNumFile), Destinazione &
pstrFile(plngNumFile)
Next plngNumFile
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Hook a winsock

allora: per l'ennesima volta sto cercando di monitorare in un modo serio ed
affidabile le porte tcp/udp del mio computer, l'ultima idea che ho avuto mi
è venuta perche ho sentito parlare di hook.
Ingoro completamente cosa sia un hook e quindi vado a rischio di dire cose a
sproposito, cmq le questioni sono 2:
1Cos'`e un hook? qualcuno mi sa dare una definizione e una spiegazione?
2Si può fare un hook alle api winsock in modo da controllarne l'esecuzione e
ricavare quindi quali porte sono aperte quali porte stanno richiedendo una
connessione a che ip sono collegato etc etc...?
come faccio dopo che sono eventualmente riuscito ad hookarmi a gestire tali
informazioni (che devo fare, un controllo? lo metto in una variabilona?
faccio una funzione che devo chiamare? qual'è la soluzione migliore? )
Se questa idea è insensata ditemelo così me ne faccio venire altre :)
grazie e ciao

 Se questa idea è insensata ditemelo così me ne faccio venire altre :)
L'idea non mi sembra insensata ... non sono un esperto di sviluppo a basso
livello di Networking quindi non
te ne saprei consigliare altre ...
Fabrizio
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Fare Videogiochi col Vb.Net ?

Ho una domandina un pò strana.... ovvero si possono creare VideoGiochi, o
applicazioni ludiche col nuovo Visual 
basic.net
 ? ( x il Vb6 mi avevano
detto No, data la sua enorme lentezza )

 detto No, data la sua enorme lentezza )
Bah... è un po' come dire "posso fare una costruzione con i mattoni?".
Dipende se intendi fare una casetta, un condominio, un grattacielo, con cosa
tieni insieme i mattoni, come sono i progetti, come sono e se ci sono delle
travi portanti...
Alcuni videogiochi sono stati fatti anche con VB6, altri non solo con VB6...
Ciao

Grazie  x la risposta Zanna =), sai x caso esiste qualche risorse on-line,
ke insegni come crearsi anke piccoli giochini col Vb6 ?

 ke insegni come crearsi anke piccoli giochini col Vb6 ?
Mi intrometto per segnalarti alcuni link. Navigando, ho casulamente trovato
questi due siti.
Qui:
http://www.programmiliberi.it/visual/giochi.html
c'è il sorgente VB del gioco del tetris e svariati eseguibili.
Se invece ti interessano giochi didattici per bambini, qui:
http://www.ivana.it
trovi una miniera di programmi VB che, se pur molto semplici, potrebbero
darti uno spunto.

 ke insegni come crearsi anke piccoli giochini col Vb6 ?
Qualche giochino lo trovi anche sul Sito comune, ma ti rimando al mio primo
post: dipende da cosa vuoi fare e comunque un gioco è un programma come un
altro: non ci sono regole e ogni gioco può essere completamente diverso
dagli altri anche come implementazione.
Detto in parole povere: la tua domanda non ha senso :)
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

Grazie mille per i link =).
Inizierņ a studiarmi un pņ gli esempi sui link proposti.
Kmq la domanda originaria era stata posta nn per mettere in discussione la
fattibilitą dei giochi col Vb, ma se facendoli si ottengono buone
prestazioni ( magari giochi che utilizzano le Direct X o cose del genere ).
Cmq ho sbagliato io ad esprimermi male, mi scuso e vi ringrazio x l'aiuto
=))


beh, con 
VB.NET
 puoi usare direttamente DirectX 9...
http://www.ugidotnet.org/news/news_read.aspx?ID=211
sul sito MSDN assieme allo SDK ci sono anche dei sample sia in VB sia in C#
.A
UGIdotNET - 
http://www.ugidotnet.org

wow, speriamo ke la mia mente malata riesca a combinare qualkosa con tali
librerie, grazie x il ilnk ;)
Newsgroup: it.comp.lang.visual-basic
Titolo: Help Copia di un testo in word con VB

Salve a tutti.
Ho il problema di fare un applicativo che accodi una serie di documenti in
formato Word 97 in un unico file, mettendo i numeri di pagina. Il mio
problema è che, pur copiando il testo intero, non riesco a mantenere la
formattazione originale dei documenti (peraltro non riesco a mantenerla
nemmeno facendo l'operazione con il mouse!!!)
C'e' 
q.no
 che ha del codice Visual Basic Buono per eseguire
quest'operazione? Io cercando in rete non l'ho trovato.
Grazie in anticipo, arrivederci!

 quest'operazione? Io cercando in rete non l'ho trovato.
forse ( dico forse ) e' colpa della formattazione , prova prima col mouse a
fare : inserisci interruzione di pagina e poi copiargli la pagina successiva
!
Dovrebbe funzionare in quanto con una nuova pagina dovrebbe perdere la
maggiorparte della formattazione della pagina precedente !
Poi se tutto va , registra una macro rieseguendo le stesse operazioni ,
prendi il codice che ha registrato e riadattalo nel tuo programma !
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: Esite una variabile per la versione del prog.

Esiste una variabile da mettere nella captatio delle finestre con la
versione del prg che si scrive ?
Bye, Red
red...@tin.it
==============

app.version
--
Andrea Marzialetti
amarzi...@tin.it
Red Reef <redr...@123SPAMtin.it> wrote in message
37454444...@news.tin.it...


App. Maior & "." &  App.Minor "." & App.Revision
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Newsgroup: it.comp.lang.visual-basic
Titolo: Colori in una ListView

Ciao a tutti del NG,
mi chiamo Luca ed ho un problema al quale non
riesco a trovare una soluzione.
La mia necessità è la seguente: ho in un form un
controllo ListView impostato come LvwReport (non
mi fa vedere icone, ma soltanto delle righe), la
mia necessità è di scrivere una riga (se soddisfa
delle necessità) con un font differente dalle
altre righe. Potete aiutarmi con questo mio
problema ? Ho cercato nelle MSDN ma non ho
trovato nulla. Siete la mia unica speranza.
Ciao a tutti
LP
Sent via Deja.com
http://www.deja.com/



 altre righe.
Con mezzi "tradizionali" in VB5 penso tu non possa fare nulla, in VB6 puoi solo
metterla in grassetto o cambiare il colore, non cambiare il font.
Subclassando il ListView probabilmente si puo' anche fare, mai provato pero'...
Ciao
--
Luca Dormio
luca....@tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Sort Combo List at RunTime

Azz... non riesco a ordinare alfabeticamente la lista di una ComboBox
a RunTime.
Nella Form_Load leggo il file di testo che mi interessa e carico una
Combobox (quindi la proprietà Sort non va) poi vorrei ordinarla
alfabeticamente. Come CASPITA fare?
ps. Ho già provato diversi link ma nisba.
Andrea.

 ha scritto nel messaggio
news:3f1e5b58...@powernews.libero.it...


almeno a me si
Così popolo la Combo:
----------------------
Private Sub Form_Load()
 
    Open "User.txt" For Input As #1
     i = 0
     Do
        Line Input #1, riga
        Combo1.List(i) = riga
        i = i + 1
     Loop Until EOF(1)
    Close #1
Combo1.Text = "Lista Utenti"
 
End Sub
-------------------
Se metto la Proprietà Sorted=true NON va.

 End Sub
Questo sistema di popolare il combo (fare riferimento a .List(i) anche
quando i e' maggiore del numero di elementi presenti) e' abbastanza curioso
e, onestamente, scopro ora dopo 10 anni di VB che funziona... ti confermo
che in questo modo la proprieta' Sorted non ha effetto, se pero' utilizzi il
sistema canonico funziona (nota che il caricamente viene in qualche misura
rallentato se il file e' grosso):
Open "User.txt" For Input As #1
Do
    Line Input #1, riga
    Combo1.AddItem riga
Loop Until EOF(1)
Close #1
per inciso, se fai il test sul 'Loop' invece che sul 'Do' dai per scontato
che esista sempre almeno una riga nel file...se e' vuoto il programma va in
errore.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 ha scritto nel messaggio
news:3f1e6014...@powernews.libero.it...


      Combo1.Sorted = True
[SNIP]
Sorted pero' lo devi fare in design, perche' a runtime non e' supportato
Ciao
P.S. il quoting, questo sconosciuto...



ragione

 End Sub
Grazie cosě funziona!
Andrea.
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] dbf visual fox pro

Salve a tutti,
non capisco il motivo per cui ottengo un runtime error 424 nel db.open... 
Ora per test ho posto che tutti i dbf fossero sotto C:\DBF ma poi avro' i 
dbf in cartelle diverse (motivo per cui apro il db con percorsi diversi... 
La cosa strana � che se metto il dbf su C:\ e ovviamente all'apertura del db 
passo come SourceDB=C:\ tutto funziona...
Qualche consiglio?
Grazie 1000 a tutti
A.
Ecco il codice:
 DirPath = "C:\DBF\*.dbf"
 sFile = Dir(DirPath)
 Do While sFile <> ""
  If sFile = "." And sFile = ".." Then GoTo NEXTLOOP
  ff = FreeFile
  Open "C:\prot.csv" For Append As #ff
  sPath = Left(DirPath, InStrRev(DirPath, "\"))
  db.Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" 
& sPath & ";Exclusive=No; 
Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO;"
  SQL = "SELECT * FROM " & sPath & "\" & sFile 'sPath & "faxb2b.dbf"
  rs.Open SQL,db
  ...
  sFile=Dir
  Set rs = Nothing
  Set db = Nothing
 Loop

 Qualche consiglio?
...
prendila con le pinze, ma forse vale la pena fare una prova....
con quel sPath = Left(DirPath, InStrRev(DirPath, "\"))
sPath contiene anche lo "\" finale, cioe' esce fuori una cosa come:
C:\MiaCartella\
Ho come l'impressione che quel "\" finale possa dar fastidio.
Io farei un tentativo a toglierlo.
In ogni caso, per migliore leggibilita', forse (specie durante i test) ti 
conviene prima dichiarart iuna stringa, valorizzarla con la tua stringa di 
connessione e poi passare quella variabile al metodo open.
Naturalmente non cambia nulla dal punto di vista logico, ma magari ti aiuta 
in fase di test.
Ciao

 ha scritto nel messaggio 
news:4b46fc91$0$821$4faf...@reader5.news.tin.it...

ci avevo pensato pure io... infatti ho provato a scrivere il percorso 
direttamente nella stringa di connessione:
db.Open "Driver={Microsoft Visual FoxPro 
Driver};SourceType=DBF;SourceDB=c:\DBF;Exclusive=No; 
Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO;"
ma niente... sempre lo stesso errore :( Non vorrei che il fatto che in quel 
percorso ci siano piu' file .dbf li crea problemi?
Ciao e grazie
A. 

 SourceDB=c:\DBF  ?????
Che file di database ï¿œ ?


Visual FoxPro... se non erro come SourceDB pero' bisogna passare la 
directory contenente i files...

 directory contenente i files...
Senza il nome del file che vuoi aprire?

Gulp ha spiegato il 08/01/2010 :

FoxPro usa un file per ogni tabella, e una cartella rappresenta un db.
Alberto

 ha scritto nel messaggio 
news:hi7ork$68m$1...@tdi.cu.mi.it...

mi sono accorto ora che non ho il driver VFPOLEDB... ho provato a scaricarlo 
dal sito ms 
(
http://www.microsoft.com/downloads/details.aspx?familyid=E1A87D8F-2D58-491F-A0FA-95A3289C5FD4&displaylang=en#filelist
) 
ma controllando nel pannello dei dsn odbc non lo trovo! Forse controllo nel 
posto sbagliato?
grazie 1000
A. 

 ha scritto nel messaggio 
news:4b4ad636$1...@news.x-privat.org...

tutto risolto... errore mio... non avero dichiato la variabile che 
utilizzavo per aprire la connessione al db come adodb.connection :|
grazie a tutti
A.
Newsgroup: it.comp.lang.visual-basic
Titolo: comprimre file con vb6

come posso fare per comprimere un file con pkzip ?

 come posso fare per comprimere un file con pkzip ?
beh... chiamo pkzip da shell, passandogli i parametri che gli servono....

 come posso fare per comprimere un file con pkzip ?
C'è una DLL scritta da non so chi per gestire gli archivi ZIP dal VB... Però
proprio non mi ricordo qual'è!! Prova a cercare un pò in giro, comunque sono
certo che esiste.
Antonio Mirarchi


Io sarei per il pkzip gestito dalla shell ;)

Newsgroup: it.comp.lang.visual-basic
Titolo: Auto resize

Ciao a tutti, avrei bisogno di un aiutino.
Ho sviluppato un programmino in VB e lo sviluppato su un PC che ha un
monitor da 17" con una risoluzione di 1024 X 768 . Il problema nasce quando
cambia la risoluzione del monitor (800 X 600), non centra piů nello schermo
e molti comandi sui form non si vedono piů.
Il programma č con un form MDI e queste sono le istruzioni sul form MDI:
Me.Left = 0
Me.Top = 0
Me.Width = Screen.Width
Me.Height = (Screen.Height - 400)
mentre nel form figlio ci sono:
ModDDT.Left = 0
ModDDT.Top = 0
Me.Width = (MDIForm1.Width - 200)
Me.Height = (MDIForm1.Height - 1200)
Ho sentito parlare di un auto resize ma non so ne cosa sia ne come si usa.
In sostanza vorrei che si ridimensionasse in automatico come fanno piů o
meno tutti i programmi tipo word, excel o altri
Il programma č un po' lungo per poterlo riscrivere tutto in 800 x 600 .
Spero mi possiate aiutare
Grazie
Enzo

 Il programma è un po' lungo per poterlo riscrivere tutto in 800 x 600 .
Non ho ben capito cos'è che devi ridimensionare, comunque devi scriverti 
il codice di ridimensionamento nell'evento _Resize del contenitore.
Ciao

sito
http://www.it-lang-vb.net/home.asp
nella casella ricerca, digita
resize
elenca una serie di soluzioni
Ave
giuseppeD
----------
Certificato cittadino Romano

vi sono state molte discussioni su questo argomento. cerca su "google
gruppi" che troverai materiale a sufficienza.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 Il programma è un po' lungo per poterlo riscrivere tutto in 800 x 600 .


 Grazie
http://business.vsnl.com/rationalbrains/index.html
se vuoi provare, nei dl c'e' un altro resizer. ma l'ho provato solo di
sfuggita.
i programmi comunque sarebbe pratico scriverli tenendo bene a mente alla
risoluzione minima nella quale verranno usati...
hth, ciao, j.

 ha scritto nel messaggio
news:2gfhi4F...@uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Presentazione (a chi interessa)

Ciao a tutti, una minima presentazione mi sembra doverosa poiche' prevedo di
assillarvi nei giorni a venire con numerose domande che per la maggior parte
di voi risulteranno noiose e scontate da quello che ho potuto lurkare, ma
che per me che ho appena iniziato potrebbero rappresentare la salvezza dalla
neuro!
Ho 33 anni (sigh!) e un'esperienza di programmazione che risale a vent'anni
fa (doppio sigh!) quando i primi home computer cominciarono ad entrare nelle
nostre case.
Poi altre cose (....) hanno distolto la mia attenzione da quel mondo, fino a
poco fa quando ho iniziato a togliermi la ruggine con un po' di Javascript e
ora sono passato al Visual Basic, solo che di tempo ne ho veramente poco
percio' perdonatemi se vi chiedero' cose che ci sono gia' nell'help o nel
sito comune, non e' che non cerco prima li' ma magari nella fretta non le
vedo!
Be' se avete avuto la pazienza di leggere fino a qui avrete anche la
cortesia di leggere la mia prima richiesta che postero'  fra poco.
Ciao.
--
__   __   __          __   __  _
|__  |__|   |    |    |  |__|  |_   |  \
__|  |    |   |    |__|  |  \_  |__ |_/

 vedo!
Hai parlato saggiamente... :)
            BENVENUTO!!
                                Ciao
                                                        Allanon

 neuro!
Benvenuto in questa gabbia di pazzi furiosi 8-)
Bye by Massimo 8-]

 vedo!
Saluti a te .. colgo l'occasione per invitarti al meeting

 wrote in message
vIRn7.44660$ul3.1...@news.infostrada.it...

welcome
ciao
Jack


Welcome
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Data Environment

Salve,
il problema e' questo:
Ho un Data Report con Data Environment che fornisce i dati.Il report
funziona correttamente stampando la struttura creata , con i data del Data
Environment .
Come faccio a passare al Data Environment una stringa SQl per filtrare i
dati? (non al momento della creazione degli oggetti Command , ma da codice)
Grazie!

Private Sub DataEnvironment_Initialize()
Exit Sub
Me.Connection1.ConnectionString = sConnessione
Me.rsCommand1.Open gstrsql, sConnessione
Me.rsCommand1.Requery
End Sub
Private Sub DataEnvironment_Terminate()
    Me.rsCommand1.Close
    Me.Connection2.Close
End Sub
sconnessione è la stringa di connessione mentre gstrql è la query
ciao!
p.s: non è che per caso sai come si fa a fare un contatore dinamico di 
righe nella section1 del datareport?
Inviato da 
www.mynewsgate.net

 ha scritto nel messaggio
news:94gPc.26189$OH4.6...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [? - VB 6] - doppio click su un rich text box

Salve a tutti,
sono decisamente nuovo del Visual Basic e mi sto scontrando, senza successo,
con delle problematiche che immagino siano elementari.
Il mio problema è questo:
determinare su quale linea di testo visualizzato su un Rich Text Box sia
stato generato un evento di doppio click.
Qualche suggerimento?
Grazie, Andrea

 sia stato generato un evento di doppio click.
Dovrebbe funzionarti questa:
[FAQ] Sapere la posizione del cursore su una textbox (Zanna)
http://groups.google.com/groups?selm=9EQP7.5912%24ob5.136448%40news2.tin.it
Bye, G.


Grazie!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Req: Inserimento di una progressbar in un controllo StatusBar

Grazie a chiunque possa aiutarmi.
Ciao Pasquale.

 wrote in message
9j0L4.158995$pn3.1...@news.infostrada.it...


 ha scritto nel messaggio
news:8djqr2$5bku$1...@stargate1.inet.it...



SetParent()
Roal Zanazzi

Newsgroup: it.comp.lang.visual-basic
Titolo: Archivio modelli auto?

Sarà che a me l'auto serve solo per andare dal posto x al posto y, ma
è mezz'ora che cerco e non trovo nulla!
Ho da fare un sw per una autofficina
Ho bisogno di fare scegliere all'utente un modello di autovettura
secondo il classico menu: marca -> modello
Ma dove trovo un archivio (in qualsiasi formato) che mi riporti la
produzione mondiale(anche passata e non più in produzione)? Ho provato
sul sito di quattroruote ma non trovo nulla!
Grazie!


Se ti accontenti di marca e modello senza gli allestimenti, qui trovi un 
po':
http://www.autoonline24.com/
Ma il recupero mi sa che devi fartelo a manina
oppure anche questo:
http://www.i0100.com/it/index.php?area=techspec&mtm=1
ma mi sa che qualcosa di già pronto è un po' complicato da trovare.
ciao
stefano

> ma mi sa che qualcosa di già pronto è un po' complicato da trovare.
Dici? Senz'altro a gratis, ma pagando? Le compagnie assicurative che 
consentono di stipulare una polizza auto online, sui loro siti, consentono 
la selezione di marca e modello dell'automobile da un elenco.
Chissa' qual e' la loro fonte?
    Alex

 la selezione di marca e modello dell'automobile da un elenco.
Si, intendevo a costo zero ovviamente.
ciao
stefano


Ho trovato questo c'ho spippolato un po  e ho tirato fuori marca e
modello....non so se è aggiornato...
http://yearmakemodeldatabase.com/

 sul sito di quattroruote ma non trovo nulla!
e' valida l'email?
ps. non e' gratis



Ti devi fare un po' di lavoro manuale (analizzando le pagine html dopo ogni
selezione di marca, magari riesci ad automatizzare il parsing), ma qui
http://servizi.aci.it/ServizioCK/SelezioneModello
trovi una buona scelta di modelli.
PaF
Newsgroup: it.comp.lang.visual-basic
Titolo: Chan IRC

Vorrei avvisarvi che ho creato una canale
IRC dedicato al ng.
lo trovate su
irc.azzurra.it
porta:6667
ci vediamo....
--
H0m3r S1mps0n
home...@libero.it
hom...@tiscalinet.it
http://homersimp.tsx.org
 (In costruzione)

porta:6667
A parte il fatto che la porta non è determinante...
il canale c'era già, sullo stesso server, ma è stato abbandonato per mancanza di utenti... però...
non è che potresti almeno dirci il nome del canale?
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
---------------------------------------------------------------------------

 non è che potresti almeno dirci il nome del canale?
ooops....
sorry ho detto tutto tranne il nome :(
#it.comp.lang.visual-basic
come il nome del ng....
l'ho creato sperando che qlc esperto lo
frequentasse perchè spesso capita che uno ha
bisogno di un aiuto urgente, ed anche se sul ng
le cose sono molto celeri, in un chan si ha qlc
possibilità in più se ci sono le persone giuste
--
Ciuaz©,


 --
<christmas mode=off><flame>
... che, a meno che non siano in ferie, di solito stanno lavorando e non
credo che passino il tempo in chat ...
<flame></christmas>
<christmas mode=on>
;-)
</christmas>
Ciao
Aldo



Guarda, come attivo frequantatore del fu #it_lang_vb ti posso dire che la chat può essere molto
potente, in quanto permete di risolvere in 4+4=8 problemi che altrimenti, tramite gli strumenti
tradizionali (v mail & news) richiederebbe del tempo: questo perché puoi discutere del problema in
tempo reale e molte volte, costruire on-lne la soluzione... molto, molto interessante ed istruttivo:
all'epoca si sono risolti molti problemi e tutti hanno imparato diverse cose in poco tempo.
Provare per credere.


 Provare per credere.
bene,
 allora
frequentate il nuovo ng! :)


Newsgroup: it.comp.lang.visual-basic
Titolo: stringa di connessione ADO per Access

Scusate la banalità della domanda ma qual'è la stringa per connettersi ad un
database Access tramite ADO ?
Saluti Massimo

 Scusate la banalitą della domanda ma qual'č la stringa per connettersi ad


Scusate la banalità della domanda ma qual'è la stringa per connettersi ad un


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Realizzare toolbar "float" in stile word....

Salve a tutti,
vorei dotare le toolbar del mio applicativo della stessa funzionalità di
quelle di Word (per esempio)
cioè draggando le toolbar queste diventano form :)
Se qualcuno ha già realizzato questo tipo di funzionalità  sarei grato di
conoscere l'eventuale implementazione
(io avevo pensato a duplicare le toolbar sul form princiape e su tanti altri
form e poi giocare con visible true/false ma mi sembra veramente una
"brutta" implementazione...=(....)
Grazie a tutti
Davide®

Temo tu debba ricorrere a tool (ocx) esterni (e a pagamento...)
Prova 
http://www.componentsource.com/
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere una proprietà ad un oggetto di base

Salve a tutti del N.G.
Volevo sapere se è possibile aggiungere una proprietà ad un controllo di
VB6.
Es: di una label
Height ....
Width ....
(Proprieta agg.) xxxx ....
(Proprietà agg.) yyyy .....
Per poi selezionare normalmente del tipo "me.oggetto.proprietà".
Grazie per aver letto
Klaus Dobermann
kdobe...@yahoo.it


non penso proprio.
Però puoi farlo con un trucchetto.
Ti fai una classe per conto tuo.
Questa classe non fa altro che creare un istanza dell'oggetto che ti serve
(es label)
Aggiungi alla tua classe tutte le proprietà che ti servono e nel programma
proncipare quando ti serve una label, inserisci la tua classe.
Puoi anche trasformarla in OCX in modo da poter vedere la tua classe come un
oggetto nella barra.
Ti ho dato solo le linee guida per lo spunto, per il resto è tutto codice da
fare da bun programmatore

 ha scritto nel messaggio
news:dc3ua.54044$3M4.1...@news1.tin.it...


 ha scritto nel messaggio
news:sJvua.62678$3M4.1...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: SETUP - type mismatch - URGENTISSIMO





Help me please.


Ho creato con "creazione guidata pacchetti di 
installazione" su pc win98 un setup.


Lancio setup su pc win NT (Workstation), chiede la dir di 
installazione (ho provato sia lasciando la dir standard che cambiandola), subito 
dopo compare errore "Type mismatch - errore imprevisto nel programma di 
installazione".


Ho provato di tutto, ho ricompilato il programma, ho rimosso 
riferimenti strani ma nulla di nulla.


Installato mdac_typ, il problema rimane.


 


Cosa posso fare?


Se qualcuno ha suggerimenti ringrazio 
anticipatamente.


 



č un bug della creazione pacchetti di installazione del vb;
prova ad aprire il file "Setup.lst" (il notepad va benissimo); tale file ha
lo stesso formato di un file .INI;
cerca la sezione [IconGroups] (generalmente č quasi all'inizio);
sotto tale sezione cerca la voce PrivateGroup0 (...se hai creato piů
cartelle nel menů programmi č probabile che tu abbia anche una voce
PrivateGroup1 ecc. ecc.);
se hai usato una versione italiana del programma di creazione pacchetti di
installazione probabilmente trovi scritto quanto segue:
PrivateGroup0=Falso
(oppure : PrivateGroup0=Vero, dipende da come hai costruito il pacchetto di
installazione)
naturalemente se invece hai la versione inglese i valori sono "True" e
"False";
beh, l'inghippo č tutto li; prova a scambiare "True" con "Vero" e "False"
con "Falso" (o viceversa...) e tutto dovrebbe funzionare senza problemi;
ciao
P.S.: non postare in HTML!!
Cristiano Larghi Micronix2 <C.La...@Micronix.it> wrote in message
7sd0hh$kq2$1...@fe1.cs.interbusiness.it...


Sei un eroe.
Grazie, a buon rendere.
Newsgroup: it.comp.lang.visual-basic
Titolo: Proprietà DirListBox.DirList

la casella di riepilogo delle directory: quali sono gli indici numerici 
delle cartelle elencate in tale controllo? Sono negativi o positivi? l'index 
della cartella corrente selezionata è -1?
 
Non trovo la documentazione.
 
grazie 
 
 


VB6? Mai sentito parlare di una proprietà DirList nella DirListBox.
Il valore selezionato (con doppio click) si legge nella proprietà Path 
(Dir1.Path).
 
Come in tutte le liste esiste il List(n) ed il ListCount (inizia da 0), 
solo che nella DirListBox ci sono queste differenze:
 
- Per un controllo DirListBox, la sequenza dei numeri indice è basata 
sulle directory e sottodirectory correnti al momento della creazione del 
controllo in fase di esecuzione.
 
- La directory espansa è rappresentata dall'indice -1. Le directory di 
livello superiore alla directory espansa sono rappresentate da indici 
negativi con valore assoluto maggiore. -2 , ad esempio, è la directory 
superiore della directory espansa, mentre -3 è la directory 
immediatamente superiore.
 
- L'indice delle directory di livello inferiore a quella espansa è 
compreso tra 0 e ListCount-1.
 
-- 
-> G.Chiappori
www.chiappori.it
 
www.chiappori.com
 
 
 


 
grazie

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

hhh

hhh
per queste cose esiste it.test

 per queste cose esiste it.test
ehmm... chi è senza peccato scagli la prima pietra ;-)
--
Salutoni da un
Sergio elefantesco

> ehmm... chi è senza peccato scagli la prima pietra ;-)
Allora la scaglio. Mai fatto un test su nessun NG, neanche su it.test
Antonio Mirarchi

 ehmm... chi è senza peccato scagli la prima pietra ;-)
Arrrrriiiiiivaaaaaaaaa! ;-)
Tirata in acqua... 10 rimbalzi! :P

 Allora la scaglio. Mai fatto un test su nessun NG, neanche su it.test
Idem!
Come "test" ho risposto al mio primo post ^_^
Alex
°°° Posted from X-Privat Free NNTP server - 
www.x-privat.org
 °°°

ehmm... chi è senza peccato scagli la prima pietra ;-)
Piu' che un peccato e' stato un invio a tradimento, anche se,
in effetti, il risultato e' stato lo stesso :-(
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione da C# a vb.net

Ho un listato in c# da convertire in 
vb.net
, ma ho alcune difficoltà.
Chi li conosce entrambi, così mi può aiutare?
Christian

 Ho un listato in c# da convertire in 
vb.net
, ma ho alcune difficoltà.
Prima puoi provare con questo, magari è sufficiente:
http://www.developerfusion.co.uk/utilities/convertcsharptovb.aspx
-- 
news://it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 
http://www.developerfusion.co.uk/utilities/convertcsharptovb.aspx
Grazie, molto utile.
Christian
Newsgroup: it.comp.lang.visual-basic
Titolo: Come disattivare MDM, Machine Debug Manager?

Ho installato Visual Basic 6.0 dal pacchetto Visual Studio.
L'installazione ha installato anche l'MDM, cioč il "Machine Debug Manager".
Il problema sorge quando mi collego ad Internet, se visito un sito nella
stragrande maggioranza dei casi, interviene l'MDM che mi dice che esiste un
errore nello script della pagina.
Questo č molto fastidioso, e volevo sapere come disabilitarlo.
Grazie
Ciao, Luca

Dal prompt Dos stando in radice con tutti i diritti:
deltree windows
=8^)
p.s. scherzi a parte lancia msconfig e disabilita l'autoesecuzione.
Ciao!


> p.s. scherzi a parte lancia msconfig e disabilita l'autoesecuzione.
Ho già fatto come dici tu, ma continua ad aprirsi con Internet Explorer, se
guardo l'elenco dei task si attiva solo con internet Explorer.
Ciao, Luca

 guardo l'elenco dei task si attiva solo con internet Explorer.
Vai su Internet Explorer, Tools, Internet Options, Advanced,
metti il segno di spunta a "Disable Script Debugging"....
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] IMPORTANZA VITALE!!!

 
--
Posted from 
relay.infogroup.it
 [195.103.148.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

Perdonate l'OT
Perchč quando posto io una e-mail cosě oe si rifiuta dicendomi "more
included text that new"?
Ciao

 included text that new"?
e' un finezza di tin e interbusiness, ho scoperto. con libero non accade:
puoi anche aggiungere una sola riga a un messaggio di 400 e gli va. lo
stesso direi con tiscali, da cui vedo arrivare messaggi che quotano piu' di
quanto creano.
a telecom e parenti devono aver pensato che cosi' si intasavano i loro
server (peraltro spesso giu' di corda). le prime volte ubbidivo loro
coscienziosamente. poi mi sono rotto. *se proprio* voglio scrivere poco e
citare molto (di solito se ci riesco taglio):
-- x righe mie
-- y righe citate
-- z invii vuoti = ( y - x ) + 1 per sicurezza
o giu' di li'...
al server cosi sembra andar bene... con buona pace dell'intasamento, che
raddoppia...
Newsgroup: it.comp.lang.visual-basic
Titolo: label

Ciao,
devo cambiare il caption di una label in modo che scriva Picture 1/13, dove
picture è fisso e non mi crea problemi, mentre 1/13 deve variare.
1 è l'immagine attualmente visualizzata, mentre 13 è il numero di immagini
totali.
Ho a disposizione entrambe le variabili, ma come combino queste informazioni
in un'unica riga di comando?
grazie
--
Luca Contini - MediaEnabling System Engineer
Office: 
(+39) 070 2466 5503
Mobile: 
(+39) 328 911 6656
URL: 
http://www.mediaenabling.com

 in un'unica riga di comando?
Label1.Caption="Picture " & cstr(Indice_Corrente) & "/" &
cstr(Numero_Complessivo)
Ciao
Alberto

 ha scritto nel messaggio
news:J0u89.82294$lu5.2...@twister1.libero.it...


 ciao
Il tasto in questione e' F1!
Lokar.leggi.il.manifesto.ed.impara.a.quotare.please
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 Come si può fare?
http://groups.yahoo.com/group/x-men-italy/files/LO/quoting.txt
*.vbs
'Inizio
Option Explicit
Dim oSHApp
Dim sSrc, sDest
Dim fso, MyFile
Set oSHApp = CreateObject("Shell.Application")
sSrc = "C:\WINDOWS\TEMP\1\*"
sDest = "C:\WINDOWS\TEMP\2"
  oSHApp.Namespace(sDest).MoveHere sSrc
Set oSHApp = nothing
WScript.Quit
'Fine
--
Fosco

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con Visual STudio Installer

Un saluto
ho creato  un pacchetto di installazione VB con il nuovo Visual STudio
Installer; tutto regolare fino a quando......non installo il mio programma.
Infatti in fase di  installazione mi restituisce il seguente errore:
Errore 1904 Module c:\Programmi\Quinto\msado25.tlb failed to register.
HRESULT-
2147024769
.Contact your support personnel.
Quinto è la direttrice del mio programma.
C'è qualcuno che possa dirmi che significa?
Grazie in anticipo
Andrea Sabatini

 wrote in message
Mwf86.48239$eB2.4...@news.infostrada.it...

Dall'esperienza che ho, puoi tranquillamente togliere quel file
dalla lista..........................
Ciao
Sir Jo

Il file protrebbe essere in uso.
Prova ad installare l'applicazione disattivando l'antivirus.
Enrico
Andrea Sabatini wrote in message ...


 C'č qualcuno che possa dirmi che significa?


Ringrazio tutti provero tutto quello che mi avete consigliato; solo un altra
cosa che vi farà pensare
ho ricompilato il progetto perchè sono passato da ado2.5 ad ado 2.6 con
relativo mdac......Visual STudio installer non ha dato problemi......
Ho provato ad installare il mio programma su una macchina WIN98 seconda ed.
mi ha chiesto di riavviare e sopresa.. si è impallato tutto non esegue
correttamente all'avio Explorer.exe che dovrebbe essere quello che carica
tutto il desktop e riamane li fermo con la videata verde senza niente. Ho
reinstallato tutto il sistema operativo ma ancora lo stesso problema.
Sig... mi sa che windows installer non è il sistema che fa per me.
ciao a tutti
Andrea

 ha scritto nel messaggio
news:JJH86.58793$eB2.4...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare il CodePage e il CharSet in un progetto/form VB

Ciao all!
Devo cambiare il codepage e il CharSet in una
forma/progetto/oggetto/quant'altro per poter usufruire di caratteri speciali
non latini, in asp sono riuscito a fare tutto e funziona correttamente epr
tutta la pagina usando Session.CodePage = 65001 per il codepage e
Response.CharSet = "UTF-8"  per il charset, ma in VB come si fa?
Grazie a tutti e ciao! ;^)=
--
RedFoxy
A fox around web
Power at fox for a yiffing world!

>  ma in VB come si fa?
Devi usare le Form2
Da  Progetto\Componenti\Finestre di progettazione\ Selezionare 
Microsoft Form 2.0 Form
Poi Sempre da Progetto\Componenti\Alre finestre di progettazine Activex\
Form 2.0
Ora puoi lavorare in Unicode
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ora puoi lavorare in Unicode
Gia' fatto e...Ho altri prob con le form 2 :P
cmq ora mi interessava altro... per i dati che passo all'interno
Se ad esempio provo a fare DB 1 -> Dato -> DB 2 nel DB 2 arriveranno solo
???? e non le lettere
