mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP] come creare un frontend per winamp?

io vorrei creare un applicazione che tramite un pulsante dal menu
dopo aver avviato winamp..cambi la skins del famoso players da una lista  da
me creata
in pratica questo programma all'avvio dovrebbe trovare winamp.....vederne la
versione e successivamente nel momento in cui si seleziona skins...avviare
il programma e contemporaneamente cambiarne l'aspetto
qualcuno  puo postarmi il codice per Visual basic 6. o indicarmi un sitooo
dove
trovare degli aiuti.......o suggerimenti.....
--
Josuke Higashikata
------------------------
Membro del Jojo Fan Club
------------------------
Autore della home page italiana dedicata a JOJO NO KIMIYONA BOKEN
HIROHIKO ARAKI'S WORLD
http://members.xoom.com/hirohikoa/index.html

 Ciao
si l'ho visto il procedimento ma per uno come me che è da un giorno che usa
visual basic
e che non sa praticamente niente o quasi di programmazione è quasi
impossibile
ho letto anche l'articolo sul numero del mese scorso di IOPROGRAMMO pero non
ci sono spiegazioni per come utilizzare quelle istruzioni con visual basic 6


grazie di tutto
provero di vedere se funziona poi farò sapere

Newsgroup: it.comp.lang.visual-basic
Titolo: Premere bottone in una applicazione.

Salve,
vorrei scrivere un eseguibile in VB che mi apra un altro programma e mi
prema un pulsante della finestra che si apre.
Come posso fare?
Grazie a chi mi aiuta.

 finestra che si apre.
Puoi provare con Shell (o la funzione API ShellExecute) + AppActivate +
SendKeys (TAB + SPAZIO/INVIO per raggiungere il pulsante e premerlo)... ma
e' un po' macchinoso!
In alternativa puoi provare con le API ShellExecute + FindWindow +
PostMessage per cercare di inviare il comando "pulsante premuto" alla
finestra. Un po' piu' pulito, ma senz'altro piu' complesso!
hth,
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Query senza Commit

Ciao a tutti!
Avevo una domanda semplice.
Come faccio da VB a collegarmi a un Database Oracle in modo che
quando eseguo una Update non mi vega eseguito anche il comando "COMMIT" ?
O come devo eseguire la Query di update?
Grazie
Ciao Simone

BeginTrans
Dici che stai iniziando una transazione.

 Dici che stai iniziando una transazione.
Grazie!
Perň io ho ancora un problema..visto che ho un Trigger che č attivo
sul DB dove voglio fare l'Update, quando lancio la Execute il programma
mi va in errore...
Qualcuno sa il perchč?!
Simo

