mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come fare per sapere a chi è registrato Windows

come da oggetto, sapete se c'č un'API per sapere a chi č
registrato il sistema operativo? In pratica mi servirebbero
i dati esposti nella finestra richiamabile dal pannello di
controllo, sistema.
ciao e grazie a tutti
Rea

 controllo, sistema.
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion
RegisteredOrganization
RegisteredOwner
Questo in win98SE.
ciao
		maxx

 > come da oggetto, sapete se c'è un'API per sapere a chi è


Newsgroup: it.comp.lang.visual-basic
Titolo: Percorsi locali e di rete

Ciao a tutti
Come si fa a sapere se un percorso è locale o di rete?
Es:
C:\Documenti
D:\Documenti (dove però D fa riferimento ad un altro pc connesso come unità
di rete)
\\ sever01 ...
Grazie
Ciao
Luca

 Come si fa a sapere se un percorso è locale o di rete?
P.es. potresti chiamare la funzione GetDriveType delle api e testare il
ritorno (4) sulla root del path.
--
rumplestiltskin

 ritorno (4) sulla root del path.
Grazie
Tutto Ok
Ciao
Luca
Newsgroup: it.comp.lang.visual-basic
Titolo: VB e Linea di Comando

è possibile in VB scrivere un codice equivalente alla
esecuzione della linea di comando del Dos ?
ovviamente non la semplice chiamata di un File
eseguibile, ma una qualunque sequenza di istruzioni
e parametri da includere nella dichiarazione.
qualcuno mi sa dare chiarimenti ?
grazie, ramarro.

e parametri da includere nella dichiarazione.
Se intendi il passaggiodi argomenti sulla riga di comando,
allora guarda la funzione Command$ sulla guida di vb.
hth, hal

 wrote in message
news:dLJ37.81229$cd.4...@news1.tin.it...


 wrote in message
OYJ37.81284$cd.4...@news1.tin.it...


FROM MSDN:
Restituisce la parte degliargomenti dellariga di comando utilizzata per avviare Microsoft Visual Basic o un programma eseguibile
sviluppato con Visual Basic.
Sintassi:  Command
Quando Visual Basic viene avviato dalla riga di comando, qualsiasi parte della riga di comandi successiva a /cmd viene passata al
programma come argomento della riga di comandi. Nell'esempio seguente, argomentirigadicomando rappresenta gli argomenti restituiti
dalla funzione Command.
VB /cmd argomentirigadicomando
Per le applicazioni sviluppate con Visual Basic e compilate in un file exe, Command restituisce tutti gli argomenti visualizzati
dopo il nome dell'applicazione nella riga di comando. Ad esempio:
MyApp argomentirigadicomando
Per informazioni su come modificare gli argomenti della riga di comando utilizzando l'interfaccia utente dell'applicazione, cercare
la voce "argomenti della riga di comando" nella Guida in linea.
CIAO SIMO
--
__________________
www.sasim.cjb.net


 il mio precedente messaggio era il seguente:
[SNIP]
la risposta al tuo precedente messaggio era la seguente ;-)
---
E allora dillo che sei anche tu un maniaco di computer chess!! :-)
Per tornare in argomento e' sufficiente utilizzare la funzione Shell, stando
solo attenti al carattere "; ad esempio (spezzato su piu' righe per
chiarezza):
Dim strCommand As String
strCommand = "c:\programmi\winboard\winboard.exe -cp"
'aggiungiamo la stringa 'c:\scacchi\faile' racchiusa tra ""
strCommand = strCommand & " -fd " & Chr$(34) & "c:\scacchi\faile" & Chr$(34)
'stessa cosa per il nome dell'eseguibile...
strCommand = strCommand & " -fcp " & Chr$(34) & "faile.exe" & Chr$(34)
'eseguiamo il comando risultante
Shell strCommand
[MODE PUBBLICITA ON]
Se sei un programmatore e ti interessi di scacchi dai un'occhiata al sito
del Gruppo Scacchi E Informatica all'indirizzo 
www.gsei.org
 , dove trovi
TUTTI i motori italiani compatibili winboard, tra cui un paio scritti (non
ridere) in VB; uno di questi e' il mio e per svilupparlo mi sono basato
proprio sui sorgenti di un vecchio Faile ;-)
[MODE PUBBLICITA OFF]
Ciao
--
Luca Dormio
luca....@tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: dbcombo e relazioni

Salve a tutti.
Nel mio progetto c'e' un form che contiene due dbcombo collegati a due
tabelle che su access risultano collegate tra loro da una relazione una a
molti.
tab : diplomi
dipl_cod
dipl_des
tab : subdiplomi
s_dip_cod
s_dip_des
dipl_cod
collegate tramite il campo dipl_cod
Ora, mi chiedo, se nella tabella diplomi ci sono inseriti i seguenti campi
01 magistrale
02 classico
03 tecnico
e in quella subdiplomi
s_dip_cod = 01
s_dip_des =  ragioneria
dipl_cod = 03
s_dip_cod = 02
s_dip_des =  geometra
dipl_cod = 03
s_dip_cod = 03
s_dip_des =  altro
dipl_cod = 01
perche' quando richiamo il combo1 (collegato a diplomi) ed il combo2
(collegato a subdiplomi) quando seleziono sul combo1 03 sul combo2 non ho
soltanto i codici 01 e 02 ma invece ce li ho tutti (compreso quello con
dipl_cod = 01 ?
Spero di essermi spiegato bene. Attendo vs risposte grazie.

 quello con dipl_cod = 01 ?
Perchè le relazioni servono a verificare/mantenere l'integrità dei dati (non
puoi, per esempio e se non erro, cancellare in una tabella un record che sia
relazionato con un altro in altra tabella tramite un campo di relazione di
stesso valore), non a selezionare le informazioni. Da quest'ultimo punto di
vista, le diverse tabelle sono del tutto indipendenti fra loro.

 vista, le diverse tabelle sono del tutto indipendenti fra loro.
Bene, quindi devo gestire tutto da sql, giusto ?
Puoi spiegarmi perche' questo codice banale non va ?
Private Sub DBCombo1_LostFocus()
    c1 = StrConv(DBCombo1, vbUpperCase)
    sqlsel = "SELECT * FROM subdiplomi WHERE dipl_cod =  " & c1
    subdiplomi.RecordSource = sqlsel
    subdiplomi.Refresh
