mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare un e-mail in VB 5.0

Il mio problema consiste nell'inviare, dal mio programma, un e-mail alla
mia casella di posta elettronica con un subject predefinito.
Ho notato l'esistenza di due controlli OCX denominati MAPISession e
MAPIMessage (mi sembra) ma non sono riuscito ad usarli per il mio scopo.
Qualcuno sa come si usano, oppure ha qualche idea alternativa?
            Grazie
                Massimo

...


Qualcuno sa come si usano, oppure ha qualche idea alternativa?
Dai un'occhiata al file SMTP.ZIP sul sito comune:
http://members.xoom.com/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda banale - come verificare se un TextBox contiene un numero intero, un numero reale o una stringa?

Ciao a tutti,
forse la domanda per molti di voi è banale.
Ma come posso controllare se l'utente ha inserito nel TextBox un numero
intero oppure un numero reale oppure una stringa di testo?
Spero in un vostro aiuto.
Ringrazio tutti in anticipo.
Emiliano

 numero intero oppure un numero reale oppure una stringa di testo?
prova a guardare la funzione IsNumeric
--
Salutoni
Sergio

 ha scritto nel messaggio
news:bl8ko2$86q38$1...@ID-173193.news.uni-berlin.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: 2 help query sql e vb!!!!! il primo fallito!

 SHAPE {SELECT * FROM azienda, anagrafica_clienti }  AS Command1 APPEND
( SHAPE {select * from fatture}  AS Command2 APPEND ({select * from fatture}
AS Command3 RELATE 'DATA' TO 'DATA','FATTURA_N' TO 'FATTURA_N') AS Command3)
AS Command2 RELATE 'ID_CODICE_CLIENTE' TO 'ID_CODICE_CLIENTE') AS Command2
questa e' la query che fa il rscommand1 del datareport ora come faccio a
convertirla per scriverla
in codice vb????
aiuto urgente

Shape usa un provider non standard, secondo me non è usabile da vb (potrei
però sbagliarmi, mai provato)

 wrote in message
9edrfr$gbf$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] A cosa serve Static in VB?

Ciao.....scusate se non mi esprimo al meglio, ma sono un po' di fretta....
chiedo sinceramente scusa!!!!
Il punto è questo:
come si usa Static nei progetti DLL ActiveX se poi devo sempre e comunque
fare:
Dim a as Pippo.Pippo
Set a = New Pippo.Pippo
?!?!?!?
lo Static non serve, come in 
VB.NET
 (e in tutti gli OOP) a fare moduli per
lanciarne i metodi senza istanziarli?
grazie mille a tutti!!!!
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 lanciarne i metodi senza istanziarli?
La guida te lo dice senz'altro meglio di me, comunque:
La parola chiave Static dichiara una variabile il cui valore permane anche
quando la variabile esce di scope; a tutti gli effetti una variabile static
e' ecquivalente ad una variabile globale che pero' e' accessibile solo dalla
procedura in cui e' dichiarata.
Personalmente le trovo molto indigeste, ma obbiettivamente possono servire a
impostare flag e cose del genere in maniera piu' pulita di una globale vera
e propria
Caso tipico:
Sub StartUp
    Static IsStarted As Boolean
    'se e' la prima chiamata alla routine, eseguiamo il codice
    If Not IsStarted
        '[...]
        IsStarted = True
    End If
End Sub
in questo caso il codice e piu' sicuro (nessun altra funzione puo'
modificare il flag) e puo' essere riutilizzato meglio perche' la funzione e'
autosufficiente, viceversa dovresti sempre ricordarti di portarti dietro la
dichiarazione Public fatta altrove
(per inciso in 
VB.NET
, probabilmente per non creare confusioni, la funzione
che attribuisci piu' sopra a Static e' svolta dalla keyword Shared)
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

lanciarne i metodi senza istanziarli?
Lo static in vb6 ha semplicemente lo scopo di mantenere il
valore della variabile tra una chiamata e l'altra.
-- 
ciao, hal

 valore della variabile tra una chiamata e l'altra
della routine all'interno della quale e' dichiarata la
variabile.
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: Funzione Format o Format$ ? Sono la stessa cosa ?

Che differenza c'è fra la funzione Format e la Format$ di Visual Basic 6 ?
Sono la stessa cosa?
Grazie.

Sono la stessa cosa?
  No.
  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: stored procedure

Qualcuno sa darmi qualche informazione per utilizzare stored procedure di
Oracle con Crystal report 8 ?
Grazie mille!!

Se ho capito bene il problema non è lavorare con Crystal Report ma
recuperare un recordset ADO da Oracle.
Se il problema è quello ho la soluzione:
Oracle a differenza di SQL server e altri prodotti MS, non ti permette di
fare cose del tipo:
Set rs = cmd.Execute
oppure
rs.Open cmd
Questo semplicemente perché le stored procedure non vanno create al solito
modo.
Devi creare un package generico che contenga un oggetto di tipo REF CURSOR
che potrai aprire all'interno della Stored e utilizzarlo come parametro di
uscita. ADO lo utilizzerà per costruire il recordset dei risultati.
Esempio:
(su oracle)
CREATE OR REPLACE PACKAGE GEN_PKG AS
    TYPE RC IS REF CURSOR;
END;
(poi nelle stored procs)
CREATE OR REPLACE PROCEDURE MYPROC
  (
       PAR1 IN NUMBER,
       PAR2 IN VARCHAR2, --ECC...
       oRS OUT GEN_PKG.RC
  )
AS
BEGIN
   OPEN oRS FOR
        SELECT NOME, COGNOME
        FROM MYTAB
        WHERE NUMTEL=PAR1 AND LUOGONASC = PAR2;
