mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Btrieve, mi serve aiuto

Ciao a tutti,
chi mi puņ aiutare per chiudere forzatamente degli archivi Btrieve lasciati
aperti da una procedura Windows (16 bit)?
Un grazie anticipato
calf...@tin.it
Alfredo Cacciatori


Credo che basti:
Butil -reset  (chiude gli archivi)
Butil -stop    (scarica il brequest o il btrieve)
Ciao Francesco C.

Newsgroup: it.comp.lang.visual-basic
Titolo: connessioni internet (aiuto)

Salve,
dopo tanta fatica sono riuscito a far si che la mia applicazione riuscisse a
collegarsi con accesso remoto;
ma ora ho un' altro problema:
come faccio a far aspettare la mia applicazione fino a che la connessione č
completa, in altre parole vorrei che l'applicazione riprendesse a eseguire
il codice solo quando la connessione č completa. Non vorrei fare un banale
ciclo d'attesa.
Grazie

Dai un'occhiata sul Sito Comune del NG:
www.murialdo.it/it_lang_vb
Nella sezione "Piccole Perle" c'è un'articolo che ti spiega, tra l'altro, come fare per stabilire se una connessione è
attiva.
Quindi tu basta che non faccia nulla se è attiva, ed invece eseguire il codice se non lo è....
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

ciclo d'attesa.
  Cerca sul sito comune l'esempio riguardante le RAS API, che ti
forniscono un notevole controllo sulle connessioni a Internet e ce
n'e' pure una che ti permette di verificare se sei connesso o meno.
  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: caratteri ESC su stampante generica / solo testo

Ciao
devo stampare delle cose su una stampante generica / solo testo, uso
win XP e VB6
devo però trasmettere anche dei caratteri "speciali" come il
grassetto, la doppia altezza eccetera, che la stampante supporta
per esempio la doppia altezza la ottengo trasmettendo la sequenza ESC-
D (decimale 27,68)
printer.print chr(27) & chr(68)
ma non funziona per niente. su stampante invece che la doppia altezza
mi stampa ".D"
non è che il driver generica / solo testo "falcia" il carattere ESC
perchè lo considera non stampabile?
mi sapete dare una dritta?
grazie

Probabilmente non hai inserito nelle proprietą della stampante "Generic / 
text only" la sequenza per la selta del font oppure di inizializzazione 
stampa
-- 
Ettore Massimo Albani 

 grazie

OK grazie, proverò così.... ma comunque sarebbe carino poter inviare
alla stampante ciè che credo!
se per la mia stampante inviando ad esempio ESC+P qeusta fa una
pernacchietta, vorrei poterlo fare... inviare ESC+P da programma e via
così....
secondo voi è il driver che lo impedisce??
grazie

 grazie

 occupa proprio di virtualizzare le stampe
accidenti a lui.... la "generica solo testo" dovrebbe proprio essere
fatta per lasciare gestire tutto quanto a me...
la stampante che uso non è su porta lpt1 ma seriale... forse dovrei
provare a scrivere direttamente su com... senza controllo di flusso
però (cosa che, se uso l'oggetto printer, fa lui)...
uff
grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: installa su errore

sto facendo un programma che faccio partire da cd.
si come uso dei comandi che di norma non supportano diversi pc, ho fatto un
pacchetto di setup che vorrei far partire in automatico sul errore del dll o
altro non trovato.
ho provato con "on error goto ...." ma mi da errore.
come posso fare??
grazie a tutti
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 errore del dll o altro non trovato.
Cerchi prima (con un programma che si basi solo sul runtime di VB) tutti i
file (che si presumono, se dovuto, registrati) e ne verifichi la versione.


si ma, dal momento che mi si verifica un errore vorrei far partire
l'istallazione, il file setup.exe che ho creato.
con quale comando o stringa faccio partire il setup?


 con quale comando o stringa faccio partire il setup?
Shell...


grazie 1000



il problema continua:
adesso riesco a far partire l'istallazione sul errore.ok
Dim taskID
taskID = Shell("d:\setup.exe", vbNormalFocus)
If taskID <> 0 Then DoEvents
End If
se pero il lettore è un altro o la prima unita è "E" x che ci sono due HD mi
da regolarmente "file non trovata".
allora ho usato delle funzioni che ho scaricato per rilevare la prima unita
cdrom.
taskID = Shell("DrvCD:\setup.exe", vbNormalFocus)
se assegno come caption a una label mi fà vedere la lettera della unita se
pero la metto nella SHELL mi da file non trovato.
non capisco
cosa faccio??


 taskID = Shell(variabile_che_contiene_l'unità & ":\setup.exe",
vbNormalFocus)
Permettimi, ma, se questa non è una svista, ho l'impressione che sarai
spesso fermo...


Tu hai ragione quando mi fai questo discorso.
Il problema è che io non sono un programmatore come voi,
la programmazione mi ha sempre affascinato e da qualche mese mi ci sto
dedicando.
Come tu hai scritto e stata una svista, dopo una serie di errori mi
demoralizzo e non ragiono più e allora faccio delle vere caz….. è vero anche
che le faccio ragionando ma non stiamo qui a vedere il pelo.
Ringrazio a te Lupo e a tutti gli altri per la pazienza che avete e le
risposte che date.
Dopo queste righe continuo con le domande
Se voglio cambiare una serie di proprietà di un oggetto uso l’istruzione
“WITH”.
Ma se voglio cambiare una proprieta di una seria di oggetti es.“LABEL(
).VISIBLE=TRUE”
Come faccio??


 Dopo queste righe continuo con le domande
...
ecco, questo l'avevi già aperto, si risponde di là...
Newsgroup: it.comp.lang.visual-basic
Titolo: Impostare il livello di protezione delle macro di word da vb6

E' possibile modificare il livello di protezione delle macro di word da VB6? 
Avrei bisogno di passare da un livello di protezione alto ad un livello 
basso, per poi tornare ad un livello alto.
Grazie mille! 



Per quanto mi ricordi puoi lanciare una macro da VB6 anche se c'è il
livello alto.
Era un codice del genere, ma l'ho ripescato e devi provarlo tu:
  Set wApp = CreateObject("Word.Application")
  wApp.Visible = True
  Set wDoc = wApp.Documents.Open(App.Path & "\Documento1.doc")
 
  wApp.Run macroName:="MAIN"
  wDoc.SaveAs App.Path & "\Documento2.doc"
 
  Set wDoc = Nothing
  Set wApp = Nothing
Vedi se riesci ad adattarlo a quello che ti serve.
Quello che ti posso dire è che il livello di macro è dipendente dall'utente
del PC, e su vecchie versione (pre-2000) c'è un funzionamento "misterioso". 
Del tipo che per far funzionare una macro ad un cliente dovevo aprire Word
da utente loggato, ma fare EseguiCome Administrator, altrimenti non
funzionava.

Newsgroup: it.comp.lang.visual-basic
Titolo: Nouvo sito dedicato a Visual Basic

Avete dei problemi con Visual Basic ?
Avete realizzato un programma e volete testarlo per vedere se ha dei
bug ?
Volete semplicemente rendere disponibile il vostro programmino o un
esempio perchč ritenete possa essere utile anche agli altri ?
Il mio sito č dedicato agli appassionati di Visual Basic e se volete
potete mandarmi un'E-mail indicandomi il nome, le caratteristiche e lo
spazio occupato (in formato zip) del vostro programma, io provvederň a
esaminare le informazioni e a chiedervi di mandarmelo cosě potrň
renderlo disponibile sul mio sito.
http://www.geocities.com/SiliconValley/Way/8960/index_it.htm
mailto:
SIM...@mail.asianet.it





Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] WORD