end sub
subdiplomi = oggetto data2 rinominato subdiplomi
errore : tipi di dati non corrispondenti nell'espressione criterio. eppure
se osservo sqlsel e' giusta : SELECT * FROM subdiplomi WHERE dipl_cod =  03
e col codice (dipl_cod) 03 nel database subdiplomi ci sono altre 2 voci ?
Grazie

     sqlsel = "SELECT * FROM subdiplomi WHERE dipl_cod =  '" & c1 & "'"
ovvero il valore/stringa va passato fra apicini.

 ovvero il valore/stringa va passato fra apicini.
Giusto. Grazie infinite.
Newsgroup: it.comp.lang.visual-basic
Titolo: Crea un file eseguibile per aprire file esterni

Ciao a tutti,
devo creare un file eseguibile in VisualBasic che sia in grado (leggendo
alcune impostazioni da file TXT esterni) di scrivere un file *.BAT e
avviarlo.
Il problema però non sta in questo ma nel fatto che l'applicazione non deve
avere finestre di dialogo ma deve essere semplicemte avviata e fare quello
che deve fare senza far vedere niente all'utente che la utilizza; o meglio
l'utente vedrà solo la finestra DOS che si apre e si chiude.
Il codice che ho scritto è questo:
Sub avviafile()
    bat = "c:\file\avvia.bat"
    Open bat For Output As #1
    Print #1, "c:"
    Print #1, "cd\"
    Print #1, "prova.txt"
    RunTillFinished (Chr(34) & bat & Chr(34)) ' Questa funzione è definita
in un modulo
End Sub
Come devo fare? Devo scrivere il codice all'interno di un modulo? come
faccio a dergli che questo codice va eseguito appena si fa doppio click sul
file eseguibile?
Spero in un vostro aiuto.
Ciao a tutti da Emiliano

Chiama la tua funzione (avviafile) come Main e mettila in un normale modulo
Poi vai nelle proprieta del progetto da Progetto -> Proprieta di ....
(ultima voce)
Nella prima schermata che troverai c' un combo con etichetta "Oggetto di
avvio", apri il combo e seleziona Sub Main.
Questa operazione dice all'exe di avviare per prima cosa la funzione Main!
Spero di essere stato chiaro!
Ciao
~~~~~~~~~~~~~~~~
Andrea Fabbrucci
anfa...@tin.it
Fax: 0761 0131187
~~~~~~~~~~~~~~~~
Newsgroup: it.comp.lang.visual-basic
Titolo: -- verificare l'esistenza di un indirizzo in rete

come posso fare x verificare l'esistenza di un indirizzo in rete.
Se voglio ad esempio accertare che l'indirizzo 
www.virgilio.it
 sia
corretto,potrei collegarmi con il controllo Winsock utilizzando la
porta 80,e se la connessione va a buon fine vuol dire che il server
esiste realmente.
Pero' devo sempre stabilire una reale connessione,cioe' entrare
effettivamente nel server!!!
Quindi ci sarebbe un altro sistema meno "invasivo"???

 ha scritto nel messaggio
news:aar49c.3...@478.m3qq.876...
| come posso fare x verificare l'esistenza di un indirizzo in rete.
| Se voglio ad esempio accertare che l'indirizzo 
www.virgilio.it
 sia
| corretto,potrei collegarmi con il controllo Winsock utilizzando la
| porta 80,e se la connessione va a buon fine vuol dire che il server
| esiste realmente.
| Pero' devo sempre stabilire una reale connessione,cioe' entrare
| effettivamente nel server!!!
non sarei...
non c'e' qualcosa come nslookup??
ovvero una funzione o tool che ti risolva
il nome rivolgendosi semplicemente ad un
dns??
--
[ Penguin At Work ]
-> 
http://web.tiscali.it/penguinatwork/
-> aka Fustino Di Dixan while working

 wrote in message
aar49c.3...@478.m3qq.876...


 dns??
Dipende cosa significa "Esiste in rete".
Se vuoi sapere se un indirizzo è registrato e risolvibile, allora è perfetto
il DNS (con arp, al limite)
Se invece si vuole sapere se l'indirizzo risolto è valido e il server è
attivo, occorre necessariamente stabilire una connessione. Purtroppo non
tutti i server supportano il Ping o il Telnet, per cui l'unica è fare un
accesso http o ftp (a seconda del server).
Ciao
Alberto

 ha scritto nel messaggio
news:aar09h$uns$1...@newsreader.mailgate.org...
| Se invece si vuole sapere se l'indirizzo risolto č valido e il server č
| attivo, occorre necessariamente stabilire una connessione. Purtroppo non
bah, lui chiedeva di verificare la correttezza
di un indirizzo... non l'effettiva presenza
on-line.
indi:
1- presumo che sia un pc con dominio registrato
2- guardo i dns (che siano master o cache-only
   non credo importi se mi interessa solo sapere
   se l'indirizzo che ho dato e' collegato a qualcosa)
3- anche se l'ip non e' fisso cmq ci sono servizi
   tipo dns2go (mi sembra) che ti permettono di registrare
   un dominio ad un ip dinamico... cmq sempre dns
se no via di ping, o come dici tu, connessione.
saluti


della microsoft non usa il ping
non capisco.
Cioe' dovrei usare il comando ping del dos???

attivo, occorre necessariamente stabilire una connessione. 
Purtroppo e' proprio questo quello che mi interessa
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

In fase di progettazione il programma funziona perfettamente, ma se lo
compilo, quando lo chiudo da' un crash.
COME POSSO FARE?!?!?!?!

COME POSSO FARE?!?!?!?!
  A me era successo con un vecchio programma in VB3 e l'unica
soluzione e' stata ricompilarlo ad oltranza finche' il problema non
scompariva, dopo il classico uscire e rientrare da VB e magari pure da
Windows.
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 - OUTLOOK

Ho questo problema:
Dopo aver scritto queste due istrizioni i relativi oggetti continuano a
essere "Nothing"
Set AppOut = CreateObject("Outlook.Application")
Set NewMail = AppOut.CreateItem(olMailItem)
Outllo sul pc funziona correttamente.
Sapete da cosa puo dipendere?
Grazie.

 Set NewMail = AppOut.CreateItem(olMailItem)
Viene per caso sollevata una eccezione?
-- 
Salutoni
Sergio
If I promise to go to church on Sunday
Will you go with me on Friday night?
If you live with me, I'll die for you
And this compromise
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Come hai dichiarato le variabili? A me cosě funziona.
*******************************************
        Dim olApp As Object
        Dim olItem As Object
        Set olApp = CreateObject("Outlook.Application")
        Set olItem = olApp.CreateItem(olMailItem)
            'Inserisci il tuo codice
        Set olApp = Nothing
        Set olItem = Nothing