END;
Infine nel codice VB, avendo cmd come ADODB.Command e rs come
ADODB.Recordset:
'Effettua la connessione
cmd.ActiveConnection = myCnStr
cmd.CommandType = adStoredProc
cmd.CommandText = "MYPROC"
'Questi vanno creati nell'esatto ordine di dichiarazione su Oracle
cmd.Parameters.Append cmd.CreateParameter("PAR1", adInteger, , 22, myVal1)
cmd.Parameters.Append cmd.CreateParameter("PAR2", adVarChar, , 50, myVal2)
'Infine
set rs = new ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open cmd, , adStatic, adLockReadOnly
'---------------------------------------------------
E voila'!!!
NOTA: non ho copiato l'esempio ma l'ho riscritto a memoria quindi controlla
la sintassi e i nomi delle costanti tipo adInteger ecc...
Ma veniamo alla domanda principale.
Crystal Report lo puoi usare in modo che la sorgente dati sia specificata da
te in fase di run time e non impostandola in design time.
Un modo alternativo è quello di inglobare il codice in un DataEnvironment e
poi collegare il tutto a crystal... ma è molto più pesante secondo me.
Spero di aver intuito il problema, in caso contrario scusa per la "divina
commedia" che ti ho scritto.
Saluti.
Giubodi
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Ordinamento SQL

Ho una SELECT SQL arrivato al punto ORDER BY vorrei ordinare per un campo...
ma in senso decrescente... Come faccio?

Prova con la clausola DESC prima del campo da ordinare, dovrebbe funzionare.
Saluti
Alex

 ma in senso decrescente... Come faccio?
SELECT CAMPO1, CAMPO2, CAMPO3 FROM  MIATABELLA ORDER BY CAMPO1 DESC
Ciao
Sirjo

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

...
    La proprietà Interval ha come valore massimo circa 1 minuto....
    Ho bisogno di eseguire sub ogni 15 minuti, come faccio?
    So che potrei usare un contatore per l'evento, ma non esiste un modo più
diretto, magari con un altro controllo?
    su General del Form o su un modulo BAS dichiara una variabile cosi' :
    Dim OldTime as DATE
    su form load metti :
    OldTime = TIME
    lascia il timer con interval = 1 minuto ed ad ogni evento che ti genera
controlla se sono passati 15 minuti con :
    If datediff("n",OldTime,time) = 15 Then
       OldTime = time
       call MYSUB ' Metti qui quello che vuoi gestire ogni 15 minuti
    endif
    Non e' il massimo ma funziona. Se vuoi aumentare la precisione abbassa
l'Interval  del timer.
    Ciao.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Onda quadra

Avrei la necessità di generare un'onda quadra attraverso la porta
parallela del pc con Visual Basic.
Qualcuno di voi ha qualche esempio di codice da inviarmi?
Consigli?
Conoscete qualche sito da consultare?
GRAZIE A TUTTI!

 Conoscete qualche sito da consultare?
su 
www.elettronicamente.com
 potresti trovare qualcosa di interessante
l'iscrizione è gratuita.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] modifica file di testo

Ciao a tutti,
spero che la domanda non sia banale
devo realizzare un programmino in grado di eliminare da un file di testo le
prime  righe, alcune parole e sostituire alcune stinghe con altre.
E' possibile realizzarlo con Vb4 o e' necessario ricorrere a una macro di
Word?
Spero di essere stato chiaro e vi ringrazio anticipatamente.
Ciao da Francesco

...

Se è un file di testo (estensione .txt) usi le istruzioni:
Open "miofile.txt" for input as #1
Open "nuovofile.txt" for output as #2
Do while not eof(1)
    LineInput #1, MiaLineaditesto
    'elabora la linea
    Print #2, MiaNuovaLineadiTesto
Loop
Close 1,2
quindi elimini miofile.txt e rinomini nuovofile.txt in miofile.txt
(istruzioni Kill e Name)
(il codice è scritto di getto, attento alla sintassi, può essere
errata)-----------------------------------
Paolo Spellani
TecnoGraphica s.r.l.
FOLIGNO (Pg) - ITALY
-----------------------------------
Buon Lavoro
Newsgroup: it.comp.lang.visual-basic
Titolo: form trasparente

Come rendere un form interamente trasparente?
Grazie

 Come rendere un form interamente trasparente?
Me.visible = False
Piů trasparente di cosě...
Ciao
*Roby*

Ciao,
ho visto un esempio di codice sul sito di Marco Minerva ma non so cosa
faccia di preciso.
Cmq ecco l'URL: 
http://digilander.iol.it/marcominerva/
--
Princi, 
princ...@programmer.net
--------------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,
finché arriva uno sprovveduto che non lo sa e la inventa." A.E.

...





Si, ma i pulsanti, i frame, le immagini ecc. si devono vedere.

 Si, ma i pulsanti, i frame, le immagini ecc. si devono vedere.
se credi ti mando un po' di ocx ecc vari.
nb non li ho provati o quasi.
ca 500k in tutto.
ciao, a.

 ciao, a.
se me li mandi fi fai un favore.
Grazie pal.

 Grazie
Se vuoi io ho creato un controllo che ti permette di usare delle immagini
come form, e  ovviamente anche immagini trasparenti o solo con il bordo ,
ecc.
Scrivimi se ti occorre.
--
Hack with the best, die like a rest.
                                       Bye Bye
                                                Chicco
mailto: 
pun...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Sys Tray

Come faccio con VB5 Pro a far apparire l'icona del mio programma nel sys
tray (cioč accanto a quelle del controllo volume, schermo ecc...) al posto
che nella taskbar? grazie per l'aiuto (
zi...@libero.it
)

 che nella taskbar? grazie per l'aiuto (
zi...@libero.it
)
---> search for it in / cerca nel sito comune del ng:
http://www.murialdo.it/it_lang_vb/
---> 1k vblinks in:
http://www.comune.modena.it/cittadini/apal/html/
hth, pal
=*=

...mi inserisco nel thread ...
L'esempio disponibile nel sito comune e' utilissimo.
Chiedo pero' un aiuto ed una spiegazione:
il progetto permette di inserire, modificare ed eliminare l'icona del
programma dalla Sys Tray, ma il programma rimane comunque iconizzato, cioe'
e' presente ANCHE nella Status Bar.    Vorrei fare in modo di inserire
l'icona del mio programma SOLO nella Sys Tray (...come per esempio il volume
o l'antivirus  che sono attivi ma non presenti nella Status Bar.     Non
sono presenti neanche nella lista delle applicazioni disponibili con
ALT-TAB.)
Ciao a tutti
Stefano

 wrote in message 84qd6m$j4a$1...@nslave1.tin.it...