AIUTO!
So di esser OUTOFTOPIC ma non riesco ad inserire
un banalissimo check-box in un documento word.
Come si fa?
Aiut, GRAZIE|

 ha scritto nel messaggio
news:iR%U6.19444$Vk3.2...@news2.tin.it...


 E' questo che chiedevi o è troppo semplice?


Newsgroup: it.comp.lang.visual-basic
Titolo: VB e TCP/IP

Qualcuno sa se esiste un componente per leggere i dati dalla porta ethernet
con TCP/IP. In pratica mi servirebbe
qualcosa di simile al componente usato per la seriale ma che riceva i dati
dalla rete.
Saluti a tutti

 ha scritto nel messaggio
news:aprhpp$mbo$1...@fata.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: libro Visula Basic

Chi mi puo' consigliare un buon manuale di livello medio/avanzato
riguardo Vb5 o Vb6. No Microsoft.
Grazie a tutti chi mi rispondere

Grazie a tutti chi mi rispondere
Ci sono delle recensioni e qualche libro anche online. Devi solo cercare tra
i links sul mio sito.
Ciao
---
--
-
MIX (VB5SP3)
170 links a siti VB
http://www.tempolibero.com/user/mix/
http://space.tin.it/computer/gaais/
-
--
---

Newsgroup: it.comp.lang.visual-basic
Titolo: Run-time error '5' ???

Ho appena finito la mia applicazione..sul mio computer tutto ok ma quando
vado ad installarla sul PC dove dovrebbe andare, l'applicazione parte ma mi
da' il msg scritto di run-time!
Premetto che io ho XP con office XP, mentre l'altro PC ha 98 con Office
2000...e per database ho usato Access convertendo poi il database alla
versione 97
Qualcuno potrebbe dirmi cosa puň essere??
GRAZIE

da' il msg scritto di run-time!
?Error$(5)
Invalid procedure call or argument
Passi un argomento non valido ad una funzione, tipo una dimensione
negativa o un accesso ad un carattere di una stringa oltre la sua
lunghezza o altro ancora.
Vai di debug ;-)
-- 
ciao, hal

 ha scritto nel messaggio
news:19r4kvok7eoimnio3...@4ax.com...


:-(
Per debug intendo che devi debuggare l'eseguibile sul pc del cliente.
Una strada facile e' scriversi delle funzioni di trace che registrino
su file quello che sta facendo il programma.
Potresti subordinare l'esecuzione delle funzioni di log ad un
parametro impostabile dall'esterno (riga di comando, file di
configurazione, registro o altro) in modo da poterle attivare e
disattivare a comando.
-- 
ciao, hal
p.s. e' consuetudine di netiquette che le risposte ai messaggi si
scrivano *sotto* al testo cui si risponde e *non sopra*.


10 a 1 che è un "vero" invece che "true" in un file ini o nel registry...
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Quali i siti migliori per Vb?

Qualcuno mi può elencare i migliori siti per programmatori di Vb?
M'interesserebbe anche qualche sito dove poter trovare guide in italiano.
Grazie.

Qualcuno mi puň elencare i migliori siti per programmatori di Vb?
Il Sito Comune, ovvio!!!!! ^____^
Poi guarda tra i suoi link (c'č anche il mio sito, anche se non č tra i migliori puň tornarti
utile.... spero....)
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 M'interesserebbe anche qualche sito dove poter trovare guide in italiano.
---> 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/

Newsgroup: it.comp.lang.visual-basic
Titolo: Lista File in TextBot

Come faccio ad avere la lista dei file di una directory in una textbot?
Marco

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: MsFlexGrid DAO e numero records

Salve a tutti.
Leggo proficuamente questo ng e ringrazio tutti per le informazioni sempre
utili che contiene.
In un progetto ho collegato tramite DAO un database access a un controllo
msflexgrid. Fino a qualche tempo fa nessun problema. Ora presso un cliente
che ha superato i 30mila records, msflexgrid si "ferma" a 29997, mentre se
apro il db con Visdata o con Access "vedo" il numero esatto di records
(34520).
Ci sono limitazioni in msflexgrid ?
In msdn non ci sono informazioni utili a riguardo.
Grazie per eventuali risposte.
Lorenzo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:did9ou$i5b$1...@news.newsland.it...


Ok. Accetto tutte le critiche.
Il fatto č che volevo farlo funzionare cosě com'era senza modificare nulla.
Ma prendo atto che nessuno si spiega (per ora) perchč la msflexgrid
visualizza un massimo di 24997 righe.


 visualizza un massimo di 24997 righe.
Non č un problame di righe, ma di celle totali.
http://support.microsoft.com/kb/q191006/
Paolo


uo bello....sta calmino!
Io prendo atto che l'informatica č solo "terra di nessuno" e che gente come
te
che non presta nessuna attenzione all'interfaccia ne all'ergonomia di una
applicazione
si lamenta pure perchč la risposta arriva in ritardo!!!

Non era mia intenzione lamentarmi per il ritardo della risposta, infatti
avevo scritto "per ora". In ogni caso chiedo scusa se sono stato poco
educato.
Approfitto per ringraziare Paolo che ha trovato il perchè nel support di
Microsoft.