Qualcuno sa il perchè?!
In base al numero ed al messaggio di errore che _non_ hai pubblicato
ed all'azione compiuta dal trigger, che _non_ hai detto, l'unica cosa
che ti si puo' dire e' di imparare a fare i debug :-(
-- 
ciao, hal
non posso usare la sfera di cristallo perche' l'ho portata a fare il
tagliando

quando eseguo una Update non mi vega eseguito anche il comando "COMMIT" ?
Se non ricordo male devi impostare AutoCommit=False fra le Extended
Properties.
-- 
ciao, hal

 che ti si puo' dire e' di imparare a fare i debug :-(
Ok , hai perfettamente ragione. Pubblico l'errore..
ERRORE alla riga 1:
ORA-00001: unique constraint (DEV.DEV_HIST_PK) violated
ORA-06512: at "DEV.DEV_MAIN_STORY", line 16
ORA-04088: error during execution of trigger 'DEV.DEV_MAIN_STORY'
ORA-02063: precedente 3 lines da GEOP1_DEV
ORA-06512: a "DEV.DEV_MAIN_STORY", line 3
ORA-04088: errore durante esecuzione del trigger 'DEV.DEV_MAIN_STORY'
Tutti questi errori me li da facendo una semplicissima
update dev_main set posx=0 where iddev=67;
Grazie e ciao
Simone

Newsgroup: it.comp.lang.visual-basic
Titolo: Property in UserControl

Ho realizzato un UserControl personale. All'nterno trova posto un textbox.
Ho impostato delle property come il BackColor ed il ForeColor (con i metodi
Property let) e fin qui tutto ok. Ma quando ho voluto implementare la
proprietą Font.Bold, si č presentato il problema.
Ossia il bold č una proprietą della collection Font. Come realizzare con il
metodo precedente tale proprietą???
Spero di essere stato sufficientemente chiaro.
Saluti..............

 proprietą Font.Bold, si č presentato il problema.
Definisci la proprietą Font:
Public Property Get Font() As Font
Ciao
--
y = f(
http://neodatatype.interfree.it/index.html
)

 Ciao
o era public property set(f as font) ?
Sergio

 Public Property Get Font() As Font
[SNIP]
Meglio ancora, se dovessi avere necessita di istanziarla autonomamente,
usare StdFont, classe disponibile aggiungendo i riferimenti a OLE
Automation.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.net Domanda veloce

In c++ per creare un ritardo programmato si utilizza delay(valore) in visual
basic.net
 c'è qualcosa del genere mi deve ritardare di circa 10millisecondi
Grazie in anticipo

 Grazie in anticipo
Vado a memoria
System.Threading.Thread.Current.Sleep(10)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Connessione a db access

Prima di tutto ciao a tutti che è tanto che non posto.
Sembra un problema stupido:
effettuo una connessione ad un db access con un file udl.
vorrei proteggere il db con una password ma non riesco a configurare l'udl,
o meglio non so cosa mettere nella user id.
ho cercato su msdn ma niente..
Ciao, Maurik



Lo user id/utente lo decidi tu tra quelli che hai impostato nel db con
Access. Non riesco a capire il problema.
Ciao!

 Ciao!
Se proteggi il db con la Password database non devi usare le impostazioni
User ID Password...
ma la Proprietà "Database Password".
Usando Jet 4.0 OLE DB Provider inserisci la seguente porzione sulla stringa
di connessione:
Jet OLEDB:Database Password=AAA
ciao
Fabio


Ok, lui sta usando un file udl, la trova nel tab "Tutte le proprietą".
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: Per Riccardo Sale

Riccardo wrote:
La miglior documentazione che ho mai visto sull'argomento č il Win32 SDK
Help (dovrebbe chiamarsi cosě) di Microsoft che documenta perfettamente
tutte le API di Windows. Se vuoi te lo mando ma sono 12MB, altrimenti
puoi trovarlo assieme a Delphi o MS VC++
Ciao
Riccardo
Me la manderesti perchč  ne ho veramente bisogno. E se possibilmente in
Italiano.
Scrivimi per metterci d'accordo, sono disposto a pagare le spese postali.
E sapresti dirmi qualcosa di piů sul file Win32API di VB4?
Mike 
mic...@tin.it

Italiano.
[snip]
Scusa se m'intrometto, ma ho appena terminato di scaricare la suddetta
documentazione, agli indirizzi indicati in un vecchio post, e credo che (con
getright) il download non sia particolarmente gravoso, quindi se ti puo
servire, riporto sotto gli indirizzi:
http://home1.swipnet.se/~w-10159/files/win32hlpfiles/win32_1.zip
http://home1.swipnet.se/~w-10159/files/win32hlpfiles/win32_2.zip
http://home1.swipnet.se/~w-10159/files/win32hlpfiles/win32_3.zip
Sono 3 files zippati di circa 3Mb, al cui interno si trova un file in
formato RAR (che per poter essere decompresso ha bisogno dell'apposita
utility, facilmente reperibile anche su volftp).  Alla fine si ottiene un
file HLP di circa 12Mb.
P.S. = Grazie infinite a Massimo Conter per la dritta nel post del 28/10/98.
--
Ciao,
Fantos.
----=======================o==o=======================----
 Alessandro Noro (nick Fantos) at sys...@tin.REMOVEit
----=======================o==o=======================----
Newsgroup: it.comp.lang.visual-basic
Titolo: pulsante "riferimento relativo"

Sono un neofita di VBA, sto cercando di impararlo da un libro il quale mi
dice di cliccare sul pulsante "riferimento relativo", ma dov'č?? Non lo
trovo
Grazie per l'aiuto
Jay
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 dice di cliccare sul pulsante "riferimento relativo", ma dov'è??
Cioè, se ti parlo di patate, e ti dico di premere sul riferimento 
relativo, tu cerchi "Riferimento Relativo"?
Stai scherzando, vero?
Alberto
-- 
Ma noi no


 


 Jay
Caro Jay,
qualcosa mi dice che tu stia parlando di Excel e del registratore di 
macro.
A parte essere OT (perchè stiamo parlando di funzionalità di Excel e 
non di VBA), non credi che riportare, quanto dici adesso, fin dal tuo 
primo post, ti avrebbe consentito di ottenere maggiore aiuto?


Newsgroup: it.comp.lang.visual-basic
Titolo: OLEDBConnection su connesione di rete

Salve,
ho un applicazione web sviluppata 
dot.net
  che deve connettersi ad un db
access posto su un cartella condivisa su un server diverso dal server web.
Ho condiviso un unità di rete sul web server ed ho provato ad aprire il db
con la stringa:
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Z:\edilnet.mdb;User
Id=admin;Password=;" 
Dove Z è l'unità di rete.
Ho provato con due slashes Z:\\
Ho provato a dare il percorso UNC \\server\Condivisione\edilnet.mdb
L'unica differenza è che con la prima mi dice percorso non trovato, nella
seconda maniera mi dice file aperto in maniera esclusiva o mancano i
privilegi . Purtroppo il file è chiuso (manca ldb) ed il file lo posso
aprire, modificare, scrivere.
Leggendo l'utente che usa l'applicazione
(System.Security.Principal.WindowsIdentity.GetCurrent().Name) via web
viene fuori NT AUTHORITY\SERVIZIO DI RETE...mi dovrei aspettare ASPNET? 
Ho provato ad usare  
<identity impersonate="true"
          userName="domain\user" 
          password="password" />
nel file config ma pur cambiando corretamente l'utente non funziona
ugualmente. 
Ultimo inciso l'applicazione funziona se la lancio dal server web
utilizzando visual studio.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 utilizzando visual studio.
Piccolo aggiornamento....purtroppo non risolutivo.Ho capito/letto che lo
user usato nell'applicazione è quello definito nel pool di applicazioni di
iis associato al sito. Purtroppo pur cambiando l'utente la situazione non
è cambiata.   


 utilizzando visual studio.
Perchè molto probabilmente (non hai specificato se stai utilizzando 
cassini o iis) lo stai eseguendo nel contesto di sicurezza di un utente 
che hai i permessi per accedere allo share di rete.
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: VB6 Mdb e Windows Me

Per favore un aiuto urgente
Devo installare un  programma di VB6 fatto con SO Windows 95 che usa
l'oggetto data con db Access 97, su un pc con windows Me senza Access.
Che bisogna fare per fare gestire al programma l'MDB ?
Ho installato Mdac_typ.exe versione 4.73.3110.0.
Pensate che ci ho anche installato VB6 (per poi disinstallarlo chiaramente)
e riesce solo a leggere i dati dal db mentre se tento di modificarli tramite
textbox collegate mi da un msg "Il campo non puo' essere aggiornato" (la
proprieta': ReadOnly e' = False; DefaultType=2-UseJet; RecordsetType=
1-Dynaset)
che faccio?
Ho il PC del cliente disponibile per un paio di giorni.
Qualche buon anima mi aiuti!!
Ciao Paolo
-- 
Posted from 
mail-1.tiscalinet.it
 [195.130.225.147] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000b01c0d97b$a9507100$226a0b3e@paolo...


Grazie per l'interessamento dove trovo sto' DCOM ? nel mio pc c'è
Dcomcnfg.exe, devo lanciare questo?
Grazie  ciao Paolo
-- 
Posted from 
smtp.tiscalinet.it
 [195.130.225.147] (may be forged) 


 Ciao Paolo
www.Mailgate.ORG

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricavare il nome del computer connesso al server tramite remote desktop di Win

Ciao, avrei bisogno di sapere se è possibile leggere il nome del
computer che lancia la mia procedura (visual basic) sul server
centrale, tramite un collegamento con il remote desktop di windows.
Grazie.

Francesco wrote:

Le informazioni sulla sessione TS, tra le quali anche il WTSClientName 
(immagina cosa contiene...) le ottieni tramite la funzione API 
WTSQuerySessionInformation (Wtsapi32.dll)
Qui trovi l'help della funzione:
http://tinyurl.com/86wek
e qui trovi un wrapper VB6:
http://dev.remotenetworktechnology.com/api/wtsapi.htm
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: [CFV3] it.comp.lang.csharp


Il gruppo tratterà del linguaggio C#, ideato da Scott Wiltamuth ed
Anders Hejlsberg. Il gruppo tratterà di qualsiasi dialetto del
linguaggio C#, sia quelli via via introdotti dalla Microsoft o da altre
organizzazioni (FSF con il progetto Mono ad esempio), sia quelli
eventualmente standardizzati da organizzazioni indipendenti (ECMA,
ANSI, ISO).
Argomenti in tema:
+ Discussioni sul linguaggio C#;
+ Discussioni sullo sviluppo di C# su qualsiasi piattaforma;
+ Discussioni sui tool di sviluppo per C#, come SharpDevelop e simili;
+ Discussioni sugli algoritmi e le loro possibili ottimizzazioni in C#;
+ Discussioni sull' Object Oriented Programming e i design patterns in
  C#;
+ Discussioni di carattere generale sull'ambiente .NET, fino a quando
  non sarà disponibile un newsgroup dedicato.
Argomenti fuori tema:
Si sottolinea che le discussioni su linguaggi di programmazione
diversi da C# sono da considerarsi del tutto off-topic, e si invita
pertanto a postare negli opportuni newsgroup esistenti.
Informazioni utili:
Nell'oggetto dell'articolo dovrebbe essere specificata la tipologia
dell'articolo stesso, tramite l'uso di una notazione semplice ed
intuitiva; ad esempio:
[MANIFESTO]: Il manifesto del gruppo o discussioni su di esso;
[FAQ]: le FAQ o discussioni su di loro;
[.NET]: Discussioni generiche su .NET
Dopo questa notazione dovrà essere indicato sinteticamente il
problema/soluzione/considerazione. Da evitare assolutamente i Subject
generici e non chiari.
Tutte le informazioni utili per usare al meglio il newsgroup ed il
linguaggio C# saranno contenute nelle FAQ del newsgroup.
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.5 (GNU/Linux)
iD8DBQFBw0SWKR2cx8Sj7ywRAjWXAJ0Tx15zH5gpOFwrcNUGYVaG0wGeiQCeKIh+
GQocCI/g0hwkJsJa3dqPuH4=
=CTXr
-----END PGP SIGNATURE-----

   non sarà disponibile un newsgroup dedicato.
Gruppi dedicati ne esistono già...
Ciao

 Gruppi dedicati ne esistono già...
Credo si intendesse (il manifesto è del 2002) un gruppo dedicato a tutto 
il framework.
-- 
ale - 
http://www.sen.it
È in corso la CFV per per *it.comp.lang.csharp*, Si può leggere il
manifesto su news:it.news.annunci o news:it.news.votazioni

Newsgroup: it.comp.lang.visual-basic
Titolo: Upgrade a Visual Basic 4.0a

Qualcuno e' informato sull'esistenza di un upgrade della Microfost della
versione 4.0 di VB. 
In caso affermativo, vorrei sapere da quale indirizzo scaricare la
patch.
Andrea Lamonaca
and...@iqsnet.it

...

Newsgroup: it.comp.lang.visual-basic
Titolo: API e Listbox, API e handle...

Lo so che sono un principiante nell'utilizzo delle API di win, come
del resto capirete dalle seguenti domande, ma cercate di avere
pazienza...
1) "Non riesco ad aggiungere una stringa ad un controllo Listbox
tramite API (devo utilizzare SendMessage e AddString come parametro
vero!? Se si come?)"
2) "Io ho il percorso di un file eseguibile (variabile naturalemte),
lo devo avviare (con la funzione shell di VB ad es.) e dovrei ritrarre
l'handle della finestra creatasi all'esecuzione del medesimo!
E' possibile una cosa del genere?"
Grazie a tutti e scusate se ho detto qualche eresia! ;-)
               --Please also reply via E-Mail--
                      4169522043485253