...soluzione PRECISA, SINTETICA e PUNTUALE
...era li', ....pronta, ed io mi stavo andando a impelagare con API strane
....
...che altro dire
Grazie !
Ciao ;)
Stefano


 
http://www.murialdo.it/it_lang_vb/
grazie: adesso č chiarissimo! (ps ho visto che interessava a parecchia
gente...)
Newsgroup: it.comp.lang.visual-basic
Titolo: filelistbox

vorrei inserire in una file list box solo  il nome del file e non anche 
l'estensione. QUale strategia posso usaare? Tra le proprieta non c'č nessuna 
che fa a caso mio
Grazie 1k! 

Puoi usare una ListBox normale, ma perderai le proprietà della
FileListBox
(Form con FileListBox e ListBox)
Private Sub File1_Click()
Dim n As String, k As String, j As Integer
n = File1.List(File1.ListIndex)
j = Len(n)
k = Mid(n, 1, j - 4)
List1.AddItem k
End Sub



Puoi usare una ListBox normale, ma perderai le proprietą della
FileListBox
(Form con FileListBox e ListBox)
Private Sub File1_Click()
Dim n As String, k As String, j As Integer
n = File1.List(File1.ListIndex)
j = Len(n)
k = Mid(n, 1, j - 4)
List1.AddItem k
End Sub
Grazie tanto!!!! 

Prego
Bada che con questa soluzione le (rare) estensioni a due cifre generano
un errore
es. mioaudio.au --> mioaudi
puoi risolvere così
y=instr(n,".")
k=mid(n,1,y-1)
non ho provato ma dovrebbe andare
Newsgroup: it.comp.lang.visual-basic
Titolo: Avviare la connessione internet

Scusate la domanda, probabilmente è stata già fatta molte volte, ma in rete
non ho trovato proprio quel che mi serviva! (magari cercavo keywords
sbagliate!)
In sostanza ho una funzione che mi verifica la connessione internet. Se mi
da in risposta "False", cioè che il pc è offline, dovrei lanciare la
classica finestrella di connessione (alla internet explorer per intenderci).
Come fare?!
Ciao e grazie a tutti!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Ciao a tutti.
Proprio nessuno mi sa aiutare?! E' molto urgente.
Grazie


Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione DIR

Salve a tutti,
Ho un problema inspiegabile....devo utilizzare la funzione DIR per sapere se
esiste o meno un file, ma non riesco a capire perchè ottengo sempre il
seguente errore:
ERRORE DI COMPILAZIONE
PREVISTA MATRICE
il codice usato è ....
dim Appoggio as string
dim ORIGINE(1) as string
ORIGINE(0)="C:\WINDOWS\WIN.INI"
Appoggio = Dir(origine(0))
La parola evidenziata è DIR e la variabile appoggio rispecchia il tipo di
dato utilizzato(in realtà è una struttura)
lo stesso problema avviene copiando direttamente la stringa al posto della
variabile.
Mi vergogno a scrivere questa lettera data la semplicità della funzione ma
proprio non capisco dove sia il problema

 variabile.
Eseguita cosi' come e' scritta, funziona.
Credo che non ci hai detto tutto ...
Ciao
Aldo

 variabile.

Newsgroup: it.comp.lang.visual-basic
Titolo: passaggio di un record set da dll a pagina asp

sto creando una delle mie prime dll in cui cerco di passare un record
set ma purtoppo non riesco a utilizzarla, non capisco se sbaglio il
passaggio del recordset o la chiamata nella pagina asp
di seguito vi posto il codice della dll
----------------------------------------
Public Sub connessione(ByRef record As Variant)
   ' Dim nome, password, err
    Dim query
    Dim strcon As ADODB.Connection
    Dim stringaConn As String
    stringaConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
App.Path & "\dati.mdb" & ";Persist Security Info=False"
 
 
    Set strcon = New ADODB.Connection
    strcon.ConnectionString = stringaConn
    query = "select * from tabella"
 
    strcon.Open
    Set rsdati = strcon.Execute(query)
 
       record = rsdati
 
    Set rsdati = Nothing
    strcon.Close
    Set strcon = Nothing
 
End Sub
----------------------------------
e qui invece quello della pagina asp
-------------------------
set ObjConn = Server.CreateObject("Progdb.classdb") 
conn=ObjConn.connessione(rsNuovo)
do until rsNuovo.eof
rsNuovo("nome")
loop
-------------------------
ho provato anche a chiamarmi conn.eof
ma purtoppo mi continua a dare come errore :
Proprietą o metodo non supportati dall'oggetto: 'eof'
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

passaggio del recordset o la chiamata nella pagina asp
invece di una sub utilizza una function che ti restituisce un recordset
..
Public function  MyRecordset (MySQLString as string ) as variant
.................................................
    query = MySQLString
.................................................
    Set  MyRecordset = rsdati
end function
ciao, francesco.

 Public function  MyRecordset (MySQLString as string ) as variant
Meglio "as ADODB.recordset"
Ciao


lascia......      as variant.
ciao.
Francesco.

 lascia......      as variant.
E' conveniente sempre esplicitare il tipo di variabile quando lo si sa a
priori sia per ragioni di velocità che per ragioni di compatibilità. Vedi
early-binding  vs late-binding (non supportata in Vb.NET)!

questa è una diatriba aperta da sempre e
che trova sostenitori nell'esplicitare le variabili e non.
Inutile quindi parlarne anche se sono nella maggior parte delle
volte concorde con te.
Ciao.
Francesco.
"Lord Rayden" <ray...@hardwaretips.com.rimuovimi> ha scritto nel messaggio
news:a4gc51$2fol$1...@half.spin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ^_^ Come si puo` converte un testo HTML in plain text ?

Ciao.
Una domanda semplice:
Come posso converte un testo HTML in plain text ?
Grazie123000, FenixX. (A buon rendere)
|:-D| FenixX |(-:|
ICQ: 16201896
http://webstation.webjump.com
http://www.angelfire.com/ok/fenixx
http://space.tin.it/scienza/dfelisar
FenixX=Visual=Book=Marks=System:[Meteos]-[SuperBarZell]-[MangAnime]-[Music]
WebStation: Main Menu
[SearchEngines] [HotPages] [InternetServices] [MessagesServices]
[Hardware] [Software] [InternetSoftware]
[Friends] [People] [Audio-Music-Radio] [Video-Live-Cam-TV]
[MangAnime] [Doc-Info] [NewsPapers] [Lombardia] [Links2Links]
  ("`-''-/").___..--''"`-._
   `6_ 6  )   `-.  (     ).`-.__.`)
   (_Y_.)'  ._   )  `._ `. ``-..-'
     _..`--'_..-_/  /--'_.' ,'