Newsgroup: it.comp.lang.visual-basic
Titolo: Parallela e Block Scorr

Due Informazioni:
Come faccio a pilotare il Block Scorr della tastiera in vb?
Dove posso trovare info per pilotere la porta parallela usando le(o gli) api
di win?
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 di win?
http://www.gbcweb.com/____ap/
La terza puntata non l'ho ancora inserita, ma quello che serve c'è
tutto.
-> GbC|
www.gbcweb.com
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET]

Salve,
ho un form (form1) dal quale cliccando un pulsante apro un'altro form
(form2),
se da form2 cliccando un pulsande volessi ad esempio cambiare il colore di
fondo del form1 provando a fare:
form1.backcolor= color.red
mi dà errore poichè intanto form1 per .net è una classe e comunque pur
esistendo
un'istanza di tale classe (il form1 perlappunto) dal form2 non la vede.
Allora ho provato:
dim frm1 as new form1
frm1.backcolor= color.red
frm1.show
però questo mi crea una nuova istanza di form1 (un'altro form non quello che
voglio gestire)?
Insomma come diavolo si fà in 
VB.NET
 ad interagire con un form da un'altro
form?
Sarà un problema di visibilità...
Grazie

 wrote in message
news:3e48b...@news.dada.it...


 Sarà un problema di visibilità...
Come hai detto, le form sono classi, come lo sono peraltro in VB6; la
differenza e' che in quest'ultimo esiste sempre un istanza implicita di tale
oggetto, una variabile chiamata appunto con il nome della form stessa,
visibile a livello di intero programma.
In .NET questo non e' piu' vero, quindi valgono i normale criteri di
visibilita'; devi cioe' passare un riferimento alla seconda form, oppure
mantenere in una classe Shared un insieme globale di form caricate
Per il primo caso, un sistema semplice e' quello di sfruttare la property
Owner del form... per le finestre modal puoi usere un overload del metodo
ShowDialog() e passarlo come parametro
Dim f As Form2 = New Form2()
f.ShowDialog(Me)
Per quelle modeless sfortunatamente l'overload di Show() non c'e', ma te la
cavi comunque a buon mercato con
Dim f As Form2 = New Form2()
f.Owner = Me
f.Show()
a questo punto, da Form2 puoi fare riferimento alla prima con
Me.Owner.BackColor = Color.red
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: Salve a tutti!

Salve a tutti ! Mi chiamo Omar Caverzan , sono perito informatico e dopo
aver finito il militare e fatto un corso di formazione su Visual Basic da
questo venerdi comincerò a lavorare in una Software House come programmatore
in VB.
In questi giorni credo farò un sacco di domande in questo newsgroup e credo
di ne diverrò un frequentatore abituale.
Ciao !!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Microsoft forms 2.0 form: a cosa serve?

Salve,
Ho visto che in VB6SP4 nel menu "project" è presente l'active x in
oggetto.
Da MSDN non sono riuscito a trovare informazioni.
Qualcuno mi sa' dire dove trovarne?
E quale è la funzionalita' di questo activeX?
	Lore.

 wrote in message
39EEFB71...@agip.it...


 ha scritto nel messaggio
news:8sn94j$m6b$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:8sngli$ku4g5$1...@ID-51253.news.cis.dfn.de...


 wrote in message
news:ypIH5.50945$Nz.14...@news.infostrada.it...


no scusate un attimo la cosa mi interessa moltissimo.
se non sbaglio microsoft forms 2.0 è l'unico controllo che da la possibilità
si inserire un togglebutton... è così? a me serve... io ADORO i
togglebutton... se mi dite che è bacato Forms 2.0... come faccio con i
togglebutton??
mario

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Problema con DataReport ( VB 6.0)

Cari amici ho il seguente problema....
ho costruito un datareport all' interno di un piccolo gestionale
Ricavo i sub totali per mezzo di un RptFunction di somma..ora il problema è
il seguente:
ho bisognodi aggiungere a questo subTotale unacifra fissa ( nel mio caso il
bollo d' imposta)...
Qualcuno di voi puo suggerirmi la soluzione ???
Grazie in anticipo
Massimo Danieli

...


>
======================================================================
Saverio Tedeschi /  snail mail:Var.SS 115 n.23-97015 Modica (RG)-Italy
e-mail:te...@tin.it-STIC n.2748/STOFC n.250505       ( @^@ ) 
=================================================oOOO==(_)==OOOo======
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] recordset ADO e metodo find

Una volta programmavo usando DAO (mica lo sapevo, solo che usando VBA
all'interno di access97 la cosa era automatica), e se volevo trovare un
record con determinate caratteristiche scrivevo:
rs.findfirst "Cognome='Rossi' and Nome='Mario'"
poi testavo la proprietà NoMatch ed ero felice come un grillo...
Sono passato a ADO (non vi dico quanto tempo è servito per capire che erano
due cose diverse), e a parte la mancanza del FindFirst e la mancanza del
NoMatch ho un ulteriore problema: se scrivo una cosa del tipo
rs.find "Cognome='Rossi' and Nome='Mario'"
mi risponde sempre che i criteri sono errati o in conflitto fra di loro...
Fino ad ora ho risolto la questione in alcuni modi alquanto fantasiosi, ma
che richiedono la scrittura di qualche riga di codice (quei due o tre cicli
Do...Loop nidificati).
Ci sarebbe nessuno in grado di dirmi se è possibile utilizzare il metodo
Find con più di un parametro e se sì quale sia la sintassi corretta?
Salutoni
Sergio

 mi risponde sempre che i criteri sono errati o in conflitto fra di loro...
Purtroppo il metodo Find dell'oggetto ADODB.Recordset accetta un criterio di
ricerca costituito da 1 singolo campo.
Se vuoi conoscere i motivi di questo vincolo architetturale ed un paio di
workarounds visita
http://support.microsoft.com/default.aspx?scid=KB;EN-US;q195222
Ciao!
--
Lorenzo Benaglia
UGIdotNET - 
http://www.ugidotnet.org

 
http://support.microsoft.com/default.aspx?scid=KB;EN-US;q195222
Lorenzo, "motivi"?, "vincolo architetturale" (dando la colpa a OLE DB)?
Io lo chiamo "mal di gomito". ;-)

 Io lo chiamo "mal di gomito". ;-)