2)
Sito Comune (URL nella firma) !
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

>Se ti serve per questioni di velocità o di flickering....
Infatti!
Paperino, Sei il Mio Mito!!! ;-)
Ciao e grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] news server disponibili ?

qualcuno puo' dirmi dove trovare un elenco di ns accessibili liberamente?
grazie mille, pal
===
Andrea Palazzi
pal at cedoc dot mo dot it
img - 
http://members.xoom.it/xday/
sw - 
http://www.comune.modena.it/cittadini/apal/html/
soc - 
http://www.comune.modena.it/associazioni/pomposa/html/
===

qualcuno puo' dirmi dove trovare un elenco di ns accessibili liberamente?
FAQ di it.news.aiuto
Saluti.
Fabrizio

 grazie mille, pal
diesel.cu.mi.it
news.megasys.it
pumba.class.udg.mx
 30000 NG
news.interbusiness.it
news.ethome.net.tw
news.net-one.it
news2.net-one.it
server1.nt.net
news.cpr.it
news.tin.it
nntpserver.vol.it
news.split.it
aquila.sni-usa.com
news.interbusiness.it
news.cs.interbusiness.it
news.easynet.it
news.iunet.it
206.139.152.37
ascu.unian.it
master.cdc.polimi.it
news.itu.ch
news.it.net
------------
news.globalnews.it
 a pagamento 25'000
--
Ciao!
==================================
Daniele Pinna
Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola OOPS
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
______________________________________
  La fantascienza come Star Trek non e' solo un buon divertimento, ma
assolve anche uno scopo serio, che e' quello di
espandere l'immaginazione umana.
  Limitare la nostra attenzione a questioni terrestri equivarrebbe a fissare
dei confini allo spirito umano.
Stephen Hawking
Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare Email html da Vb6

Come si fa ad inviare email in formato html da vb6 con il controllo mapi ??
Garzie
Antonio 

 Antonio
Prego
Ciao, Vincenzo

 ha scritto nel messaggio
news:d7i_d.667429$b5.30...@news3.tin.it...