Un file HTML, come saprai, e' un file di testo (non binario), con degli
identificatori (chiamati <tag>) per la formattazione.
Basta che togli i tags (dovrebbero essere sempre racchiusi tra < e >).
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 è impazzito: le interfacce non vanno più

Salve,
Come avrete capito, sto scrivendo un oggettino COM con 5 interfacce.
Il problema è che VB6 dopo che io ho scritto "Implements IMiaInterfaccia"
non mi presenta più
nella combo di sinistra l'interfaccia stessa.
Solo che questo accade con TUTTE le interfacce da ieri pom tardi, ed io non
so che pesci
prendere.
Considerate che ieri le cose già fatte non le avevo proprio toccate.
Qualche idea?
Grazie in anticipo,
Andrea

 ha scritto nel messaggio
news:at727v$10igae$1...@ID-170738.news.dfncis.de...

Basta un errore latente nelle nuove modifiche, e anche quanto fatto
precedentemente,
anche se corretto, non viene più esposto.
Giacomo.

 Giacomo.
Andrea

Non va nemmeno nei nuovi progetti.
Andrea

 nella combo di sinistra l'interfaccia stessa.
Sei SICURO che l'interfaccia sia in una classe "Public Not Creatable" o
"Private"?
Hai convertito il progetto in ActiveX?
Oppure:
Sei sicuro che non ci siano errori nelle interfacce? Prova a fare un
progettino in cui metti una Form e le tue interfacce (gli stessi file, no
copia incolla), poi premi CTRL+F5
                Ciao
                                    Allanon
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampante non Predefinita

 
          Devo stampare inizialmente sulla stampante di sistema, poi (temporaneamente)
su un'altra stampante, per poi tornare a quella di sistema.
Ma come fare?
Nei post precedenti non ho trovato nessuna dritta.
Grazie Max.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Nei post precedenti non ho trovato nessuna dritta.
Non commento la balla di non avere trovato niente, visto che è stato un 
argomento di moda proprio la settimana scorsa.
Comunque, all'avvio dell'applicativo Printer punta sulla predefinita di 
sistema.
Quindi:
Public Stampante_di_Default as Printer
Form_Load
Set Stampante_di_Default = Printer
Command1_Click
Set Printer = Stampante_di_Default
Printer.Print "Ciao"
Printer.EndDoc
Set Printer=<quella che ti pare>
Printer.Print "Ciao"
Printer.EndDoc
Set Printer = Stampante_di_Default
Printer.Print "Ciao"
Printer.EndDoc
Ciao
Alberto
-- 
"Se viriamo, viriamo viriamo viriamo;
Se andiamo dritti, viriamo"
(Cit. "il tattico")


 


 facile a dirsi, ma la sintassi corretta qual'è?
Quella (col for each) citata diverse volte nei post a cui facevo 
riferimento, della settimana scorsa, e che tu dici di avere già 
provato.
Ciao
Alberto



 


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

Come fare per aggiornare il Report di Crystal report prima di effettuare una
stampa, per controllare se nel databse ci sono stati ?

 stampa, per controllare se nel databse ci sono stati ?
Devi cercare in rete un addin che permetta di includere una lista degli 
stati in cristal report.
Tempo fa sono stati postati link a DB contenenti i vari stati europei e 
mondiali.
Poi devi cercare anche un tool che permetta il parsing delle mail in 
uscita e scarti tutte quelle con oggetto frasi che possono essere 
annoverate tra tipiche di spam, come ad es. questi pattern: *HE*LP*, 
*AIUT*, *DISPERAT* ecc.
Ciao

ah ecco...a prorposito di Spam..come è che avviene? e di cosa si tratta?
per la plug in Grazie, ora la cerco..!

o mio DIO...ho sbaglito a Scrivere !!! volevo dire ...se ci sono stati
CAMBIAMENTI...!!!
scusa!! la Domanda era: "Come fare per aggiornare il Report di Crystal
report prima di effettuare una stampa, per controllare se nel databse ci
sono stati CAMBIAMENTI ?


ROTFL!!! :-)))

Newsgroup: it.comp.lang.visual-basic
Titolo: Creare Array di Oggetti

Come posso creare con VB 4 16 un Array di Rettangoli o di Immagini
posizionabili su una form ?

 
Crei nel form una immagine (o un frame) con la proprieta' Index=0
A run time per creare l'array usa il comando LOAD cosi':
dim Cont
for cont=1 to 10
	Load Immagine( cont )
	Immagine.left = xxx
	Immagine.Top = yyy
	....
	....
	Immagine.Visible = true
next cont
Se voui eliminare qualche elemento dell'array, usa UNLOAD cosi':
dim Cont
for cont=1 to 10
	UnLoad Immagine( cont )
next cont
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes
Newsgroup: it.comp.lang.visual-basic
Titolo: Visulizzazione in automatico separatori di migliaia

Salve
Provengo dalla programmazione in clipper e con quel linguaggio si
aveva la possibilita' in un input numerico dell'inserimento da destra
e in automatico della visualizzazione dei separatori delle megliaia.
(stile calcolatrice)
Qui e' possibile?
es.
       1
     12
   123
1.234
Grazie anticipatamente
PFM
--
To reply please remove from e-amil 'xyz'- Per rispondere togliere 'xyz' dall'indirizzo e-amil.