Riporto pari pari le due frasi piů significative del documento:
Cause
The Find method is a single column operation only because the OLE DB
specification defines IRowsetFind this way.
[CUT]
Status
This behavior is by design.
Non conosco i motivi che hanno spinto gli architetti di Microsoft a
progettare l'interfaccia IRowsetFind in quel modo, ma quando leggo la solita
frase "This behavior is by design"... Brrrr... mi vengono i Brrrividi.
E' il classico modo per dire "OK, non abbiamo considerato questa ipotesi. Se
vi va bene č cosě, altrimenti č cosě ugualmente!!"
Per lo meno abbiamo dei workarounds...


 Per lo meno abbiamo dei workarounds...
E' vero.
E' anche vero, perň, che il workaround non č certo da spaccarsi la testa...
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: stampare su lettere

Ciao a tutti,
ho una stampante ad aghi e vorrei stampare su delle lettere a modulo
continuo in determinati punti.
Il mio problema è che nell'elenco dei tipi di carta non c'è il formato
delle lettere che ho io.
In VB ho provato ad impostare la proprieta Printer.Height e Printer.Width,
ma dopo che gli assegno un valore, noto che le 2 proprietà sono invariati.
Come posso fare a impostare una misura di foglio personalizzata ?
Ciao e Grazie
Paolo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Come posso fare a impostare una misura di foglio personalizzata ?
In ambienti e drivers stampanti che lo prevedono, usa, appunto, la
dimensione personalizzata.
Per XP (e forse anche 2000 e NT) vedi qui:
http://makeashorterlink.com/?O5C824FE5

Newsgroup: it.comp.lang.visual-basic
Titolo: SQL e MDB in VB6

MI spiegate la differenza tra un database SQl e un Archivio Mdb,Visto che
devo scrivere una nuova procedura cos mia conviene usare per la sicurezza
dati e la velocità?

dati e la velocità?
sql server e' un database client-server e costa x, mentre access e' un file usato 
come database e costa un bel po' meno:
si tratta percio' di due cose piuttosto diverse.
per le prestazioni, dipende dalle dimensioni e dagli accessi contemporanei al database: 
piu e' grosso e/o piu' gente si collega e l' mdb scivola, frana, slavina ...
ciao, hal

 si tratta percio' di due cose piuttosto diverse.
Beh, c'è sempre Msde gratuito e fino a 5 utenti funziona perfettamente.
Certo se vai oltre i 5 Sql-Server completo costa un bel pò di + di Access,
ma è anche un'altra cosa...
ciao
ugo

 ha scritto nel messaggio
news:9cn29c$kmb$1...@pegasus.tiscalinet.it...

Io uso MySql 
www.mysql.com
 COMPLETAMENTE freeware e MOLTO potente; so
collega in ODBC attraverso MyODBC (sempre 
www.mysql.com
)
Ciao
--
Timothy Redaelli
timothy....@email.it

 collega in ODBC attraverso MyODBC (sempre 
www.mysql.com
)
MySQL:
- ha licenza GPL
- gestisce db di grandi dimensioni
- gestisce egregiamente parecchi accessi concorrenti
- non ha trigger
- non gestisce direttamente le transazioni
- non gestisce select annidate
- .......
a mio avviso č senza dubbio un buon prodotto, ma "MOLTO potente"...... :-)
Ciao, M.


mi associo.
ciao
ugo

 wrote in message
9cn54h$e29ko$3...@ID-87006.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Winsock e chiusura connessioni

Salve,
avrei in mente di realizzare un programmino che utilizzi il controllo
Winsock ma avrei la necessità di chiudere immediatamente una connessione.
Mi spiego meglio:
Se effettuo un a connessione ad un indirizzo IP su una certa porta voglio
essere sicuro che se lo stesso controllo effettua un nuovo tentativo di
connessione dopo qualche secondo la precedente connessione sia stata
rimossa. Controllando con Netstat naturalmente ci si accorge che in realtà
la connessione passa attraverso alcune fasi per cui apparentemente non è
possibile resettarla di colpo.
Qualcuno conosce qualche metodo "immediato".
Grazie GG

 wrote in message
N_Ps6.34700$x3.6...@news2.tin.it...

c'è un bel codice sul sito comune che si chiama accesso remoto
http://www.murialdo.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Modifiche non visibili fra una connection e l'altra

Buongiorno a tutti,
uso VB6 SP6 ed accedo ad un DB Access 2000 mediante ADO.
Nel mio prog uso una connection "generica" cnnGlobal che uso per
visualizzare gli elenchi (ovvero per popolare le griglie, tendine,
etc). La cnnGlobal la apro all'avvio del prog e la chiudo alla fine
(quando l'utente esce dal prog).
Nella finestra in cui ho il problema (commesse) ho l'elenco generale
delle commesse, ovvero una griglia (TDDBGrid) collegata ad un
recordset "RecElenco", aperto su cnnGlobal.
Per l'eliminazione di un record (commessa) ho la necessità di gestire
una transazione (in quanto vado ad aggiornare diverse tabelle).
Quindi, dopo che l'utente ha confermato l'eliminazione, faccio:
Dim CnnEliminazione As New ADODB.Connection
CnnEliminazione.Mode = adModeReadWrite
CnnEliminazione.CursorLocation = adUseServer
CnnEliminazione.ConnectionString = strConnectDati
CnnEliminazione.Open
CnnEliminazione.BeginTrans
[...]
CnnEliminazione.Execute (vari comandi)
[...]
CnnEliminazione.CommitTrans
a questo punto anche se faccio aggiornare forzatamente il RecElenco
(con RecElenco.requery), non mi "vede" immediatamente l'eliminazione
che ho appena fatto dall'altra connection.
Se l'utente clicca ripetutamente il tasto di refresh (che richiama
RecElenco.Requery), dopo 3 - 4 secondi il record eliminato
effettivamente sparisce.
Esiste un modo per assicurarsi che l'eliminazione fatta da una
connection sia immediatamente visibile da tutte le altre?
Per chiarezza riporto anche il codice che uso per aprire la cnnGlobal
ed il recordset dell'elenco:
Set CnnElenco = New ADODB.Connection
CnnElenco.Mode = adModeRead
CnnElenco.CursorLocation = adUseServer
CnnElenco.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=D:\Progetti VB6\ProvaCnn\Dati.mdb;"
CnnElenco.Open
Set RecElenco = New ADODB.Recordset
RecElenco.Source = "Select * from TabCommesse"
RecElenco.CursorType = adOpenForwardOnly
RecElenco.CursorLocation = adUseServer
RecElenco.LockType = adLockReadOnly
RecElenco.ActiveConnection = CnnElenco
RecElenco.Open
Ringrazio in anticipo chiunque possa aiutarmi.

 Ringrazio in anticipo chiunque possa aiutarmi.