******************************************* 

 Viene per caso sollevata una eccezione?
Un eccezione in vb6 ?!
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
"Un problema non č un problema se puņ essere risolto" 

 Un eccezione in vb6 ?!
Se non ti piace, leggi "errore di run time"


 ha scritto nel messaggio
news:e0dlf1$u$1...@balena.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: problema con access

scusate,
se imposto un db con access 2007 e
poi voglio realizzare un programma con vb6 che legga escriva in questo
db, quali riferimenti e quali componenti posso utilizzare perchè vada
tutto liscio e  non sia costretto a conversioni ?
Bisogna usare istruzioni particolari?
Grazie
Tommaso

 Bisogna usare istruzioni particolari?
http://www.connectionstrings.com/?carrier=access2007
Poi devi referenziare ADO.
Per il resto non ti so dire, visto che non ho mai referenziato access07.

 Per il resto non ti so dire, visto che non ho mai referenziato access07.
scusami Andrea,
non capisco.
Puoi spiegarmi con parole semplici?
Grazie.

Tommaso ha pensato forte :

VB6 può usare delle librerie dette ADO.
ADO può collegarsi ad un ulteriore strato, detto Provider, che è 
diverso a seconda del db da connettere.
Quindi, VB6 userà ADO nello stesso modo, sia che usi Access97 sia che 
usi Access2007 sia che usi SqlServer sia MySql ecc...
Poi devi avere sulla macchina il provider apposito, che per Access è 
JET.
Ciao
Alberto
-- 
Karl Marx: Uno scrittore è produttivo non nella misura in cui produce 
idee, ma nella misura in cui arricchisce l'editore che pubblica le sue 
opere.


ok, grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Import/export file txt

Salve, 
un'informazione veloce..utilizzo Visual Studio 2005 e sto progettando 
un'applicazione per pocket pc.
volevo esportare i record di un database (sql mobile edition) in un 
file txt, sapete come fare?
una volta capito l'export mi verrà facile anche fare l'import da un 
file txt in un database..
Grazie 1000!!


Ma se come penso tutto ciò servirà a tenere aggiornati i dati su un Server e 
su un palmare, non ci sono già delle utility che lo fanno?
Comunque questo potrebbe esserti d'aiuto:
http://www.microsoft.com/italy/msdn/library/default.asp?url=/italy/msdn/library/net/devices/netcfgetstarted.asp?frame=true
Ciao, Vincenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Componenti sviluppo style Office 2007

si parla di questi componenti , in licenza gratuita ma sono gia' reperibili 
,
o necessariamente legati all'acquisto di Office 2007.
qualche sono DLL, OCX ? ho cercato sul sito Ms ma non trovo download
neppure di beta.
Stefano 


Qui ha già letto?
http://punto-informatico.it/p.aspx?id=1776600
-- 
---------------------------
Mauro Gamberini
http://www.riolab.org/

>
ho trovato qui
http://www.microsoft.com/downloads/details.aspx?familyid=5e86cab3-6fd6-4955-b979-e1676db6b3cb&displaylang=en
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Append ad un file

Salve a tutti,
Volevo sapere se esisteva un modo di copiare in Append un file con un altro;
mi spiego meglio: ho un file  c:\file1.dat ed un file d:\file2.dat.
Io voglio avere come risultato la somma dei dati di file1 + file2 in un
file3 in a:.
Come faccio ? (ammesso che si possa).
Grazie.

semplicemente copy il contenuto del primo filo nel terzo e successivamente
riapri il terzo con For Append e il secondo con For Input
quindi ti servi della LineInput per individuare la fine del fine e con un
ciclo do-loop inserisci riga per riga il contenuto del secondo nel terzo.
Open 2 For Input
Open 3 For Append
Do while not eof(2)
lineinput#2,Stringa
print#3,stringa
loop
close all
ciao Davide

file3 in a:.
sCmd = Environ("COMSPEC")
sCmd = sCmd & " "
sCmd = sCmd & "/C"
sCmd = sCmd & "Copy"
sCmd = sCmd & " "
sCmd = sCmd & "C:\File1.Dat"
sCmd = sCmd & "+"
sCmd = sCmd & "D:\File2.Dat"
sCmd = sCmd & " "
sCmd = sCmd & "A:\File3.Dat"
Call Shell(sCmd, vbHide)
Questo e' un modo, e forse non e' il migliore. Vorrai probabilmente sapere
anche quando la copia e' terminata... Sul sito comune
http://www.murialdo.it/it_lang_vb
 c'e' un articolo in proposito.
--
Ciao.
Maurizio

 sCmd = sCmd & "Copy"
sCmd = sCmd & "Copy /B"
Cosi' funziona sempre!
--
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: Info su un OCX per Barcode ...

Abbiamo estremo bisogno di un OCX per Barcode, siamo diasposti a comprarlo
chi ci può aiutare ??
Grazie
Bragato Jgor

...


Io ho provato ed usato quello della Mabry:
www.mabry.com
Se non ricordo male costa attorno ai 99 $.
Però è molto carino.
Gianluca Ortolani



-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own

Newsgroup: it.comp.lang.visual-basic
Titolo: Finestra crystal report a tutto schermo

Ciao,
come posso attivare la finestra di anteprima di Crystal Report da VB4 a
tutto schermo?
Grazie e Ciao

C'e' una proprieta' almeno sulla versione 4.6 che mi sembra si chiami
WindowsState da impostare a 0,1,2 a seconda di come deve apparire la
finestra di anteprima
ER <e...@a.f.i> wrote in article <01bd2288$3c8b4a20$0f295c97@h.d>...


Grazie e Ciao
Dopo aver impostato le proprietą WindowTop e WindowLeft a 0 del controllo
Crystal Report, passi alle proprietą WindowHeigth e WindowWidth, le
variabili screen (opportunamente convertite in pixel)
ciao.......
Carlo ZICCARDI

Newsgroup: it.comp.lang.visual-basic
Titolo: info su corsi

Ciao ragazzi, sapreste per favore indicarmi dove organizzano dei corsi su
visual-basic, dalle parti di Viterbo, a costi non proibitivi?
Un grazie per le risposte, ciao di nuovo.
Maurizio
Ma...@libero.it