1.234
Per quel che ne so io, no.
Ho risolto il problema facendomi delle routine da inserire in uscita
dal controllo text.
Ho provato ad usare il maskededit, ma non sembra permettere di partire
a destra a scrivere :(
ciao da Michele




Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTATEMI SONO UN PRINCIPIANTE!!!

Per favore aiutatemi.
1)Volevo sapere qual' è il comando che devo usare per copiare con VB dei
file in una directory ad esempio:
Vorrei fare in modo che alla pressione di un tasto OK venissero copiati
alcuni file nella directory C:\windows
Esempio: mettiamo che voglia copiare il file Tony.txt nella directory
C.\windows
2) Qual è il comando corrispondente ad attrib del dos, cioè mi piacerebbe
conoscere il comando corrispettivo ad attrib del dos per poter cambiare gli
attributi dei file
Esempio: mettiamo che voglia cambiare l' attributo del file tony.sys che si
trova nella directory C:\windows
Ringrazio tutti coloro aiuteranno un principiante alle prime esperienze.
Saluti XYZ^

...


Newsgroup: it.comp.lang.visual-basic
Titolo: IsDate e Format. Problemi.

Salve a tutti,
il seguente codice avrebbe dovuto validare l'input fatto su tre
textbox contenenti rispettivamente giorno, mese ed anno.
vDate (tipo variant) contiene la data espressa in questa maniera.
Esempio
18/02/1999
Fino qui tutto ok.
Se pero nel text box relativo al mese scrivo 18 e a quello relativo al
giorno scrivo 2 la condizione If IsDate(vDate) e' sempre true. 
Chiedo: ma il format(espressione, "DD/MM/YYYY") non forza nessun modo
di interpretazione della stringa vDate?
Vi ringrazio per l'aiuto.
---Bruno
---------------------------------------------------------------------------------------------------------
        vDate = Format(txtBirthDate(FieldDay).Text & "/" & _
                        txtBirthDate(FieldMonth).Text & "/" & _
                        txtBirthDate(FieldYear).Text, "DD/MM/YYYY")
 
        If IsDate(vDate) Then
            msgbox"Data OK"
        Else
            msgbox"No data"
        End If
    FromTextToDate = vDate

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare con vb

Devo stampare con vb dei file di testo e dei file immagini.
Come posso fare!?!

 Come posso fare!?!
L' oggetto Printer espone molti metodi e proprieta' che ti permettono di
posizionare testo e immagini, scrivere, disegnare.
Ciao
Aldo

 ha scritto nel messaggio
news:947q0r$cprg8$2...@ID-56381.news.dfncis.de...


 testo printer.cosa?
Printer.Print strMioTesto
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] type library (dll): funziona su vb, non ne vuole sap

Parlando con il programmatore mi ha detto che le 4 proprietą sono definite
come stringhe.
Ho letto anche un articolo MICROSOFT che parla di un possibile errore di
questo tipo se viene utilizzato VARIANT* al posto di VARIANT, ma ,
sinceramente, ignoro totalmente il significato intr-estrinsico!
Dimmi se hai altre idee.
Ciao e Grazie, Alessio.
--
Posted from 
gw-softec.italway.it
 [193.70.27.241] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:85BBBBFE3BEAD3119A8C00105A3BBE0C0623CA@ANDROMEDA...
Parlando con il programmatore mi ha detto che le 4 proprietà sono definite


Newsgroup: it.comp.lang.visual-basic
Titolo: Involontariamente ho creato un Dialer ...

Ciao a tutti !
Ho realizzato un programma che gira su sistemi Win NT, quindi 2000, XP e 
Vista in qualità di servizio.
Questo programma se serve, crea (solo la prima volta in assoluto) ed attiva 
in base alle impostazioni, una connessione di rete di tipo vpn verso un 
server in grado, ovviamente, di ricevere connessioni di quel tipo in 
ingresso.
Il problema sta nel fatto che il mio antivirus : AVG Anti-Malware Network 
Edition riconosce il mio programma come un Dialer e lo fa fuori di brutto 
una volta compilato !
Qualcuno di voi ha idea di come posso fare per ovviare al problema ?
Mille grazie.
-- 
'''®foolbrain®'''
Visual Basic Programmer
Database Designer & Manager
F.O.O.L.: Functional Obedient
          Observation Lifeform
B.R.A.I.N.: Biomechanical Robotic Android
            Intended for Nullification
Skype : foolbrain
WindowsLiveMessenger : foolbrain (
fool...@virgilio.it
)
C6 : foolbrain (
fool...@virgilio.it
)
ICQ : 88912631 

> Qualcuno di voi ha idea di come posso fare per ovviare al problema ?
Contatta il produttore dell'antivirus.
Il mio Sinapsi era riconosciuto come Trojan da AntiVir e Avast (i due 
periodi diversi e con diverse denominazioni).
Mi č bastato contattare il supporto, indicando link al file di 
installazione, e spiegando il problema (falso positivo).
Nel giro di 20 giorni (ma ci vuole cosě tanto?) il mio programma non era 
piů riconosciuto come virus.
bye
Newsgroup: it.comp.lang.visual-basic
Titolo: disattivare form

non riesco a trovare una istruzione o una api che mi consenta di disattivare
un piccolo form tout court (lasciandolo disattivo sullo schermo, come se
avessi cliccato fuori), in modo che torni attivo il programma che precedeva
il suo lancio...
per fare un esempio pratico, immaginate un piccolo form con un button,
lanciato con Word attivo: Word si disattiva e diviene attivo il form appena
lanciato: bene, vorrei fare in modo che, premuto il button, eseguito un
qualsiasi codice il form poi si disattivi (SENZA CHIUDERSI, che allora il
gioco sarebbe fatto), in modo che il focus passi automaticamente a Word
il tutto senza timer, ché allora in qualche modo si potrebbe risolvere, con
getactivewindow e setfocus o setforegroundwindow, ma vorrei evitare, se
possibile
speravo con SetWindowPos, ma non mi riesce
grz

il suo lancio...
[CUT]
Prova a vedere AppActivate
Ciao
Aran Banjo
-
C'č da chiedere cosa togliere nell'indirizzo ;)
Replay to: *[[banjo]]spamdim..@**
abilene.it
**

 windows...
Quando attivi un form, giocoforza si disattiva quello precedentemente
attivo...
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net