Credo che per risolvere tu debba usare il metodo RefreshCache dell'oggetto 
JetEngine che si trova in "Microsoft Jet and Replication Objects 2.x 
library" prima di rileggere i dati.
Trovi maggiori info qui:
http://support.microsoft.com/kb/200300
Bye
Raf

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

Come si può colorare una determinata casella di una flexgrid con un
determinato valore?
es.  with gri
                .col=3
                .row=2
                in questa posizione vorrei che il testo che contiene fosse
rosso...come si può fare?
se provo ad usare l'istruzione forecolor mi colora tutta la grid...
    Grazie per i preziosi consigli
--
Posted from 
arcanet.it
 [151.99.191.3]
via Mailgate.ORG Server - 
http://www.mailgate.org


devi usare la proprietà cellforecolor



Newsgroup: it.comp.lang.visual-basic
Titolo: listview e scrollbar

Buongiorno,
vorrei sapere se ci sono degli esempi di codice o piccoli progettini che
mostrano come inserire ed utilizzare una scrollbar verticale nella
listview...
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 listview...
Mmm...sei sicuro? La scrollbar compare automaticamente quando il numero
di item visibili sulera il numero di item visualizzabili...
Bye by SixaM 8-]


 wrote in message
news:89c1c5bf34191314868...@mygate.mailgate.org


 
Su una form, aggiungi una ListView (senza cambiarne le proprieta') e un
CommandButton. All'evento Click() del CommandButton associa il seguente
codice:
Dim iConto As Integer
Dim lItem As ListItem
  With ListView1
    .View = lvwReport
    .ColumnHeaders.Add , , "Pippo", 3000
    .ColumnHeaders.Add , , "Pluto", 4500
    .Height = 4000
    .Width = 5000
    With .ListItems
      For iConto = 1 To 100
        Set lItem = .Add()
        With lItem
          .Text = "Riga " & CStr(iConto)
          .SubItems(1) = "Sottoriga " & CStr(iConto)
        End With
        Set lItem = Nothing
      Next
    End With
  End With
Eseguendolo, vedrai che appaiono sia la scrollbar orizzontale, che
quella verticale.


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] qualcuno sa se quelli di Infomedia.it sono vivi?...

ho perso la pw per entrare nel sito e sono gia' 2 giorni che non rispondono
alla mia e-mail...
Thank's
PaoloS

 alla mia e-mail...
Hanno dei problemi di rete, credo...
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: [.net] perplessità il lettura da file

La situazione č questa:
Apro un filestream su un file generato con il blocco note
a partire da quello genero un binaryreader (sě, lo so che non sarebbe quello
da applicare ai file di testo ;-) )
poi dimensiono un buffer di char e mi vado a leggere il file.
Passando dal pseudocodice al codice, dovrebbe essere una cosa del tipo..
Dim fs as new FileStream(NomeFile,FileMode.Open)
dim br as new BinaryReader(fs)
dim c as char
dim i as integer
for i = 0 to 100
    c = br.readchar()
next i
orbene... i caratteri accentati vengono bellamente saltati.
Quale fondamentale dettaglio ho sbagliato?
Salutoni
Sergio

L'overload del costruttore del BinaryReader ti permette di passare un
oggetto Encoding adatto ai varatteri che hai all'interno del file,
modificalo e vedrai che tutto viene letto correttamente
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP]
UGIdotNET - 
http://www.ugidotnet.org

 modificalo e vedrai che tutto viene letto correttamente
Ho provato. Funziona correttamente. Grazie
Perň la cosa mi "perplime" lo stesso: se io "sbaglio" la codifica di un
file, mi aspetterei di leggere dei caratteri incongruenti, degli spazio
vuoti, qualche immonda porcheria, non il nulla assoluto.
Salutoni
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: CITOH BZB-2

Ho un'applicazione sviluppata in VB6 + SP4 ed utilizzo questa stampante code
bar per stampare i codici a barre degli articoli.
La stampantina è dotata di driver windows + software per la stampa delle
etichette che posso collegare al database.
Domande:
Posso stampare direttamente dalla mia applicazione?
Qualcuno di Voi conosce questa stampante?
Esistono dei comandi standard per stampare su questo tipo di stampanti
oppure devo necessariamente trovare la guida programmatore specifica?
Grazie Mille anticipatamente

 Grazie Mille anticipatamente
ciaociao

 ha scritto nel messaggio
news:Xt6Rb.146191$VW.59...@news3.tin.it...
| Ho un'applicazione sviluppata in VB6 + SP4 ed utilizzo questa stampante
code
| bar per stampare i codici a barre degli articoli.
| La stampantina č dotata di driver windows + software per la stampa delle


 
Ciao.
Paolo F. 

 ha scritto nel
messaggio news:dPaRb.8$HO...@news.edisontel.com...


 ha scritto nel messaggio
| > news:Xt6Rb.146191$VW.59...@news3.tin.it...
| > | Ho un'applicazione sviluppata in VB6 + SP4 ed utilizzo questa
stampante
| > code
| > | bar per stampare i codici a barre degli articoli.
| > | La stampantina è dotata di driver windows + software per la stampa


Newsgroup: it.comp.lang.visual-basic
Titolo: Estrarre dati da File PDF

Ho realizzato un programma che crea/gestisce/stampa automaticamente
file PDF partendo da Stampe AS400
I file però vengono nominati utilizzando il dato date+time partendo
dalla data di sistema del server su cui gira
All'interno dei file PDF esistono dei dati che potrebbero identificare
meglio i file:
- codice cliente
- numero documento/data documento
ecc...
Come posso tramite codice "leggere" questi dati ed utilizzarli per
nominare "meglio" il file?
Grazie dell'aiuto

barcode ha scritto:

Una volta Adobe distribuiva il manuale delle API di ADOBE_Acrobat alle
quali
si poteva accedere, ora però se non erro, viene distribuito con la
versione Writer
solo un OCX tramite il quale, forse, è possibile accedere al modello
ad oggetti, ma
devi verificarla in quanto non ho più aggiornato la cosa.
@Alex