Non uso MAPI, ma il protocollo SMTP č standard per tutti, e non saprei
se MAPI prevede formattazioni Native dei Boundary.
Se non ricordo male MAPI gestisce il MultiBoundary a differeza di altri
Controlli, io con Winsock mi sono adeguato al MultiBoundary e i costruisco
la stringa del messagio completa via Codice aggiungendo al messaggio MIME
la parte preposta all'Html.
      msgBody = msgBody & "--" & strBoundary & vbCrLf
      msgBody = msgBody & "Content-Type: text/html;" & vbCrLf
      msgBody = msgBody & vbTab & "charset=" & Chr$(34) & "iso-8859-1" &
Chr$(34) & vbCrLf
      msgBody = msgBody & "Content-Transfer-Encoding: 7bit" & vbCrLf
      msgBody = msgBody & vbCrLf
      msgBody = msgBody & MessaggeHtml & vbCrLf & vbCrLf
      ecc...!
Di fatto nel Messaggio č presente sia la parte SoloText che la parte HTML in
2
Boundary differenti.
Ovviamente devi ricorrere ad una RichText (che perň ha il Formato RTF)
convertire
il contenuto in HTML(sperando che vada tutto bene) ed inviarlo.
Purtroppo non ho trovato soluzioni alternative alla conversione via VB da
RTF-->HTML
ho provato anche passando per la ClipBoard sperando di far fare a Windows il
lavoro
sporco, ma non sono riuscito.
Non sň se puň esserti utile, non essendo MAPI, ma piů un concetto di
costruzione
Messaggio secondo protocollo SMTP.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


devi usare MAPI per forza? perché io ho usato (e pubblicizzato
parecchio, visto che č gratis e va bene) il controllo SMTP di
ostrosoft.
--
Ciao!
Luca Menegotto
Newsgroup: it.comp.lang.visual-basic
Titolo: E se vuoi la soluzione prendi in mano sto...

Function pari(n) As Boolean
  pari = (n And 1) = 0
End Function

Scusate... questa voleva essere la risposta a un messaggio recente nel N.G.,
è finito nella root erroneamente!

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto: Server dell'oggetto registrato non correttamente

Dopo aver istallato un programma ho il seguente problema:
i miei programmi che utilizzano DBlist, DBcombo, RichTextBox, SSTab, Common
Dialog.
 non funzionano piu'.
Il messaggio d'errore e' (da visual basic):"Server dell'oggetto registrato
non correttamente"
mentre se lancio l'eseguibile:   "Impossibile caricare (o registrare) il
controllo aggiuntivo: TABCTL32.OCX'
Come si fa a utilzzare un OCX ???
Ringrazio anticipatamente chiunque risolva il mio problema...
                                                                   Grazie
                                                                   Marco

L' OCX oltre ad essere copiato deve essere registrato con
 regsvr <path>+<nomeOCX>  se è a 16 bit  oppure
 regsvr32 <path>+<nomeOCX> se è a 32 bit,
dove il path, salvo eccezioni, è quello di Windows\System.
Ciao.


Newsgroup: it.comp.lang.visual-basic
Titolo: Per Quelli Bravi

Come posso procurarmi SP4 per VB6 italiano senza passare 10 notti davanti al
modem ? Magari su CD.(pagando ... s'intende)
                Claudio

 wrote in message
Y5l96.6198$FL1.1...@twister2.tin.it...

Conoscendo microsoft...
avvia lo scaricamento e vai a letto.
Ciao
Davide
Newsgroup: it.comp.lang.visual-basic
Titolo: utilizzare una dll di visual studio 2005

vorrei utilizzare una dll che ho "dovuto" fare con VS2005 ma non riesco
a trovare il modo di utilizzarla in VB6:
qualcuno sa come fare?
grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 vorrei utilizzare una dll che ho "dovuto" fare con VS2005 
tanto per capirci prima di andare avanti: che tipo di dll hai prodotto?
dll windows standard, activeX o .net?
-- 
ciao, hal

 qualcuno sa come fare?
Basta "decorare" le classi che vuoi esporre al mondo COM con l'attributo 
<ComClass...>.
Se aggiungi al tuo progetto una nuovo Item di tipo "Com Class", vedrai 
tutto (è molto, molto semplice)
Ti consiglio la lettura di questo articolo:
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 Ti consiglio la lettura di questo articolo:
"Can I Interest You in 5000 Classes?"
(Using the Full .NET Framework from Visual Basic 6)
http://msdn.microsoft.com/vbrun/vbfusion/default.aspx?pull=/library/en-us/dv_vstechart/html/VB5000Cl.asp
E più in generale, se devi interagire tra .NET<->VB6:
http://msdn.microsoft.com/vbrun/vbfusion/
Ciao


oppure, in italiano e su questi stessi "schermi":
http://groups.google.it/group/it.comp.lang.visual-basic/browse_thread/thread/e1f663c04ed46c11/eac35c82a9623dbb?lnk=st&q=andrea+saltarello+ComClass&rnum=1#eac35c82a9623dbb
-- 
.A    [Microsoft MVP .NET]
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://blogs.ugidotnet.org/pape

Newsgroup: it.comp.lang.visual-basic
Titolo: Maschere stile Access [VB6]

Salve a tutt*, e' la prima volta che programmo seriamente in Visual
Basic: scusate le domande eventualmente gia' poste.
1. Io ho sempre lavorato in VBA sotto Access, pero' questa volta
*devo* sviluppare un progetto in VB6 [prendere o lasciare. Ho preso].
2. Ho sviluppato il tutto - come sempre - in VBA su Access, pensando
che poi avrei tradotto e nel frattempo fornito al cliente una
versione provvisoria per rispettare i tempi.
3. Ora sono arrivato alla traduzione e vengo alla domanda vera e
propria:
_____________________________________________________________
Vorrei le maschere come le avevo sotto Access. E' possibile?
_____________________________________________________________
Tutto qua.
Grazie a chiunque rispondera'.
-- 
Giacomo Alessandroni      
g.aless...@peacelink.it
Associazione PeaceLink    
http://www.peacelink.it/
VoIP @ Wengo/Skype        
callto://galessandroni

 Vorrei le maschere come le avevo sotto Access. E' possibile?
E come le avevi in Access?
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con il componente Common dialog

Salve...ho un problema. Io uso windows 2000 con service pack 3...e uso il
visual basic 5.0. quando provo ad usare il  componente Common Dialog box e a
metterlo sul form mi compare :
"Non sono disponibili informazioni sui diritti di licenza per questo
componente. Non sono disponibili i diritti di licenza necessari per
utilizzare questa funzione in ambiente di progettazione"
Un mio amico mi ha spiegato che devo passare al Visual basic 6.0 per
utilizzarlo con il service pack 3.0.
Le mie domande sono:
1) Cosa posso fare per ovviare al problema?
2) E vero totalmente quello che dice il mio amico?
3)  Se le cose stanno così, significa che se io avessi visual basic 6.0 e
creassi un'applicazione, significa che chi non ha windows 2000 con service
pack 3 , non potrà far girare l'applicazione sulla sua macchina?
Grazie mille
Davide
--
=======================
Non approvo ciò che tu dici,
ma difenderò a costo della
mia vita il tuo diritto a dirlo ( Voltaire )
=======================

 ha scritto nel messaggio