esatto! e quando lo disattivi windows ripassa il focus a quello
precedentemente attivo... che è quello che vorrei ottenere io pur non
chiudendo il mio form, ANZI, proprio cliccandoci sopra... dopo ovviamente
aver eseguito tutto un codice che mi interessa.
insomma, ci vorrebbe una api SetInactiveWindow... me.hwnd, non esistendo
chiedevo consigli...
c'est tout

 aver eseguito tutto un codice che mi interessa.
Contunua a non essermi chiaro il motivo di tutto questo, ma non importa :)
Prova, prima di visualizzare il tuo form a fare una GetActiveWindow 
(cosě ottieni l'hwnd della finestra attiva, che *dovrebbe* essere quella 
che ha lanciato il tuo form) e poi, quando hai fatto le tue cose fai una 
SetActiveWindow() su quell'hWnd.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Help Winsock...

Premetto che ho delle basi di programmazioni in vb abbastanza solide, ma non
so niente di server...
C'è qualcuno che può spiegarmi come usare il controllo winsock per gestire
server smtp e pop3 da un'applicazione vb6 o che sappia indicarmi un testo
(possibilmente in italiano) che lo spieghi in una maniera decente? Ho
provato a scaricare della app. di esempio, ma ammetto di non essere riuscito
a capirci quasi niente... Grazie a chiunque volesse aiutarmi...
DSMk

 ..... Ciao spero di esserti utile Ok:
            es:
        winsock1.connect "
smtp.tiscalinet.it
",25
        winsock1.senddata "Helo " & winsock1.localip &vbcrlf
        winsock1.senddata "mail from :<"+indirizzo di posta
mittente+">"+vbcrlf
        winsock1.senddata "rcpt to : <"+indirizzo di posta
destinatario+">"+vbcrlf
        winsock1.senddata "data "&vbcrlf
        winsock1.senddata "from :<"+indirizzo mittente +">"+vbcrlf
        winsock1.senddata "to: <"+indirizzo destinatario+">"+vbcrlf
        winsock1.senddata "subject : "+prova email+vbcrlf
        winsock1.senddata TESTO EMAIL
        winsock1.senddata vbcrlf
        winsock1.senddata vbcrlf
        winsock1.senddata "."+vbcrlf
        winsock1.senddata "quit"+vbcrlf
questo .... è per SMTP .... quello del POP3 te lo spedisco un'altra volta
xchè non mi va di scrivere adesso :-)))))))) CIao

Mi sei stato utilissimo!!! E se riuscirai a darmi la strutture anche per la
routine per il pop3 ti sarň veramente grato!!! Grazie mille! Ciao...
DSMk

 routine per il pop3 ti sarò veramente grato!!! Grazie mille! Ciao...
Sul Sito Comune (URL nella firma) c'è quello che ti serve.
Cerca pop.zip e SMTP.zip.
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

Paperino <non...@lo.dico> wrote in message
8n9hkt$3l7q$1...@stargate1.inet.it...

Mercie beucoup... Aurevoir
DSMk

 ha scritto nel messaggio
news:8n3lcp$ova$2...@nslave1.tin.it...


 wrote in message
Wghm5.73367$dF5.1...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Esiste un oggetto per fare dei mail ?

Sono nuovo di VB e vorrei spedire (solo invio) delle mail sul nostro server
di posta Exchange.
Esiste in VB un oggetto o una procedura per fare ciò ?
L'invio dovrebbe avvenire in automatico ossia in base a messaggi preparati
da altri programmi .
(si tratta di solleciti di rapporti di lavoro o liste errori nei rapporti
inviati).
Grazie a chi mi può aiutare e cordiali saluti.
Hermes

 wrote in message
news:b96ajv$ftkoa$1...@ID-162845.news.dfncis.de...


Lieutenant (
Lieut...@nospam.com
) ha scritto, tanto per cambiare ...
Il cdonts viene installato solo con IIS  ... ti ha chiesto un
componente vb.
Ce ne sono comunque svariati in commercio, oppure quello
assieme a vb dove però devi tribolare con le chiamate MAPI.
-- 
Saluti
Andrea Moro
Sito Comune : 
http://www.it-lang-vb.net

 ha scritto nel messaggio
news:b96ajv$ftkoa$1...@ID-162845.news.dfncis.de...


 ha scritto nel messaggio
news:b96ajv$ftkoa$1...@ID-162845.news.dfncis.de...

Un esempio di come utilizzare MAPI, con del codice pronto, lo puoi trovare
nel proggetto di Lupo:
http://www.it-lang-vb.net/
cerca per nome file: VBP0PSQL
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto per activex

Forse la domanda non è pertinente a questo ng, ma ho urgente bisogno di
sapere come riconoscere l'estensione di un ogetto activex. Mi spiego meglio:
in uno sviluppo ho utilizzato un controllo activex appartenente a MS access,
e quando apro lo sviluppo su un'altra macchina dove access non è presente,
perdo il controllo in questione. Come fare per importare sull'altra macchina
tale controllo senza dover installare Access?
Grazie a tutti


Secondo me devi copiare il relativo file OCX corrispondente al controllo
Activex dal tuo computer.
Se non ricordo male da ACCESS dovrebbe essere possibile aggiungere e
rimuovere i controlli aggiuntivi e quindi riuscire a vedere quale file OCX
e' associato a quel controllo.
Spero di essere stato abbastanza chiaro.
Ciao Pier

...

I files OCX vanno anche registrati, inoltre non penso la cosa sia molto
legale (se proprio vogliamo cavillare)
ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [Roma] Whidbey day chi c'e' domani ?

Chi di voi domani c'e' a Roma ?
Io e Andrea Moro siamo li ... una mangiata in compagnia sarebbe l'ideale !
Fate sapere !
-- 
<Gigio2K>
--- 
www.g2kweb.it
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 Chi di voi domani c'e' a Roma ?
Io, purtroppo, no!
Ciao,
Andrea
P.S. Gli interessati si facciano sentire in mail, il 21 Dic sono a
Napoli, se volete facciamo un mini-meet... ^_^

 Napoli, se volete facciamo un mini-meet... ^_^
Emm io ...
... no ! ^_^
Napoli e' fuori portata !


 ci attende tra qualche anno !!!
Ma non c'erano un po troppi MVP?
Saluti.