Cerca la più vicina sede dell' ENAIP.
E' una scuola che fa corsi a pagamento o finanziati dalla comunità europea.
--
    Giuseppe Saffioti
-------------------------------------
pino.s...@tiscalinet.it
pino.s...@asl1.to.it
Newsgroup: it.comp.lang.visual-basic
Titolo: MDB corrotto. come ripristinare da VB?

Ho fatto una applicazione che utilizza in rete un file mdb.
Talvolta accade che questo risulti corrotto.
Manualmente devo sconnettere gli utenti della rete dal database,
aprirlo con Access e ripristinarlo.
Qualcuno sa come fare questa operazione (disconnessione dalla risorsa
e suo recupero) da VB ?
ciao ciao
   Nicola Tornieri
   ----------------------------
  Manens Intertecnica srl
  tornieri[at]
manens.com
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

prova con il metodo REPAIRDATABASE

Se usi ADO devi usare il JRO (Giro per gli amici) ;)
Prima di tutto includi "Microsoft Jet and Replication Objects x.x Library)
tra i riferimenti e poi, dove ti interessa, metti questo codice:
Dim JRO As New JRO.JetEngine
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
PathMDBdaCompattare & "\database.mdb", _
                        "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
AltroPath & "\DataBase2.mdb" & ";" & _
                        "Jet OLEDB:Engine Type=5"
Allora... il Giro compatta e ripristina il DataBase.mdb in database2.mdb
(devi controllare prima che database2.mdb non esista!).
Purtroppo non ci devono essere connessioni aperte con database.mdb :(
Facendo questo in teoria fai quello che fai con Access quando
Compatti/Ripristini il database.
CiaoZ
SebaMix

Ah, dimenticavo... se usi DAO usa REPAIRDATABASE come consigliato da
UserdDemo.
CiaoZ
SebaMix

Compatti/Ripristini il database.
purtroppo no.. ho avuto esperienza (brutta) con mdb in rete corrotti
che si ripristinavano soltanto con Access. 
l'unica soluzione sicura e' utilizzare un server di database.

Comincio ad odiare Access.
Tra un po passo a SQL server.
CiaoZ
SebaMix

 Tra un po passo a SQL server.
visto che ti avanzano i milioni, ti va di mandarmene una
carrettata a casa mia?
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

Mica sono io che eventualmente lo compro ;)
Basta essere dipendenti ;P
CiaoZ
SebaMix

"
Sono dubbioso se andare a piedi o comprare un boeing 747...
mi dicono che per andare a new york il boeing 747 va meglio, č piů
stabile....
ma per andare da torino ad asti, il boeing lo vedo piů complicato.....
sono anche dubbioso se usare access (assolutamente gratis) oppure Oracle
(molti migglioni), pare che Oracle vada molti migglioni di volte meglio.
"
a parte il "cabaret", io ho lavorato anche con un db "serio" (informix).
Non si rompe mai.
.......tranne una volta che si č rotto, ed č stato un assoluto disastro.
quando si rompe un boeing 747......

> quando si rompe un boeing 747......
Spero tu non abbia fatto una strage! :O ;)
CiaoZ
SebaMix
Newsgroup: it.comp.lang.visual-basic
Titolo: Compilare ocx

Perchč non riesco a compilare il mio ocx???
Ho provato pure a compilare un controllo utente vuoto, ma, a circa metą
processo, si inchioda tutto e si RESETTA il computer!!!!!!!!
ho vb edizione enterprise, e ho anche provato a reinstallarlo, ma da sempre
lo stesso errore, come č possibile????
Sbaglio io  o č vb che č impazzito?
p.s. ho win 98, puņ essere questo?
grazie a tutti.

Newsgroup: it.comp.lang.visual-basic
Titolo: Tabelle HTML!!!

Vorrei sapere se qualcuno e' riuscito a salvare in un DATABASE una
qualsiasi tabella presente in file HTML.
Se qualcuno ci fosse riuscito sarei molto grato se mi aiutasse a
farlo.
Grazie a tutti!!!! 

Se hai un file html devo aprirlo (è un normalissimo file di testo) e
leggerlo per estrarre i dati da salvare, che io sappia non c'è un modo
automatico per farlo.

 wrote in message
3875edf6...@news.it.net...


 farlo.
Questo funziona e dovrebbe metterti sulla strada; usa gli ADO.
L'ho preso da un mio programma e quindi verificalo e adattalo alle tue
esigenze.
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\" &
Text1 & _
";Extended Properties=HTML Import;"
rs.Open "SELECT * FROM [Coefficienti d'Ammortamento1];", cn
N.B.: In Text1 scrivo il nome della pagina HTML che ho precedentemente
salvato nella cartella dell'applicazione; Coefficienti d'Ammortamento è il
titolo della pagina HTML (quello
dentro <TITLE></TITLE>); in pratica il Provider Jet considera le tabelle che
ci sono nella pagina come fossero Tabelle di database che si chiamano come
la pagina stessa + un numero progressivo.
La prima riga della tabella normalmente viene presa come nome dei campi.
Ovviamente quando hai il Recordset aperto ci fai quello che vuoi e se vuoi
ti scorri i Record e te li salvi in un Database di formato diverso.
Con gli ADO 2.5 di imminente uscita dovrebbe cambiare qualcosa ed essere
ancora più facile trattare dati inclusi in pagine HTML o in file XML.
Ciao,
   <--< Nik >-->
Newsgroup: it.comp.lang.visual-basic
Titolo: Informazioni sui filtri in ADO

Ciao a tutti, vi scrivo perche ho il seguente problema
Questo è un pezzo di codice:
'Apertura della connessione
Me.RefADOConnection.Open
'Istanza dell'oggetto Command
Set cmdToQuery = New ADODB.Command
'Settaggio della connessione attraverso la quale opererà l'oggetto Command
cmdToQuery.ActiveConnection = Me.RefADOConnection
cmdToQuery.CommandText = "qryDati"
cmdToQuery.CommandType = adCmdTable
Me.RefADORecordset.Filter = "LINGUA='" & lingua & "'  AND PARAMETRO<" &
iRangeMax & ""
Applicando il Filtro sul campo LINGUA, tutto funziona correttamente.
Applicando il filtro sul campo PARAMETRO (per esempio PARAMETRO<10) tutto
funziona correttamente, mentre se applico il filtro PARAMETRO>20 mi esce il
seguente errore
The application is using arguments that are of the wrong type, are out of
acceptable range, or are in conflict with one another.
Non capisco il perche', ho verificato che esistano i range che cerco di
visualizzare, ma come ho indicato, se richiedo i record aventi PARAMETRO
minore di un qualunque valore, tutto OK, mentre se richiedo i record aventi
PARAMETRO maggiore di un qualunque valore mi esce l'errore di cui sopra.
COME MAI? E' la stessa identica cosa!!
Vi ringrazio in anticipo e spero in una vostra risposta.
Ciao Luca