news:fFlU9.112053$TC5.3...@twister1.libero.it...


 ha scritto nel messaggio
news:ucmU9.112206$TC5.3...@twister1.libero.it...


 e-mail...gli spiegherò cosa fare..grazie comunque
Davide, la caratteristica principale di un NewsGroup è quella di essere
d'aiuto a tutti e di essere pubblico. Faresti una cosa giusta se pubblicassi
qui una breve descrizione di ciò che ti ha fatto superare il problema. Non
pensi? Grazie.

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] - Capire se l'applicazione è richiamata da Terminal Server

Non sono riuscito a trovare docuemntazione su come capire che un 
utente sta utilizzando l'applicazione da Terminal Server. E come 
capire quanti la utilizzano se possibile...
Sapete darmi una dritta?
-- 
Vincenzo
VB6+SP5 Windows 2000 SP4
MSDE 8

 Sapete darmi una dritta?
Const SM_REMOTESESSION As Long = &H1000
Declare Function GetSystemMetrics Lib "user32" (ByVal x As Long) As Long
Public Function Terminals() As Boolean
   Terminals= (GetSystemMetrics(SM_REMOTESESSION) <> 0)
End Function
verifica se bisogna gestire eventuali errori dell'api GetSystemMetrics
termoPilucco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
Grazie!
ora cerco anche un po di documentazione sull'api

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]MouseOver

Qual è il sistema più semplice per sapere se il mouse si trova sopra ad un
controllo?
Mi serve qualcosa che funzioni tipo le flatbar per intenderci.
Non ammetto l'uso di timer per verificare a tempo la pos. del cursore, e
ovviamente la MouseMove() non funziona perchè non dice quando il mouse è
fuori dalla client-area.
Grazie, ciao a tutti.


Beh, non so se è proprio quello che cerchi ma io, per creare dei
CommandButton che si evidenziano quando ci passi sopra con il mouse, ho
fatto cosi:
Prima di tutto inserisci un Timer nel controllo (So che hai detto che non lo
accettavi, ma prima di giudicare continua a leggere tutto  il messaggio) con
enabled=false
All'Evento mouse_move fai partire il timer se Timer.enabled=false
All'Evento timer_timer controlli che il mouse sia sul controllo con la Api
Getcursorpos.
Se il mouse non è più sul controllo riimposti la proprietà enabled di Timer
su False.
Come vedi il Timer c'è, ma viene usato solamente quando il mouse è sopra il
controllo.
Spero di esserti stato utile.
PS Ma le Flatbar sono quei pulsanti che diventono 3d quando ci passi sopra?


L'uso di un timer e' una soluzione per nulla elegante (oltre che essere
dispendiosa per l'uso di risorse).
Soluzione 1: (codice copiato direttamente da un mio OCX che fa i pulsanti
flat ;-)
usi l'evento MouseMove e le API GetCapture, SetCapture e ReleaseCapture.
Private Sub UserControl_MouseMove(Button As Integer, Shift As Integer, x As
Single, y As Single)
    If (GetCapture <> UserControl.hwnd) Then
        SetCapture UserControl.hwnd   ' catturo il mouse
        RaiseEvent MouseEnter
    Else
        If ((x < 0 Or x > UserControl.Width) Or (y < 0 Or y >
UserControl.Height)) Then
            ' se mi trovo al di fuori del controllo
            ReleaseCapture
            RaiseEvent MouseLeave
        Else
            RaiseEvent MouseMove(Button, Shift, x, y)
        End If
    End If
End Sub
Soluzione 2: (non l'ho mai provata)
subclassing del controllo e gestione del messaggio WM_NCMOUSEMOVE.
--
Roal Zanazzi
z...@iol.it

subclassing del controllo e gestione del messaggio WM_NCMOUSEMOVE.
Era quello che volevo evitare! Io l'ho provata, funziona, ma è un casino...
:(
Grazie, ciao.


Va beh, comunque io uso la prima soluzione e funziona bene.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Parametri passati da linea di comando

Ciao a tutti e Buona Pasqua,
come da oggetto ho bisogno di intercettare un variabile passata dalla linea
di comando al mio eseguibile. Come fare?
Spero di essermi spiegato. Grazie a tutti quanti mi vorranno aiutare.
Ciao Amadeus.

 wrote in message
news:65Soa.41379$LB6.9...@news1.tin.it...

Prova a leggere la variabile Command. Dico "prova" perchè ho appena
reinstallato il sistema operativo e non ho ancora le guide per darti
conferma.
Ciao e buona Pasqua anche a te!

Era propio Command. Grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: prelevare dati

Salve sono nuovo della programmazione e volevo informazioni riguardante
questa dicitura:
Premetto che uso vb6 e file di access.
rs.Open "select * from data where rid='" & tRid & "'", con, adOpenDynamic,
adLockPessimistic
Tutto funziona se il record "rid" e in formato testo ma se metto in formato
numero mi restituisce l'errore run-time -
2147217913
(80040e07)
tipi di dati non corrispondenti nell'espressione criterio.
Che operazione sbaglio?

 ha scritto nel messaggio
news:cdtsb9$33k$1...@lacerta.tiscalinet.it...

Prova a togliere gli apicetti, di solito sono utilizzati per tipo testo
 "select * from data where rid=" & tRid
oppure
 "select * from data where rid=" & cint(tRid)
una letta della guida per l'argomento:
Funzioni di conversione del tipo
Ave
giuseppeD
---
CCR

Grazie funziona correttamente.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] combo click e dblclick

Private Sub Combo1_click()
    Print Combo1.ListIndex & " -- " & Combo1
End Sub
perche' questo comando funziona con click ma con dblclick non da' segno di
vita ?
come si dovrebbe intercettare il dblclick nel combo ?

 wrote in message 87kim2$jhu$8...@nslave2.tin.it...


 > Private Sub Combo1_click()


il dblclick č utilizzabile in ragione dello stile del combo...
ahi ahi ahi...
;)
--[GbC]--

 ;)