Grazie dell'aiuto
I PDF sono dei files di testo contenenti istruzioni per disegnare la
pagina. Potresti "tranquillamente" aprire tali files e ricercare le
informazioni che vuoi.
Ciao
AranBanjo
-- 
web: 
http://www.ponchio.it
Replay to: *[[banjo]]spamdim..@**
ponchio.it
**
"E' un vero peccato che tutte le persone che sanno come far
funzionare il paese siano troppo occupate a guidare taxi o
a tagliare capelli" - George Burns
"Vorrei avere un crocifisso di kryptonite, cosi' potrei 
tenere lontani Dracula e Superman" - Jack Handey
Newsgroup: it.comp.lang.visual-basic
Titolo: listbox

Buongiorno a tutti,
č possibile in un listbox visualizzare alcune righe in grassetto ed altre
con carattere normale?
Anticipatamente ringrazio

ciao a tutti,
il mio problema e' questo,in una listbox contenente di nomi ordinati
alfabeticamente,vorrei fare in modo che quando digito per esempio in un
controllo text una lettera qualsiasi (esempio Q) la lista mi scorra fino a
visualizzare il primo nome che comincia con Q, quale e' il codice per
ottenere questo tipo di resultato?
qualcuno puo' aiutarmi?.grazie in anticipo
saluti henry.



In un form aggiungi una textbox (Text1) ed una listbox (List1).
Nell'evento Text1_Change() scrivi:
For i = 0 To List1.ListCount - 1
    If Left(List1.List(i), Len(Text1.Text)) = Text1.Text Then
        List1.ListIndex = i
        Exit For
    End If
Next i
In questo modo viene selezionata la riga che cominciq con il testo digitato nella textbox (quindi
anche più di un carattere...)
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inviare i dati con la classe TcpClient ( Vb.Net )

Vorrei aiuto riguardo l'invio e la recezione di dati con la classe
TcpClient.... per dire la verità non ho la  + pallida idea di come si faccia
^__^ Si accettano ogni tipo di aiuto !! =PP


Scometto che ti trovi in difficoltà perchè eri abituato all'ocx winsock!
Oltre a dirti di controllare la guida dove l'uso del tcpClient è spiegato
dettagliatamente e con vari esempi ti posto questo codice di es.:
(Siccome sono prigo, non ti sto a commentare ogni riga,  ti rimando alla
guida per le proprietà, metodi ecc.ecc.)
Aggiungi una list box al form
Imports System.Net.Sockets
Imports System.Text
    Sub CheckNewMsg(ByVal Host As String, ByVal Porta As Integer, ByVal
UserName As String, ByVal Password As String)
        'Configurazione socket
        Dim Sock As New TcpClient()
        Sock.ReceiveTimeout = 15
        Sock.SendTimeout = 15
        Dim Linger As New LingerOption(True, 5)
        Sock.LingerState = Linger
        Dim BytesInv(Sock.SendBufferSize) As Byte
        Dim BytesRic(Sock.ReceiveBufferSize) As Byte
        Dim DatiRic As String
        'Connessione al server pop3 per controllare la presenza di nuovi
messaggi
        Try
            Sock.Connect(Host, Porta)
        Catch e As Exception
            MsgBox(e.Message.ToString)
            Sock.Close()
            Exit Sub
        End Try
        Dim Stream As NetworkStream = Sock.GetStream()
        Stream.Read(BytesRic, 0, CInt(BytesRic.Length)) ' Esempio di
ricezione dati
        DatiRic = Encoding.ASCII.GetString(BytesRic)
        BytesInv = Encoding.ASCII.GetBytes("user " & UserName &
ControlChars.CrLf)
        Stream.Write(BytesInv, 0, BytesInv.Length)     'Esempio di invio
dati
        ...
End Sub
--
Dark Hado
"Pensare non è essere d'accordo o in disaccordo: questo è votare."
                                                                    ---Rober
t Lee Frost ---

Grazie mille dell'aiuto ;P, infatti kome hai bene detto tu, pensavo ancora
di ritrovarmi qualkosa di simile all'ocx, ma a quanto vedo la nuova classe è
più effieciente !
Un altra cosina ( e poi prometto che sto zitto ;P ) ma gli eventi del
controllo come DataArrival o kose del genere non sono disponibili giusto ?
Kome posso creare qualkosa del genere ? Scusa dell'ignoranza ma kome avrai
capito sto ankora apprendendo. Grazie e Ciao

Aggiungi una list box al form
Trattasi ovviamente di un errore! :-)


Thx penso anke io ke una Subroutina faccia al caso nostro ^::^ ( oopure una
classe ! ) ;PP
"Dark Hado" <evi...@hado.ken> ha scritto nel messaggio
news:pI679.217132$Jj7.5...@news1.tin.it...


         Sock.SendTimeout = 15
Il timeout va espresso in millisecondi e non i secondi,come ho considerato
erroneamente nell'esempio (un timeout di 15 ms non ha molto senso)
--
Dark Hado
"Pensare non è essere d'accordo o in disaccordo: questo è votare."
Robert Lee Frost
Newsgroup: it.comp.lang.visual-basic
Titolo: Celle con sfondo nel MSHHierarchicalFlexGrid

Come faccio a mettere una immagine di sfondo?
Ho provato con "Set fgAttrezzature.CellPicture = ..." in vari modi ma 
niente...
al momento (alla disperazione....) sono arrivato a questo
[CODE]
     Do Until col = fgAttrezzature.Cols
         row = 0
         Do Until row = fgAttrezzature.Rows
             fgAttrezzature.row = row
             fgAttrezzature.col = col
             Set fgAttrezzature.CellPicture = imgGancio.Picture
             row = row + 1
         Loop
         col = col + 1
     Loop
[/CODE]
dove fgAttrezzature è un MSHHierarchicalFlexGrid
il fatto è che per un attimo sembra apparire una immagine, ma poi subito 
scompare...
Ciao e grazie
-- 
edoloz@work

 al momento (alla disperazione....) sono arrivato a questo
Il problema era l'immagine troppo grande e si vedeva solo l'angolino 
bianco in alto a sx......
-- 
edoloz@work

 bianco in alto a sx......
Complimentoni !

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] problemi con il server

Come da oggetto.
Succede anche a voi che il server si "mangia" alcuni vecchi post?
Ad esempio non riesco più a vedere il post di Lupo "[ot] sta per cambiare la
mia vita" ma solo un Reply di SpecialKeta...
Sarà un problema mio?
Uso fastweb e Outlook Express
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

 Sarà un problema mio?