Ti dico subito che senza avere sotto mano i dati del database ti rispondo un
po' a tentoni....
Secondo me il fatto di mettere PARAMETRO>20 porta come risultato della query
una serie di valori che non possono essere gestiti. Ti faccio un esempio.
Se in un campo hai il valore 9000000000, questo valore non potrà mai finire
in una variabile intera, perciò potresti ottenere un errore di quel tipo. Lo
stesso dicasi per i campi che contengono Null.
Spero di averti dato perlomeno qualcosa su cui ragionare......in bocca al
lupo!!
Good working!!
Damiani Igor
ico...@simcity.it

Prova convertire in alcuni formati iRangeMax
ciao roberto
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] ma non troppo...

Un programmatore racconta ai suoi amici programmatori:
- Ieri ho conosciuto una tipa figona in disco..
Gli amici programmatori:
- Ehilaa!!-
La invito a casa mia, le offro una cosa da bere, e comincio a baciarla.
- Ueeehhhheeehhhhe!!
- Lei mi fa: "spogliami"!
- Ueeehhhheeehhhhehheehheehhee!!
- Al che io le tolgo le mutandine, la sollevo e la sdraio sulla scrivania,
spostando la tastiera del mio PC...
Gli amici programmatori:
- Hai un PC a casa? Figata!! che processore hai su, quanti MHZ?
S.
~~~~~~~~~~~~~~~~~~
www.apodittico.com
*La satira trendy*
~~~~~~~~~~~~~~~~~~

Hehehehe carina :))
Però sta cosa è proprio vera...mamma mia che gente :)
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
 

 - Hai un PC a casa? Figata!! che processore hai su, quanti MHZ?
buahahaha!!!! bella! A quest'ora ci voleva proprio... :-))))
Ciao,
Moreno

 - Hai un PC a casa? Figata!! che processore hai su, quanti MHZ?
Argghhhhh!!!!
Questa č riciclata da altri ng. :-!
Fatemi ricordare: ah, sě la raccontava il Biso su it.comp.appl.access.
Ciao, warp

"Stefania S." <stefa...@TOGLIQUESTOinfinito.it> ha scritto nel messaggio
news:9j6fie$35ei$1...@stargate1.inet.it...

Propio carina stà storiella!
Se 6 carina pure tu vieni a conoscere i programmatori veneti!!!
Ti ospito io a Jesolo ..... e poi ti spiego !
:)
--
Leo_duca

SUPERMEGAIPEREXTRARTFL
Veramente carina!
CiaoZ
SebaMix

> e poi ti spiego !
Hai un pc cosě complesso da dover esser visto personalmente? :-)


grande....!!!
pensandoci bene però non denigra un po' l'universo femminile ?!!!???  :-))))
un deV (come dice hal) che fra 4 ore inizia le ferie estive.....

 ha scritto nel messaggio
news:fVA57.4000$sE4.1...@news6.giganews.com...

Beh,
l'autoironia e propria delle persone di successo!
;)



Si.
Un palmare.


 l'autoironia e propria delle persone di successo!
spero solo una cosa....che la storiella non sia
un'autobiografia....:-))))))))))))
ooppppssss
beh
intanto ne approfitto per salutarvi tutti.....VACANZA !!!!!!
...un caloroso ciao da un futuro ex-continentale....


Hai dimenticato l'altra meta'...
Una bionda racconta alle sue amiche bionde:
- Ieri ero in disco e ho conosciuto un programmatore formidabile...
Le amiche bionde:
- Ehilaa!!
- Mi invita da lui, mi offre da bere, comincia a baciarmi..
- Ueeehhhheeehhhhe!!
- Io gli dico di spogliarmi...
- Ueeehhhheeehhhhehheehheehhee!!
- ...e lui mi toglie le mutandine
Le amiche bionde:
- Ah, porti le mutandine?
<G>
Ciaotutti,
*

 *
ROTFL!


 - Hai un PC a casa? Figata!! che processore hai su, quanti MHZ?
ehhehehe proprio carina  ;P
Faber


... ma, alla fine, che Pc era?
:)
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Strane date.. ( /02/aa)

Mi succede su un pc con win 2000 professional, che mi vengano visualizzate
le date in formati moooolto strani.
Se visualizzo il contenuto di un recordset per esempio all'interno di un
ASP:
-    response.write(setlocale("data"))
 produce il seguente risultato:    /02/aa
non cambia se utilizzo vbscript:
- date    oppure    cdate(date)
 produce il seguente risultato:    /02/aa        se la data è 13/02/2002
La data nelle opzioni internazionali è settata come    gg/mm/aaaa ma il
risultato non cambia con le altre opzioni
Da cosa può dipendere ciò?

 ha scritto

vorrei tanto saperlo.
ho postato ieri una richiesta sullo stesso argomento.
il buffo e' che con admin non lo fa, con uno user si'.
gia' reinstallati sp2 di w2k e sp5 di vb.
poi si passa all'fdisk...
j.

 ha scritto nel messaggio
news:a4eadr$mc7$1...@pegasus.tiscalinet.it...


 j.
Ciao, sono sempre io (picc1)
Ho visto il tuo post dell'altro giorno
Purtroppo sul mio pc il problema persiste anche se mi connetto con
qualsiasi altro utente (amministratore e non)...non so più che pesci
pigliare; ho provato addirittura a disinstallare il sp2 per allinearmi
alla configurazione di un altro pc che non da questi problemi assurdi,
ma nada!

 ma nada!
stamattina ho inoltrato a un mio collega il ris-post apparso su i.c.s.d.
alla richiesta direi tua e sembra funzioni. l'altra risposta di poco fa qui
in sostanza dice lo stesso.
e' un periodino che piu' che di impostazioni win e' fatto di postazioni.
missilistiche.
j.cruise.non.tom
Newsgroup: it.comp.lang.visual-basic
Titolo: Sort Data With Tree