raddoppia pure i tuoi lamenti :)
che lo metta a 0, 1, 2 --> alcun segno di vita...

 > il dblclick è utilizzabile in ragione dello stile del combo...


 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: ? come togliere arrotondamento automatico

dim alt as single
dim peso as integer
dim result as single
alt= alt/100   ' ad esempio 1,80
alt=alt*alt
result=format(peso/alt,"#.#")
ora io vorrei che una sola cifra decimale ma noto che Vb automaticamente me
la tronca....24,9  mi scrive 25,     forse la virgola finale significa che
ha troncato ma io non intendo farglielo fare.....CHE FARE ??
THanks

 wrote

Non mi e' chiaro cosa intendi. Il tuo codice, con alt = 180, se peso = 80
da' come risultato 24,7 (24,69136) e 25 se peso = 81. Giustamente, credo.
Pero' non capisco il senso di usare Format per assegnare a result (single)
peso/alt. Forse quello che vuoi potresti ottenerlo cosi':
result = peso/alt
MsgBox Format$(result, "0.0")
... e nel caso di alt = 180 e peso = 81 vedresti "25,0".
Ciao.
Maurizio

 result=format(peso/alt,"#.#")     '24,977...
ora non sono ancora riuscito a troncare in 24,9    mi restituisce sempre
25,0
ok che conosco il calcolo numerico ed l'arrotondamento č corretto, ma
desidero il troncamento incondizionato.. COSA FACCIO ??
thanks


 wrote in message
864t3k$npk$1...@lacerta.tiscalinet.it...

 desidero il troncamento incondizionato.. COSA FACCIO ??
Troncare vuol dire togliere i decimali, quindi PRIMA di troncare 24.977 devi
seguire questa logica:
24.977 * 10 = 249.77
Fix(249.77) = 249
249 / 10 = 24.9
Format$(24.9, "0.0") = "24,9"
... se 'stavolta ho interpretato bene.
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL e controllo data

Salve,
uso vb6 sp5 su windows NT workstation. Ho un form contenente un
controllo data e una true dbgrid 6. Non riesco ad accedere al recordset
del controllo data, infatti ogni volta che provo (con instruzioni del
tipo data1.recordset.clone, data1.recordset(0), ...) ottengo l'errore
"Errore di caricamento DLL".
Sono io che sbaglio qualcosa o c'è un problema di altro tipo?
Nicola.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
6d6ac643dc28a3334ac...@mygate.mailgate.org...


 > --


Ho scaricato dal sito Microsoft il Componet Checker (miii... è free! non
ci posso credere). Ho installato sulla macchina di produzione MDAC RTM
2.50.4403.12
Il Component Checker ha effettivamente riscontrato degli errori:
Item Name,        Item Type, ErrorString,Status
mtxdm.dll,        File,Field 'FileVersion' mismatch: Expect
'1999.9.3421.3' Got '1999.6.902.0',Error
MSVCRT.DLL,       File,Field 'FileVersion' mismatch: Expect
'6.10.8637.0' Got '6.00.8797.0',Error
odbccp32.cpl,     File,Field 'FileDescription' mismatch: Expect
'Microsoft Data Access - ODBC Control Panel' Got 'Microsoft Data Access
- Pannello di controllo ODBC',Error
odbcint.dll,      File,Field 'FileDescription' mismatch: Expect
'Microsoft Data Access - ODBC Resources' Got 'Microsoft Data Access -
Risorse ODBC',Error
STDOLE2.TLB,      File,Field 'FileDescription' mismatch: Expect '' Got
'Microsoft OLE 2.40  for Windows NT(TM) and Windows 95(TM) Operating
Systems',Error
ASYCFILT.DLL,     File,Field 'FileDescription' mismatch: Expect '' Got
'Microsoft OLE 2.40  for Windows NT(TM) and Windows 95(TM) Operating
Systems',Error
OLEPRO32.DLL,     File,Field 'FileVersion' mismatch: Expect '5.0.4512'
Got '5.0.4277',Error
OLEAUT32.DLL,     File,Field 'FileDescription' mismatch: Expect '' Got
'Microsoft OLE 2.40  for Windows NT(TM) and Windows 95(TM) Operating
Systems',Error
Item Name,
Item Type,    ErrorString,Status
HKEY_LOCAL_MACHINE\SOFTWARE\Classes\MSDASC\DefaultIcon,
Registry,     Field 'Value' mismatch: Expect 'C:\Program Files\Common
Files\System\Ole DB\oledb32.dll^0' Got 'C:\Programmi\File
comuni\System\OLE DB\oledb32.dll^0',Error
HKEY_LOCAL_MACHINE\SOFTWARE\Classes\MSDASC\shell\open\command,
Registry,     Field 'Value' mismatch: Expect 'Rundll32.exe
C:\PROGRA~1\COMMON~1\System\OLEDB~1\oledb32.dll^OpenDSLFile %1' Got
'Rundll32.exe
C:\PROGRA~1\FILECO~1\System\OLEDB~1\oledb32.dll^OpenDSLFile %1',Error
ai quali sto cercando una soluzione. Hai qualche suggerimento? e quale
potrebbe essere alla luce dei nuovi fatti la causa del problema
originario?
Thanks,


 wrote in message
9658d5e82ac446ae669...@mygate.mailgate.org...


 JoyVB



Io, aggiornando al 2.6, ho avuto qualche problemino con il refresh dei
dbgrid. Poca cosa.
Basta lanciare l'aggiornamento.
Ironman
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllare esistenza oggetto