No. E' che OE spinge in giù (e taglia) i vecchi post. Probabilmente ne hai
troppi in evidenza.

Il problema è che mi visualizza correttamente post risalenti a settembre
2003 ma si è mangiato alcuni post di dicembre (certi erano importanti e li
avevo pure evidenziati).
La cosa mi sembra strana (visto che ieri erano ben visibili...). Io nel
frattempo non ho acceso il pc.
Sono tornato oggi pomeriggio dall'università. mah...


 Sono tornato oggi pomeriggio dall'università. mah...
In OE configuri quanto tempo tenere i post in locale.
Il server non tiene uno storico perituro dei post :) in genere vengono 
cancellati dopo un mesetto o due.
Può succedere che cancelli prima alcuni più recenti lasciando quelli più 
vecchi (è quando tu clicchi sul messaggio e questo appare con una riga 
in mezzo e un messaggio che avverte che il messaggio non è più presente 
sul server).
Come funziona di preciso questa cosa non so.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: MSHFLEXGRID E DATE

In una mshflexgrid alimentata da un recordset gerarchico (mediante 
msdatashape) non riesco a far apparire i campi data nel formato 
italiano (dd/mm/yy).
Ho notato che questo comportamento si manifesta solo con recordset 
gerarchici, mentre con recordset "normali" la Mshflexgrid visualizza 
correttamente le date.
Qualcuno mi da una mano ?
-- 
Posted from 62.98.13.114 by way of 
smtp1.libero.it
 [193.70.192.51] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:GD1A0G$IDlK_37WAC_4zlimNNgQ612Y...@libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Come estrepolare il numero + grandedi una tabella

Ciao a tutti e anticipati ringraziamenti per chi mi darà 1 mano,
vi spiego il problema cercando di essere quanto + chiaro possibile...
Ho 1 tabella con un certo numero di record ed i record vengono numerati in
maniera sequanziale 1-2-3- ecc. dove il campo sequenziale è un campo
numerico e non un contatore...
ho la necessita di visualizzare il numero + grande per poi sommarci 1 e per
qualche motivo non riesco ad ottenere un numero + grande di 9...
il codice che utilizzo è qualcosa del genere... diseguito:
Private Sub ActiveButton5_MouseDown(Button As Integer, Shift As Integer, X
As Single, Y As Single)
  database.rsNumeri.Open
  txtFields(2).Text = database.rsNumeri.Fields(0).Value + 1
ecc...
--------------------------------
Non capisco che errore commetto...
ho letto che visogna usare un certo campo MAX ma dove? E qual'è la
stringa... da digitare o cosa devo fare..
insomma sono realmente bloccato...
Un grazie anticipato a chiunque voglia darmi  1 mano...
VBmatrix

SELECT MAX(campo_di_cui_vuoi_il_max) FROM tua_tabella;
Esegui questa query e ti ritorna il valore maggiore,
gli sommi uno e sei a posto!!

 ha scritto nel messaggio
news:b8t5bt$d8fm8$1...@ID-165476.news.dfncis.de...


 valore massimo = a 9 mentre il campo + grande che ho è 24.
In che senso il CAMPO + grande che hai è 24?
Il valore volevi dire giusto?
Che db usi?

 ha scritto nel messaggio
news:L3hsa.33954$DN.8...@tornado.fastwebnet.it...


Dov'è l'errore?
Non ha senso fare il MAX di un campo di tipo testo ;-)
-- 
ciao, hal
ma qui mancano proprio i "fondamentali"....

 Non ha senso fare il MAX di un campo di tipo testo ;-)
Cazzo... Che occhio.
Mi sa che hai ragione.
Salutoni
Sergio

 ha scritto nel messaggio
news:b8ti8u$dg4rv$1...@ID-191593.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 Run     NomeExe.exe  par1 par2

Non mi ricordo più come poter leggere
da VB6 i parametri successivi al lancio
dell'exe.
 
Ricordatemelo per favore.
 
Grazie e saluti.
Sauro 
 
 

 Sauro
 
cerca command e/o command$ nella guida
 
if command = "pippo" then
 
-- 
-> G.Chiappori
www.chiappori.it
 
www.chiappori.com
 
 
 

 -> G.Chiappori
 
Ecco!
Command
 
Grazie, Sauro
Newsgroup: it.comp.lang.visual-basic
Titolo: centrare un form e creare una label link....

Salve
Avrei 2 problemi:
- Dovrei mettere un form al centro dello schermo ma non so come posso
fare...
Il form si dovrebbe caricare e apparire sempre centrato.....
- Vorrei creare una label che riporti un sito internet e un indirizzo di
posta elettronica. Come posso apprire rispettivamente il programma di
navigazione e di posta predefinito quando l'utente clicca la label......
(spero di essermi spiegato..)
Grazie
Ciao
Federico

...


 wrote in message
86vhdl$alg$1...@nslave1.tin.it...


 wrote in message
10lhtg9$k0d$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB2005 - spegnimento pc

Diciamo che su Google c'è tanta roba, ma è tutto vb6 o soprattutto
sono cose come Shell("shutdown ecc...").
Io invece volevo un metodo "pulito" per spegnere il pc dalla mia
applicazione, senza troppi riferimenti esterni.
Possibile che il framework non abbia una cosa del genere?
Ciao,
Daniele


Mi sembra che si possa chiamare un API... qualcosa come user32.dll alla
voce ExitWindows... prova a usare questi come criteri di ricerca su
google.
Enrico


trovato, grazie mille!

 google.
In XP (non so in Vista, ma immagino anche) esiste il comando shutdown. 
Quindi basta semplicemente fare una cosa del genere:
System.Diagnostics.Process.Start("shutdown", "-s -t 00")
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 
Nel post aveva scritto proprio che non voleva usare le chiamate a
programmi esterni ;-)
Enrico

 programmi esterni ;-)
Vabbè, è un comando di Windows, mica un programma del primo tizio che 
passa per strada ;-)
Poi, a rigore, anche una chiamata API non fa parte del Framework, quindi 
non so se cambia qualcosa.


 
Già. Però la voleva "senza programmi esterni"... non senza chiamate ad
API :-P
Comunque non ho mai trovato nel framework un comando per spegnere il
pc...
Tra l'altro, mi ricordo che quella chiamata la davo da un file batch con
rundll, per spegnere il PC da un collegamento nell'avvio veloce (poi
rimosso per i tanti click per sbaglio....) :-D
Enrico

 ha scritto nel messaggio 