Gli oratori erano mvp .... ma che vuol dire ... hanno comunque
illustrato e dimostrato che con pazienza (in tutti i sensi) si ottiene
quello che si vuole.
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: Certificazione

Qualcuno mi sa dire di quante domande e' composto l'esame 70-175 VB6 app.
distribuite?
So che e' di 90 minuti, ma non so il n. di domande.
Ciao

 distribuite?
Se non ricordo male 72.
--
Lorenzo Benaglia
24 Ore Personal Finance S.p.A.
Milano
Italy

Mi sapresti dire PRECISAMENTE dove trovare questa info?
Ho cercato nel sito Microsoft ma non ho trovato niente.
Se si, mi passi il link?
Grazie

Informazioni di questo tipo non sono reperibili sul sito ufficiale
Microsoft.
Ho dato l'esame in questione nell'Aprile del 99 e se non ricordo male il nr.
di domande per il 70-175 era 72 mentre per il 70-176 era 70.


Venerdi' ho l'esame anch'io.
Mi descrivi un attimo come si svolge?
Ho visto le simulazioni, e ho scaricato un grossissimo numero di domande, ma
la paura e' tanta.
Ho studiato sul libro italiano + la pratica + MSDN per approfondire.
Ho implementato tutto quello che era indicato nel libro, ma non sono sicuro
di passare l'esame.
Tu come lo hai trovato? Difficile?
E' vero che la difficolta' delle domande varia a seconda delle risposte che
dai?
Mi fai sapere?
Grazie mille.
Massimo
Newsgroup: it.comp.lang.visual-basic
Titolo: Geodetico funzioni di libreria GeoDLL 32 bit e 64 bit

Ciao sviluppatori,
 
che sviluppa programmi con funzionalità come geodetico mondiale trasformazioni di coordinate o calcoli distanza, in grado di lavorare con l'ultima versione del mio GeoDLL. Il Dynamic Link Library può essere facilmente utilizzato con qualsiasi linguaggio di programmazione per aggiungere funzionalità geodetica di applicazioni.
 
GeoDLL supporta 2D e 3D trasformazione di coordinate, datum geodetico spostamento e il sistema di conversione di riferimento, cambiando fascia meridiana, definito dall'utente coordinate e sistemi di riferimento, calcolo della distanza, Digital Elevation Model, NTv2 manipolazione, Soluzioni diretta / inversa e un sacco di altre funzioni geodetica.
 
La DLL è diventato molto veloce e risparmiare forte sviluppo in C++ con Microsoft Visual Studio 2010. Le funzioni geodetica della nuova versione 12.35 ora sono disponibili in architettura a 32bit e 64bit.
 
Potete trovare una versione scaricabile di prova su 
http://www.killetsoft.de/p_gdla_e.htm
.
 
Fred 
Email: 
info_at_killetsoft.de
 

Veramente sarebbe proibito fare pubblicit� su usenet...
 

 Veramente sarebbe proibito fare pubblicit� su usenet...
 
No, non � cos�.
 
Dipende dai manifesti dei gruppi. Ogni gruppo per essere creato deve 
essere proposto ad una commissione da un gruppo di firmatari che 
decidono scopi, modalit� ed obiettivi. Questo viene scritto in un 
'manifesto' che poi viene messo ai voti nella comunit� di usenet. Se 
viene votato (quindi accettato) il gruppo viene creato e regolato, 
appunto, dal questo manifesto. Per questo se non espressamente vietata e 
se non OT la pubblicit� � tollerata, a patto che non si tratti di un 
troll con particolare amore per il morphing (pratiche espressamente 
vietate su usenet) e se tutto resta nei limiti dell'educazione e del 
rispetto degli altri.
 
In questo caso mi sembra che i post non sia OT e che anche i toni siano 
tollerabili.
 
Ciao cia'
 
-- 
-> G.Chiappori
www.chiappori.it
 
www.chiappori.com
 
 
 

 tollerabili.
 
+1
 

 Veramente sarebbe proibito fare pubblicit� su usenet...
 
 
In questo caso mi sembra che i post non sia OT e che anche i toni siano
tollerabili.
 
Ciao cia'
 
 
E si si     due pesi due misure .....   votate sinistra vero ? 
 


 
Non hai mai replicato con il nick con cui hai iniziato i thread.
 
Morphi continuamente.
 
Sei una specie di robivecchi che vende rimasugli di magazzino e 
rattatuilles inutili da banchetto di russi sfigati.
 
Insulti chiunque si rivolga a te, anche chi lo fa con tono educato.
 
Dici bugie come un bambino.
 
Come troll sei scadente e di nessuna soddisfazione.
 
Detto questo, addio
 
* PLONK *
 
PS: attento a dare del comunista a Wodka che si incazza.
 
-- 
-> GbC
 
fUp
 
 

>PS: attento a dare del comunista a Wodka che si incazza.
 
IPOCRITA COMUNISTA VORRAI DIRE  !!!!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto!!

Come scrivo un array in un file con l'istruzione PUT?
Grazie

> Come scrivo un array in un file con l'istruzione PUT?
Con un ciclo for next?
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO PDM.DLL

Ciao, ho un problemino, ho installato Visual Studio 6 e il PC ha
iniziato ad avere problemi, spesso da errore di Explorer e lo termina
e la causa è questa librerira pdm.dll, ho cercato informazioni e
sembra un problema conosciuto alla Microsoft però il loro consiglio è
"scarica visual studio 6 service pack 3 ed andrà tutto ok".....bene
questo pack è di 120 mb e non ne ho proprio voglia di scaricarlo...c'è
qualche anima pia che ha una versione aggiornata della suddetta
libreria e che me la manderebbe???
andrea....@iname.com
io ho la versione 6.00.8169 del 18/06/1998
grazie


io uso W95, ho installato VS6, e ho la tua stessa versione di quella DLL...
e non ho problemi
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP] Combobox

sono incasinato con una combobox:
come diavolo si crea una combobox con 2 colonne associate a 2 campi di un
database?
- non posso (e non vorrei ) usare un datacombo !
dovrei valorizzare entrambe le colonne con una lettura dal database, per poi
recuperare il contenuto di entrambe le colonne quando una delle 2 colonne č
selezionata.
grazie

 database?