Ciao a tutti!
In un programma ho la necessità di creare oggetti a run time e di
cancellarli. Fin qui tutto ok, però volevo sapere se esiste un modo per
sapere se un oggetto esiste oppure no.
Ad esempio: ad un certo punto io creo un oggetto label così:
Load oggLabel(i)
Dopodichè dopo un po' lo cancello:
Unload oggLabel(i)
Adesso immaginando di avere altri oggetti label come posso fare a sapere
se un determinato oggetto esiste oppure no?
Io avevo fatto un ciclo di questo tipo ma mi da' errore:
For i = 0 To totLabel-1
  If oggLabel(i) = Nothing Then ' L'oggetto non esiste più
    ...............
  End if
Next
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio

Prova a usare la mia classe ObjectArray che trovi qui:
www.neodatatype.net/downloads/_VB6/flowChart/sources/objectarray.cls
L'avevo fatta proprio per semplificare la vita con i controlli caricati a 
runtime:
Passi alla Init il tuo array:
oa.Init(objLabel)
e poi puoi aggiungere e togliere elementi in modo trasparente con
oa.Add()
oa.Remove(objLabel(i))
oa.RemoveAt(Index)
ecc...
Nella sub dell'evento per avere l'oggetto relativo basta chiamare
oa.EventItem(Index)
Ciao

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

Salve a tutti, ho un problema con l'utilizzo della inet...
 URLACCESSO = "ftp://" & txtUserID.Text & ":" & txtPassword.Text & "@" &
txtHost.Text
Ftp.Inet1.Execute URLACCESSO
ma sembra non funzionare...
non è che magari l'errore è dovuto al fatto che la login è di Aruba del tipo
xxxxxx@aruba .it
Al massimo vorrei sapere come fare a sapere quale errore si è verificato
Grazie.
Stefano

 verificato Grazie.
Se non lo sai tu... hai controllato che errore restituisce l'oggetto?
Scusa ma la sfera di cristallo è in riparazione! :(

 funzionante su internet?
Non è mia intenzione far sprecare a te il tuo prezioso tempo; ovviamente
prima di postare ho fatto tutte le prove neccessarie e le ricerche del caso.
Non avendo trovato la soluzione ho semplicemente chiesto un parere.
Grazie cmq per la sollecita quanto inutile risposta.
Stefano

 risposta.
Tu hai posto un quesito del tipo "Stò sviluppando un programma che "sembra"
non funzionare e non fa l'operazione generica per la quale è stato
progettato mi sapete dire dov'è l'errore?"... per questo ci vuole una sfera
di cristallo... o io almeno non sono capace...
Non hai fatto tutte le prove necessarie altrimenti nel messaggio avresti
detto: l'oggetto mi restituisce l'errore... si connette ma non autentica...
si connette autentica ma non scarica ecc... :(
hint... una volta impostate correttamente le proprietà sfrutta l'evento
StateChanged per vedere cosa stà succedendo e dove si ferma...
hint^2 F1 F1 F1 :-)

[CUT]
Vabbé.... chiudiamo questa Flame! :)
Magari me la son presa troppo per niente.... ma quando ti sbatti sapendo che
quello che stai facendo č giusto ma non funziona non ci vedi piů! :)
Cmq ho risolto...
Era un problema con la configurazione della rete (quindi il prg era
giusto! ) per cui con un modem ethernet bisogna mettere qualche accorgimento
in accesso remoto.
Ciao
 E visto l'orario buon pranzo! :))
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: REENTRANCY

Cosa diavolo è la REENTRANCY??'
Simo

 
In genere si intende la possibilita' di una funzione , o procedura di
essere richiamata piu' volte contemporaneamente,
un esempio classico sono le routine d'interrupt dove e' possibile che
una routine sia richiamata ( o meglio attivata da un nuovo interrupt )
durante la sua stessa esecuzione, oppure un altro esempio, anche se piu'
controllabile, sono le procedure ricorsive dove e' se stessa a
richiamarsi, quindi in un contesto piu' controllato. 
Il classico problema che rende una routine non rientrante ( traduzione
italiana di REENTRACY ) e' l'uso di variabili globali o statiche al suo
interno per mantenere temporaneamente dei dati in elaborazione

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

Qualcuno sa dove reperire informazioni (alias HELP) su
suddetto OCX. Su MSDN non c'è nulla.
Sono riuscito a creare un piccolo browser, ma mi interesserebbero
anche le piccole funzionalita (sapere cosa fanno tutti i metodi, gli eventi
e le
proprietà).
Grazie a tutti.
Bye

http://msdn.microsoft.com/workshop/browser/webbrowser/reference/Objects/WebB
rowser.asp
In questo momento il sito msdn non funziona, comunque dovresti trovare
quello che ti serve.

 wrote


...



http://msdn.microsoft.com/workshop/browser/webbrowser/reference/Objects/Web


 wrote

Newsgroup: it.comp.lang.visual-basic
Titolo: [API] Mi piacerebbe avere questo Tips

Qualcuno sa (cerco codice completo e funzionante...da incollare)
come individuare se un eseguibile è per DOS  o per WINDOWS???
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

 come individuare se un eseguibile è per DOS  o per WINDOWS???
Ciao, passavo un'attimo di qui e vado di corsa...
Nell'header del file c'è "qualche" differenza, così a memoria non ricordo,
comunque negli .exe per Win _credo_ si dovrebbe trovare sempre la scritta
"This program cannot be run in DOS mode" nel primo Kb...
Per ora prendilo con beneficio d'inventario, domani guardo meglio !
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com


No code, sorry.
Ma la differenza dovrebbe essere nell'header dell'EXE.
Su 
www.wotsit.org
 mi pare ci sia la documentazione relativa agli header.
P.S. se metti [API] davanti a _tutti_ i tuoi messaggi, qualcuno si potrebbe
confondere.
E' meglio se usi [API] solo per i msgs relativi all'API ;-)
--
Roal Zanazzi
z...@iol.it