I am trying to set up a tree to sort my data.
what i mean is like in access when you insert a subdata sheet and you get
the plus sign and then you click on that
i am trying to organize pictures by year then month then date then all the
pictures in that date in to a preview pane
how would i set this up in vb6
thanks and Happy Holidays !!!

 wrote in message
news:aZGHb.2977$_O1....@newssvr25.news.prodigy.com...


this may sound dumb but i dont understand this program enough to figure out
how to use the control by looking at the example code
does anyone know of a better tutorial that i might use?
"Merlin" <.@.com> wrote in message
news:SLIHb.22683$Pg1....@newsread1.news.pas.earthlink.net...


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

Salve a tutti,
chiedo scusa ma sono alle primissime armi con vb  ed avrei bisogno di sapere 
come fare in modo di aprire un form da un pulsante.
Grazie.
Stefano 

 ha scritto nel messaggio 
news:436614b7$0$13355$4faf...@reader2.news.tin.it...


 Form2 č il nome della Form che vuoi visualizzare...


 ha scritto nel messaggio 
news:4366173c$0$13342$4faf...@reader2.news.tin.it...


 ha scritto nel messaggio 
news:ZLo9f.10766$hC1....@tornado.fastwebnet.it...


...
vb.net
! :0) credo ti stesse rispondendo per vb normale.
allora si che devi "faricarla" :0)
sul button1_Click  il codice diventa:
dim frm as new form2
frm.show

 ha scritto nel messaggio
news:1130766960.4...@g49g2000cwa.googlegroups.com...


 ha scritto nel messaggio 
news:436895bb$0$1496$4faf...@reader2.news.tin.it...


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

Chi mi riesce a dare il controllo mshflexgrid.
Altrimenti ditemi dove poterlo trovare
Grazie mille

 wrote in message
38EAF38D...@mix-ceramiche.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: visualizzazione recordeset ado

Ciao ragazzi,vorrei sapere qual'è il controllo più veloce in termini di
prestazioni e di occupazione risorse per visualizzare un recordset ado.Ce ne
sono tanti(msflexgrid,mshflexgrid,datagrid,datalist,listview,ecc.),quali
sono le differenze principali?Grazie

 ha scritto nel messaggio
news:ndip9.13163$%M1.3...@twister2.libero.it...

Utilizza la funzione Timer per calcoli i tempi di esecuzione.
giuseppeD

vabbè, va bene rispondere, però così mi sembra poco utile, no?
:-))
spesso si fanno domande perchè magari qualcun'altro ha già avuto lo stesso
problema/intoppo/quesito, e l'ha risolto prima di noi.......ci si appoggia,
insomma, sull'esperienza altrui, perchè quell' "altrui" vuole condividerla e
metterla a disposizione degli altri. Questo è il succo del NG, credo.....
ritengo che questo suggerimento sia poco utile......
piuttosto, cerca su google parole come prestazioni+ADO, dovresti trovare
qualcosa......
concludo dicendo che io uso poco i controlli collegati ai db, preferisco
quelli scollegati e quindi riempiti via codice, quindi usando listbox,
listview e MSHFlexGrid e altre cosette simili......
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 quelli scollegati e quindi riempiti via codice
concordo per i componenti non legati
giuseppeD

 ha scritto nel messaggio
news:ao4epg$j45gg$1...@ID-134521.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: ocx controllo calendario tipo quello di microsoft outlook esiste?

magari anche a pagamento? sapete se esiste oppure è utlizzabile quello di
microsoft outlook mettendo i riferimenti giusti in vb?

un ocx calendario lo scarichi dal sito comune.
però l'agenda ecc... devi creartela tu
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Come scrivete gli help?

Poi come scrivete gli help?
Mi fate vedere un es. di RTF?
E poi e' possibile compilare un help in un .exe, magari
come risorsa?
Grazie
-- 
Demis Magoga                       
de...@mall.it
 
[Internet: Chi cerca trova]

[Internet: Chi cerca trova]

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto su Componenti aggiuntivi vb3

Ciao a tutti, ho ripreso in mano un vecchio programma in vb3 che non
posso modificare in quanto nel nuovo ambiente di sviluppo non ho dei
componenti aggiuntivi allora utilizzati. Utilizzai la truegrid e diversi
componenti cs quali cstext cscombo ecc......
Qualcuno puņ aiutarmi a ritrovarli o darmi qualche dritta per
reinstallarli visto che sono ancora inpossesso dei vbx???
Grazie Pietro

 wrote in message
news:3A8A8E77...@numera.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Avvio automatico tramite modifica registro.

Dovrei scrivere una subroutine che avii il programma all'avvio del pc
modificando il registro di configurazione. Come devo fare?

 modificando il registro di configurazione. Come devo fare?
cerca nei vecchi post su
http://groups.google.com
runonce, runonceex

Aggiungi una stringa a:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\_
CurrentVersion\Run
la nomini come ti pare e poi gli dai il valore:
"C:\Percorsoprogramma\mioprog.exe"
--
Franco A. Politano -- Luvme2times
"Love me two times babe | I'm going awayyyy"
J.M.D.

 ha scritto nel messaggio
news:ENEW6.3781$nG2....@news1.tin.it...


mio programma.
e, secondo te, chi avvierebbe il tuo programma ? :P
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Pacchetto di Installazione

Salve a tutti, sono nuovo qui, ho un problema con la produzione di un
pacchetto di installazione. In effetti con l'apposita funzione di Visual
Studio sono riuscito a crearlo,il problema sta nel fatto che una volta
installato il programma con questo pacchetto di installazione esso non
funziona correttamante!!
Il programma in questione è un database. L'ho sviluppato sul mio computer
dove ho installato Xp e dovrebbe funzionare su un Win95.
In realtà l'unico problema che si riscontra è che quando tento di fare
l'anteprima di stampa di un report mi esce fuori un erroraccio.
Qualcuno per favore mi saprebbe dare delle indicazioni.
P.S. Il report è stato implementato con l'apposito editor disponibile in
Visual Studio
Ringrazio Anticipatamente Tutti Quanti

Qualcuno per favore mi saprebbe dare delle indicazioni.
Fammi capire: vince chi indovina per primo di quale
errore si tratta?
-- 
ciao, hal
sempre piu' perplesso

Newsgroup: it.comp.lang.visual-basic
Titolo: Query concatenate (GO)