Non si puo'. Ti servono due combobox. A meno che tu non voglia concatenare i
due campi usando un particolare separatore (ma poi per ritrovare le due
informazioni ti dovrai splittare la stringa in due).

 informazioni ti dovrai splittare la stringa in due).
newcombo.zip (o nowcombo.zip, forse l'hanno chiamato cosi'),
sito comune.

Newsgroup: it.comp.lang.visual-basic
Titolo: Campo testo

Avrei un problema con visual basic:
vorrei creare un'applicazione che mi legga file di testo.
Ho creato un campo text nel mio form e una funzione che mi legge un file
di testo (passo come parametro il nome del file da leggere).
la funzione e' del tipo: open file...., etc e leggo tranquillamente il
file di testo, ma quando voglio far apparire la riga letta in text1.text 
non va a capo.
io assegno:
text1.text= text1.text & st
dove st e' la riga letta di volta in volta dal file.
Come faccio ad andare a capo?
come si aggiunge vbcrcf?
ho provato e non funziona.
Rispondetemi, grazie.

text1.text= text1.text & st
prova con
Text1.Text = Text1.Text & vbCrLf & st
Se hai la versione 3.0 del VB, potrebbe non funzionare: in questo caso
prova con:
Text1.Text = Text1.Text & Chr(13) & Chr(10) & st

> 
http://www.ibis.it/bi/sp
----------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto

Questo è il problema:
Devo fare in modo di mandare una stringa ad un programma.
Voi direte:"usa sendkey".E fin qua ci sono arrivato anch'io.Il problema è che in realtà 
il programma non si apre subito ma dopo alcuni secondi.Siccome ci sono 2-3 secondi 
di caricamento il focus potrebbe passare ad un'altra applicazione.
--
Posted from 
mta10-acc.tin.it
 [212.216.176.41]
via Mailgate.ORG Server - 
http://www.mailgate.org

 di caricamento il focus potrebbe passare ad un'altra applicazione.
Primo metodo (rozzo !): usa Sleep per aspettare qualche secondo
dopo aver lanciato il programma esterno, prima di dare il sendkeys$
Esempio:
---------------------------
' metti questa dichiarazione in un modulo
' Sleep sospende l'esecuzione di un prog VB per il numero
' specificato di millisecondi; Es.:
' Sleep 5000 ' blocca tutto per 5 secondi
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
----------------------------
Un metodo un po' più seri potrebbe esserequesto, se il programma
al quale mandi la stringa, lo lanci con Shell.
In genere, un'applicazione Windows chiamata con Shell viene lanciata
_prima_ di restituire il comando al VB, se questo non avviene potresti
fare un loop con AppActivate per vedere se il prg esterno è attivo,
prima di dargli comandi.
Esempio pratico (NON PROVATO):
---------------------------
' Metti la stessa dichiarazione Sleep di prima in un modulo
' poi aggiungi:
Private Sub Command1_Click()
    Dim prgAttivo As Boolean
    Dim StringaDaMandare As String
    Dim ProgrammaDaChiamare As String
    ProgrammaDaChiamare = "C:\Program Files\TPro3.2\TPro.exe"
    StringaDaMandare = "^O"
    On Error GoTo Aspetta
    Dim IdDelTask As Long
    IdDelTask = Shell(ProgrammaDaChiamare, vbNormalFocus)
    Do
        Sleep 100
        DoEvents
        prgAttivo = True
        AppActivate IdDelTask, False
        If prgAttivo = True Then Exit Do
    Loop
    Debug.Print "Il programma esterno è attivo, gli invio i comandi..."
    SendKeys StringaDaMandare, True
    Exit Sub
Aspetta:
    Debug.Print "Sto aspettando"
    prgAttivo = False
    Err.Clear
    Resume Next
End Sub
-------------------------
Spero che questo ti possa aiutare.
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: 13enne alle prime armi !!!!!!!!

Ho installato sul form una progressbar !!!
Ora quest'ultima si muove velocemente partendo da sinistra
e andando avanti e dietro, forse per l'effetto  " RND " !!!
Io invece vorrei che le tacche della progressbar, avanzassero
molto lentamente una alla volta, fino a toccare il lato finale (destro) !
Inoltre vorrei poter installarci sopra delle gif animate, ma non trovo
il programma " Gif 89 " !!!
Per piacere, chi mi viene in aiuto ????
Ringrazio sin d'ora chi mi volesse aiutare, altrimenti pazienza :)))))
Ciao a tutti
Giorgio

 wrote in message
8bep57$cnc$1...@nslave2.tin.it...


per la progress bar nulla da aggiungere, per il gif 89 ... prova a conneterti a
questo sito, troverai questo ed altro sulla programmazione
http://www.codeguru.com
    Ciao
                    Andrea


Se vuoi aumentare la progress bar a tempo, imposta cosě un timer:
Private Sub Timer1_Timer;
 ProgressBar1.Value = ProgressBar1.Value + 1
End Sub
Scegliendo il valore di intervallo del timer


 wrote in message
jAKC4.5604$pn3....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Parallela in VB6

Salve,
qualcuno di voi sa se esiste un controllo OCX o una DLL o comunque un
sistema per pilotare una porta parallela in modo "grezzo" come si fa con la
seriale tramite il controllo MSCOMM?
Mi spiego meglio: devo pilotare una stampantina termica che ha sia la
parallela che la seriale: con la seriale va perfettamente, gli invio i
caratteri ASCII uno per uno anche da Hyper Terminal e stampa tutto in questo
modo che io chiamo "grezzo".
Nè Hyper Terminal, nè il controllo MSCOMM sono però, a quello che ho capito,
in grado di fare la stessa cosa sulla parallela.
Qualche suggerimento?
P.S.
1) devo usare per forza la parallela: le seriali servono per altri apparati
2) non posso usare driver di stampa, devo mandare i caratteri da stampare un
pò per volta.
Grazie...

Vedi 
www.visual-basic.it
 ci dovrebbe essere una dll e nella sezione articoli
anche una spiegazione.

Molto grezzo:
Open "LPT1:" For Output As #1
Print #1,quello_che_te_pare;
Close #1
Gianni