Trovato! Però non l'ho testato!
Spero che funga! ;-)
CiaooOO!
     Dichiarazione API e funzione da inserire in un modulo BAS:
     Declare Function GetBinaryType Lib "kernel32" _
                     Alias "GetBinaryTypeA" ( _
                     ByVal lpApplicationName As String, lpBinaryType
As Long) As Long
     Public Function TipoExe(NomeFile As String) As String
         Dim Dummy As Long, TipoFile As Long
         Dummy = GetBinaryType(NomeFile, TipoFile)
 
         If Dummy = 1 Then
             Select Case TipoFile
                 Case 0
                     TipoExe = "Programma a 32 Bit per Windows"
                 Case 2
                     TipoExe = "Programma a 16 Bit per Windows"
                 Case 1
                     TipoExe = "Programma per DOS"
                 Case 5
                     TipoExe = "Programma per OS/2"
                 Case 3
                     TipoExe = "Programma Windows generico, File PIF"
                 Case 4
                     TipoExe = "File in formato eseguibile POSIX per
Unix"
             End Select
         Else
             TipoExe = "Il file non è un eseguibile"
         End If
     End Function
               --Please also reply via E-Mail--
                      4169522043485253
Newsgroup: it.comp.lang.visual-basic
Titolo: DXF

Un mio vecchio programma creava file DXF.
Riesco ad importare il file sia in PaintShop che in AutocadLT 2, ma non in
AutocadLT 3.
E fin qui potrebbe essere normale, non conoscendo le specifiche dxf l'ho
fatto in modo empirico e qualcosa non ha funzionato. Ma la cosa strana è
che se io esporto in dxf da AutocadLT 3 e provo ad importare in PaintShop
questo si pianta con un bel divide by 0!
Qualcuno mi sa dire qual'è il modo più sicuro per creare un dxf solido?
Dove trovo le specifiche?
Grazie, Stefano

 Dove trovo le specifiche?
Prova a vedere 
ftp://teeri.oulu.fi/pub/msdos/graphics
 o simile...
Tempo fa c'erano tutte...
Newsgroup: it.comp.lang.visual-basic
Titolo: Unità cd-rom e lettura del titolo associato e file temporanei

Ciao,
le mie domande sono tre
1) Ho un codice che trova i lettori cd-rom su una macchina. Secondo Voi
funzia pure per masterizzatori e lettori dvd ?
2) Ok, riconosco un'unità cd-rom.
    *) Come posso vedere se dentro è inserito un cd ?
    *) Come faccio a sapere come è intotolato [label] ?
3) Come si fa in VB a creare dei file temporanei ?
Grazie a tutti e buona giornata
C.

 ha scritto nel messaggio
news:rT4j6.14482$LM4.2...@twister1.tin.it...


>     *) Come posso vedere se dentro è inserito un cd ?
Io di solito utilizzo un metodo "barbaro"...
Provo ad accedere all'unità e se viene generato un errore allora vuol dire
che non esiste.
Ti faccio un esempio:
Private Sub Test()
    Dim strCurDir As String
    On Local Error GoTo Error_Drive
    strCurDir = CurDir
    ChDir "D:\" ' Ma potrebbe essere una qualsiasi unità...
    ChDir CurDir
    Exit Sub
Error_Drive:
    If Err.Number = 68 Then ' Errore 68 : la periferica non c'è!!!
        MsgBox "Periferica Non Disponibile", vbCritical, "Attenzione."
    Else ' Altro errore...
        MsgBox "Errore " & Str(Err.Number) & " : " & Err.Description,
vbCritical, "Attenzione."
    End If
End Sub
Per gli altri tuoi quesiti non ti so aiutare...
CiaoZ!

 ha scritto nel messaggio
news:rT4j6.14482$LM4.2...@twister1.tin.it...


3) Come si fa in VB a creare dei file temporanei ?
Riguardo al cd ti hanno gia' risposto gli altri.
Per creare dei file (temporanei o non), puoi usare le funzioni
vb tradizionali (vedi istruzione Open sulla guida in linea)
oppure usare il FileSystemObject (esposto da scrrun.dll), anche
questo documentato sull' help in linea.
Su entrambi i metodi il ng e' pieno di esempi.
Se la domanda e' intesa nel senso di:
1. Qual e' la directory temporanea di sistema ?
2. Come attribuire un nome univoco al file ?
Le risposte sono:
1. e' possibile usare il solo vb: 
Environ$("TEMP") restituisce "C:\Temp" o "C:\Windows\Temp" o quello che e'.
2. e' piu' comodo usare l' API di windows:
Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" ( _
            ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
Private Declare Function GetTempFileName Lib "kernel32" _
        Alias "GetTempFileNameA" (ByVal lpszPath As String, _
        ByVal lpPrefixString As String, ByVal wUnique As Long, _
        ByVal lpTempFileName As String) As Long
Public Function VBGetTempFile(Optional a_Prefix As String) As String
  Dim buffer As String
  Dim mi_Path As String
 
  buffer = String$(MAX_PATH, Chr$(0))
  If GetTempPath(MAX_PATH, buffer) Then
    mi_Path = StrFromSz(buffer)
    If GetTempFileName(mi_Path, a_Prefix, 1, buffer) Then
      buffer = StrFromSz(buffer)
      VBGetTempFile = buffer
    End If
  End If
 
End Function
VBGetTempFile ritorna un nome univoco di file con percorso nella dir
temporanea di sistema.
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: autenticare un utente NT

E' possibile da VB verificare che login/password fornite dall'utente siano
valide secondo il database degli utenti di NT?
Ovviamente non mi interessa direttamente andare a leggerlo, mi basterebbe
solo poter chiamare una funzione che risponda dicendo se i dati passati sono
validi oppure no...
Sto scrivendo un'applicazione che ha delle protezioni di accesso, e vorrei
poter usare account/password uguali a quelle del dominio; cosě gli utenti
non devono impararle di nuovo e se cambiano password si trovano il cambio
direttamente anche nel mio applicativo...
grazie mille
oly...@spm.it

Non se sia possibile una cosa come chiedi tu.
Perň potresti mettere i tuoi dati in una posizione di rete condivisa con la
protezione NT, quando un utente tenta la lettura se non č autorizzato
semplicemente non entra. :-)
CIAO!!!
-------------------------
Francesco Picchi

semplicemente non entra. :-)
non č cosě facile... tutti devono entrare ad eseguire il programma, colo che
questo deve comportarsi diversamente a seconda di chi si  č autenticato..
ciao ciao
oly...@spm.it