Ciao a tutti
ho un piccolo problemino , devo concatenare due Update e farli eseguire con
l'execute su un server sql server 7 dove i caratteri di concatenazione sono
definiti con il GO
quindi io ho provato a fare cio'
szQry = "Update prv set prv.f='tito'  go  Update prv set prv.a='tito'"
cn.Execute szQry
il risultato e' un errore di sintassi errata vicino 'go'
ho provata a lanciarla sul tool per le qry di sql e funziona
ho provato a concatenare due select e non ricevo assolutamente nessun errore
sia da vb che da sql.
qualcuno sa dirmi perché non funziona cio' con gli update???
e come fare eventualmente a concatenare le stringhe da inviare al db??
Ciao e grazie anticipatamente.....
Emiliano

Prova cosě:
szQry = "Update prv set prv.f='tito'"  +  "Update prv set prv.a='tito'"
cn.Execute szQry
Dovrebbe funzionare.
Ciao

La sparo: prova con "begin tran qry1; update prv set prv.f='tito';update prv
set prv.a='tito';commit tran qry1".
(non ricordo mai se il comando abbreviato è tran o trans, se segnala errore
sopra aggiungi la S).
Newsgroup: it.comp.lang.visual-basic
Titolo: Esplosi

Ho delle immagini di alcume macchine esplose cioè smontate e visualizzano
tutti i pezzi! kiedevo a voi se era possibile in automatico mettere dei
cerchietti vicino ai numeretti ke rappresentano ogni singolo pezzo? la mossa
manuale sarebbe prendere le coordinate di ogni numeretto!

 le coordinate di ogni numeretto!
E' solo un'idea e quindi puo' lasciare il tempo che trova:
Potresti comportarti come un OCR.
Apri l' immagine ( Magicamente :-) ) la "leggi" e quando riconosci un numero
ci schiaffi sopra un bel cerchietto !
Ovviamente devi capire come funzionano gli OCR.
Spero di averti aiutato.

Newsgroup: it.comp.lang.visual-basic
Titolo: Basic question: How increase buffer of undo command?

Hi,
I have a very basic question about the 'undo' command concerning VB6.0. 
As you probably all know you can undo your recent code changes pressing 
CTRL+Z multiple times.
However, the memory buffer is rather short!, so often when I want to undo
large sets of changes I get really stuck with this command.
Do anyone have an idea of how I can increase the 'undo buffer'. I have looked
under the tool|Options dialog box, but I cannot find anything about this
setting.
Any comments are welcome!
Regards
/olw

The first problem I suggest y to correct is to update your
system date, because otherwise your post will be ignored
from the major partecipant to this newsgroup.
Bye Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Numero -1,#QNAN

Leggendo file binari nel seguente modo
Open filDat$ For Binary As #9
Get #9, posiz, dat()
For i = 1 To 400 * NDati
               v = dat(i)
               If v = 0 Then v = 0.00000001
              .......
Next i
Close
a volte la variabile V prende il valore  -1,#QNAN.
A cosa puo' essere dovuto questo e come ovviare
all'inconveniente dato che la variabile dovrebbe contenere un numero?
A voi e' mai capitato?
   Grazie anticipatamente,                       Paolo

 wrote in message
news:kXDN5.3649$BF.1...@news.infostrada.it...

Se dichiari dat() di tipo Byte allora e' impossibile che contenga -1.
Per avere -1 occorre 0xFFFF che sta in un intero.
Bisognerebbe sapere come sono state dichiarate le variabili.
A meno che non ci sia qualche problema col BIOS. A questo riguardo riporto
il seguente articolo da MSDN:
Incorrectly Detected Coprocessor May Cause Improper Display
----------------------------------------------------------------------------
----
The information in this article applies to:
Microsoft Windows versions 3.0, 3.0a, 3.1, 3.11
----------------------------------------------------------------------------
----
SUMMARY
If a computer's BIOS incorrectly detects a math coprocessor when one is not
present, improper information may be displayed in areas such as the title
bar of the Microsoft Windows Calculator program and in other Windows-based
programs.
Phoenix technical support has confirmed that some system manufacturers might
have incorrectly shipped BIOS that supports the Intel 80486DX only, not the
BIOS that also supports the Intel 80486SX chip. This situation causes the
erroneous reporting of a math coprocessor on the 80486SX when there is none,
and may produce these errors.
MORE INFORMATION
The incorrect detection of a math coprocessor can cause problems in Windows.
The value "-1" may be displayed for the cursor position. Strings such as
"sin:" or "sqrt:" may be displayed randomly in title bars and other places.
The value "-1#.QNAN" might be displayed if the Clear button is chosen in
Calculator.
To resolve this problem, contact your computer manufacturer, not Phoenix for
the correct BIOS for your computer system.
The Intel and Phoenix products included here are manufactured by vendors
independent of Microsoft; we make no warranty, implied or otherwise,
regarding these products' performance or reliability.
Additional query words: calc 3.00 3.00a 3.01 3.10 3.11 coprocessor 387 487
287 Phoenix ep486sx 0.96
Keywords :
Version : WINDOWS:3.0,3.0a,3.1,3.11
Platform : WINDOWS
Issue type :
Technology :

A voi e' mai capitato?
Sě, il problema sta nel fatto che non tutte le sequenze di bit sono
rappresentabili in notazione numerica a virgola mobile, quindi se leggi roba
che non puň essere un numero float ottieni #QNAN (a parte Q NAN significa
Not A Number).
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: size

Ho una tabella in Access, il mio programma utilizza i DAO.
Come posso aumentare la dimensione di un campo di tipo testo in una tabella
creata in Access?
Grazie per tutte le risposte

 creata in Access?