news:1189712760.1...@server.casa...



Appunto, esiste in XP. In alcuni sistemi precedenti non penso.
Ciao

 End If
Lo dico sempre anche io. Meglio un End If in più che uno in meno :P

Newsgroup: it.comp.lang.visual-basic
Titolo: API File Viewer

C'č qualcuno che possiede file diversi da Win32api.txt e Wininet.txt ??
Se sě mi farebbe piacere che mi venissero spediti a
alpha....@tiscalinet.it
Grazie per l'attenzione.

 Se sì mi farebbe piacere che mi venissero spediti a

Newsgroup: it.comp.lang.visual-basic
Titolo: INVIARE IN POST: help me!

Il newsreader si e' mangiato il testo appena ho decodificato
l'attachment, quindi ti rispondo a memoria:
Devi mettere nel pulsante di invio il seguente codice:
-------------------------------------------------------------
Caption = "Contacting server"
Master.RemotePort = 80
Master.RemoteHost = "
www.iltuoserver.com
"
Master.Connect
ip$ = "i_dati_che_devi_mandare"
'costruisce la Query
qry$ = "POST /tuoprogramma.cgi HTTP/1.0" '/tuoprogramma.cgi=nome dello
script di processo, puo' essere anche ASP o DLL o altro.....
qry$ = qry$ & vbCrLf & "Connection: Close" '***
qry$ = qry$ & vbCrLf & "Host: 
www.iltuoserver.com
" 'host
qry$ = qry$ & vbCrLf & "Content-length: " & Format$(Len(ip$))
'lunghezza dell'entità
qry$ = qry$ & vbCrLf 'linea bianca
qry$ = qry$ & vbCrLf & ip$ 'dati da POSTare
t# = Timer
'Attende 7 secondi
While Master.State <> sckConnected And Timer < t# + 7
DoEvents
Wend
If Master.State <> sckConnected Then
MsgBox "Error connecting to server"
End
End If
Caption = "Server contacted... sending DATA"
Master.SendData qry$
'Attende che l'altro lato chiuda la connessione (vedi sopra:***)
While Master.State <> sckClosing
DoEvents
Wend
Caption = "Server closed"
-------------------------------------------------------------
Ciao
Roberto

Mi fa errore con le linee MASTER.
COME FACCIO?
Ho inserito il componente winsock 5.0 , ma non so come farlo funzionare
Grazie

l'attachment, quindi ti rispondo a memoria:
Ti ricordo che it.binari.visual-basic e' stato creato apposta per inviare i
binari
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb


Hai sbagliato mira, prova un po' piu' in alto... :-))
Ciao

...

Opss...   :-b
Ciao
Maronese Ettore

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Access

Ho fatto un'applicazione in Access2000, la voglio distribuire a 10 utenti,
deve sempre esserci access 2000 sui PC degli utenti destinatari? oppure
esistono dei run time acquistabili?
grazie, Marco

 ha scritto nel messaggio
news:90ijdh$19b$1...@fe1.cs.interbusiness.it...


 Ho fatto un'applicazione in Access2000, la voglio distribuire a 10 utenti,
deve sempre esserci access 2000 sui PC degli utenti destinatari? oppure
esistono dei run time acquistabili?
Esiste l'ODE (Office Developer Edition) che ti fornisce gli strumenti per
far girare la tua applicazione Access anche su una macchina in cui Access
non sia installato.
Consulta il sito Microsoft per saperne di piu`.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: macro e codice fiscale

Un grazie anticipato a tutti.
Ho havuto tramite le news un programma in Vba per l'ottenimento del codice
fiscale, ma non essendo un programmatore esperto di Vba e volendo ottenere
il codice fiscale dai campi prelevati da un DataBase di Access non so come
fare, se qualcuno puņ aiutarmi ne sarņ grato nel caso posso mandare sia il
programma che il DataBase zippati.
Grazie Giuseppe

...

Sul sito comune 
http://www.murialdo.it/it_lang_vb
 trovi un esempio gią
pronto su come ricavare il codice fiscale
Ciao MArco

Newsgroup: it.comp.lang.visual-basic
Titolo: passare dati tra diverse form

1.come si fa a passare dati tra varie form?
2.esiste un programma free per fare dei report?
colgo l'occasione per rigraziare tutti quelli che mi aiutano, sono un
autoapprendista alle prime armi....Grazie.

 ha scritto nel messaggio
news:8d9q3o$m95$1...@lacerta.tiscalinet.it...

1    Una soluzione è quella di utilizzare variabili pubbliche (dichiarate
PUBLIC in un modulo esterno, uno di quelli con desinenza .BAS). In questo
modo le variabili sono visibili in tutte le Form del programma.
2    Esiste Crystal Reports, che viene fornito con VB.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!


2. In vb6 c'è già. In Vb5 c'era Crystal Report.
1.Un modo semplice è dichiarare una variabile pubblica nel secondo form
frmPrimo as form
frmSecondo as form
nel form che contiene il riferimento
public Variabile as ..
nel form "chiamante"
dim ofrmChiamato as form
....
set ofrmChiamato=new frmSecondo
ofrmChiamato.show
ofrmChiamato.variabile=...
Ci sono milioni di modi, questo è uno...
Altro modo sepmlice è dichiarare una variabile pubblica in um modulo, ma non
è molto
elegante, nè ottimizzato.
Luca

Newsgroup: it.comp.lang.visual-basic
Titolo: acquisizione dati da seriale su excel o database

Premetto che sono un assoluto principiante, quindi il mio linguaggio è
deprecabile.
Avrei bisogno di un supporto per la risoluzione del problema che vi
espongo.
Per motivi di studio mi sarebbe molto utile poter acquisire
direttamente da un fotometro i dati in un foglio di excel o database.
La connessione è di tipo seriale rs 232
Il fotometro invia i dati in formato testo o xml con i tag
Vorrei che i dati si sistemassero da soli nei campi della tabella
(grazie ai tag)es. data, id campione, concentrazione, delta di od e
altro.
Esiste uno script o altro che possa essere una base di partenza per
realizzare questo modo di acquisizione dati ?
saluti
Leonardo


Prova ad utilizzare il controllo MsComm di cui puoi avere maggiori
informazioni leggendo l'MSDN, la guida in dotazione con il VB