Via Access č banale: reimposti il size del campo e fa tutto lui (cambiandolo
ad una dimensione maggiore tra l'altro non avrai mai problemi).
Se perň non ti bastano 255 caratteri (limite max per i campi Text) devi
passare ai Memo oppure usare qualche trucchetto (tipo concatenamento di piů
campi Text), ma diventa un po' piů complesso...
Ciao,
Carlo.

 wrote in message
9tu1mu$2e9$1...@pegasus.tiscalinet.it...


 Devo farlo attraverso VB
Ah! Allora è un po' più complesso: devi creare un nuovo campo con le
caratteristiche volute e poi travasarvi i vecchi dati e poi cancellare il
vecchio campo.
Credo, almeno... non l'ho mai fatto.
Ciao,
Carlo.

 ha scritto nel messaggio
news:9tu3ah$4dq$1...@pegasus.tiscalinet.it...

Se non sbaglio basta specificargli la nuova dimensione:
ALTER TABLE tabella ALTER campo TEXT(nuovalunghezza)
Provare per credere (se non ricordo male ci sono rimasto male quando l'ho
visto: anch'io facevo il travaso di dati)
Ciao

 visto: anch'io facevo il travaso di dati)
Effettivamente ci sono rimasto male :-)
Ciao,
Carlo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Variabili non scaricate

Ho una form, dentro alcune proprietrà pubbliche
boleane. Scarico la form, le variabili contegono
ancora il valore, a meno che nell'unload non setto
le variabil su false. Why... pecchè???

 wrote in message
news:ahbovp$rp1k5$1...@ID-61006.news.dfncis.de...

Unload Form1
Set Form1 = Nothing ' scarica anche tutto il codice relativo dalla memoria
Ciao

 Why... pecchè???
    By Design.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 Set Form1 = Nothing ' scarica anche tutto il codice relativo dalla memoria
Davvero?
cioč,
unload non distrugge anche l'istanza dell'oggetto form?

Si ma questo implica che io devo unloddare
il form da fuori. E sto fresco se devo
implementare il codice della distruzione dei
miei form ovunque mi trovi.
Bah ... l'hanno risolto sto problema con
dot.net
?
Volevo iniziare a farci sto nuovo programma,
ma ho troppa poca esperienza.
Ciao Andrea

>     E continueranno quindi a contenere *un* valore.
Non fa una piega, perň almeno la volta dopo non me lo
trovo a true, che č invece il valore portante :)

 ma ho troppa poca esperienza.
Il form è modale?
Sì) non ci sono problemi.
No) puoi sempre fare così (ad esempio)
' è buona norma dichiarare esplicitamente
' i form, proprio come una qualsiasi classe
' (i form _sono_ una classe).
' Questo ti permette un maggior controllo, come
' questo:
Dim f as Form1
...
If (Not f Is Nothing) then
    ' se non era scaricata
    ' la scarico adesso
    Unload f
    Set f = Nothing
End If
f.Show
' E quando chiudi f fai nel suo interno solo un Hide
' questo anche nel caso di form modali
Ciao

 trovo a true, che è invece il valore portante :)
    Da' ascolto a Zanna! Poi se vuoi fai girare questo.
'Modulo1:
Option Explicit
Private Sub Main()
  Dim frm As Form1
  Debug.Print Form1.p_bTest
  Set frm = New Form1
  With frm
    Debug.Print .p_bTest
    frm.p_bTest = True
    Debug.Print .p_bTest
  End With
  Set frm = Nothing
  Debug.Print Form1.p_bTest
End Sub
'Form1
Option Explicit
Private Const mc_sName = "Form1"
Public p_bTest As Boolean
Private Sub Form_Initialize()
  Debug.Print mc_sName, "Form_Initialize"
End Sub
Private Sub Form_Load()
  Debug.Print mc_sName, "Form_Load"
End Sub
Private Sub Form_Terminate()
  Debug.Print mc_sName, "Form_Terminate"
End Sub
Private Sub Form_Unload(Cancel As Integer)
  Debug.Print mc_sName, "Form_Unload"
End Sub


Io gli darei volentieri ascolto, ma come faccio a sapere
dal form padre quando ho scaricato il form figlio.
Non è che vb abbia tutta sta abbondanza di eventi per
gestire una situazione del genere.
Supponi una situazione classica di mdi, dove il padre
sta alla base, e ho tanti bei figli.
Scarico il form figlio, ma metti anche che ho un altro
form figlio a video, il focus già non va sul padre e quindi
non posso appellarmi al mdi_gotfocus.
Questo tanto per fare un esempio della prima cosa
che mi è venuta in mente.
Magari toppo perchè mi manca qualche nozione in
coccia ... ma se hai del codice da postarmi perchè
possa comprendere ... beh posta pure, almeno vedo
se è fattibile o meno.
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: Avvio progressivo di più applicazioni una in primo piano

Ciao a tutti,
sto realizzando una piccola applicazione che deve avviare due programmi 
esterni, uno prima e uno dopo.
Il secondo (si tratta un file di Excel all'interno di Excel stesso) dovrebbe 
risultare sempre in primo piano.
Ho scritto il seguente codice:
Dim a
a = Shell("C:\nomeapplicazione\nomeapplicazione.EXE", vbNormalFocus) 'Avvio 
della prima applicazione
a = Shell("C:\Programmi\Microsoft Office\Office10\excel.exe 
C:\8055SW02\Macro\EmiCAD_DATICENTRALINE_TV.xls", vbNormalFocus) 'avvio della 
seconda applicazione
Purtroppo anche se Excel viene avviato dopo di "applicazione.exe" risulta 
sempre sotto.
Ho provato anche a mettere un intervallo di tempo pausa tra l'avvio della 
prima applicazione e la seconda, ma non funziona lo stesso.
Spero in un vostro aiuto.
Ringrazio tutti in anticipo
Emiliano 

 ha scritto nel messaggio
news:5TJGd.702247$35.28...@news4.tin.it...


 Ciao
Ciao
ti ringrazio per la risposta.
Immagino che il mio codice non sia proprio pulito, ed in effetti non lo devo 
installate al di fuori del mio PC, ma potresti indicarmi come migliorarlo?
Cosa intendi per minimizzare la mia form?
Il primo programma che viene avviato "nomeprogramma.exe" non l'ho realizzato 
io, ma è un programma esterno.
Grazie
Emiliano

 installate al di fuori del mio PC, ma potresti indicarmi come migliorarlo?
Sostituisci lo Shell con questo:
*****************
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1
Private Sub Form_Load()
    Dim AA As String
    Dim BB As String
    AA = "test.xls"
    BB = "c:\"
    ShellExecute Me.hwnd, vbNullString, AA, vbNullString, BB,
SW_SHOWMAXIMIZED
End Sub
*****************

Newsgroup: it.comp.lang.visual-basic
Titolo: VB AND POWER POINT

Hello,	I need some help with Visual Basic. I am trying to use a Shell
statement to load power point and start a presentation running under slide
show. I have saved my presentation under the .pps extinction and the shell
statement loads power point along with the presentation but I can't get the
slide show to start out running. Any help with this project is appreciated.
Thanks in advance.  Homer Cates
P.S. This is the shell statement:
   If Counter = 1 Then fileview = Shell("d:\program files\microsoft
office\office\powerpnt.exe K:\HS&E~1\1998BB~1.PPS", 1): GoTo changedata
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

...
