mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto mouseup

Ho la necessita' di creare un piccolo programma con il quale
attivare/disattivare un motore collegato con la porta parallela.
Voglio fare in modo che il motore giri fin quando rimane premuto il
mouse sul COMMAND1, e che si fermi nel momento del rilascio del pulsante
del MOUSE.
A tale scopo, ho creato il seguente programma che pero'non mi rileva il
MOUSEUP ed il motore continua a girare nonostante io abbia rilasciato il
pulsante del mouse, per interrompere l'esecuzione sono costretto ad
utilizzare CTRL/ALT/CANC.
Siete in grado di dirmi dove ho sbagliato o magari propormi una
soluzione diversa ?
Grazie in anticipo a chiunque possa aiutarmi.
********************************************************************
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Text1.Text = "avanti"
End Sub
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Text1.Text = "stop"
End Sub
Private Sub Text1_Change()
ciclo:
giramotore
If Text1.Text <> "avanti" Then GoTo esci Else GoTo ciclo
esci:
End Sub
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 End Sub
Ho modificato così (nota il DoEvents in Text1_Change, chiaramente ho
commentato la chiamata a giramotore che si presume che non scateni alcun
evento a Command1 e non cambi Text1):
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Text1.Text = "avanti"
End Sub
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Text1.Text = "stop"
End Sub
Private Sub Text1_Change()
ciclo:
'giramotore
Beep
DoEvents
If Text1.Text <> "avanti" Then GoTo esci Else GoTo ciclo
esci:
End Sub
Il DoEvents risolve l'acquisizione del MouseUp.
In ogni caso, per pura disquisizione (non perchè quanto sopra non funzioni),
io farei due bottoni distinti, uno per avviare (che non fa nulla se il
motore è già avviato) e uno per fermarlo. Certamente l'opratività diventa
più lenta, rispetto al più immediato MouseUp.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?][CRYSTAL REPORT]Errore can not initilize OLE

Ho fatto un programma che è stato installato su una rete di computer.
Su alcuni di essi mi da il seguente errore: can not initialize OLE
Il messaggio in testata dice SEAGATE CRYSTAL...
--
Gabriele F.
gfio...@NOSPAMbresciaonline.it.it
Eliminare NOSPAM per scrivermi


Newsgroup: it.comp.lang.visual-basic
Titolo: Elimina stringhe

Salve, ho bisogno di un piccolo aiuto.
Supponiamo che un file di testo contenga il seguente elenco:
456545     685 rossi mario  90,87
456545     685 rossi mario  89,56
456545     685 rossi mario  45,56
456545     702 neri giorgio  90,87
456545     702 neri giorgio  89,56
456545     702 neri giorgio  45,56
456545     475 bianchi ivo  90,87
456545     475 bianchi ivo  89,56
456545     475 bianchi ivo  45,56
aprendo questo file da codice come posso fare in modo che ad esempio vengano
cancellate tutte le stringhe
che presentano il n. 702 ?
grazie
Roberto.

apri il file di testo, leggi una riga alla volta (istruzioni Open, Input,
Close)
per ogni riga che leggi, sostituisci 702 con "" (stringa nulla),
scrivi ogni riga su un nuovo file e il gioco č fatto!!!
Oppure, carichi tutto il file dentro una RichTextBox, fai la sostituzione e
poi salvi il tutto....
good coding!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

 456545     704 neri giorgio  702,56....no?!)
4) La confronti col valore non valido
5) Se non č valido non la ricopi nel file temporaneo altrimenti si!
6) alla fine cancelli il file originario e rinomini il file temporaneo col
nome del vecchio
Alternative?...molte
a) Sostituire la mid con Instr
b) Se hai il tracciato record č ancora piů facile... aprilo random
Sempre sull'help trovi spiegazione per i randome e Instr
Ciauz!
Newsgroup: it.comp.lang.visual-basic
Titolo: Criptare una stringa con password.

Qualcuno di voi sa suggerirmi un metodo (o eventualmente un sito con
sorgenti) su come creare un funzione che data una stringa di testo e una
password mi restituisca la stringa di testo criptata?
Ho già provato con il metodo che è descritto anche da M$, utilizzando una
XOR... ma questo non funziona molto bene... infatti se la stringa da
criptare contiene molti spazi tra una parola e l'altra (esempio: "Questa è
una                            prova!"), nella stringa criptata al posto
degli spazi è possibile leggere la password usata per criptare !!!!
Ciao e grazie.
Mario


Io ho usato questa qui :
Function EncDecPw(Pw As String, Mode As Boolean) As String
Dim S As String
Dim f As Integer
Dim A1 As Integer
Dim A2 As Integer
Dim KeyPos As Byte
K = Chr$(82) & Chr$(69) & Chr$(76) & Chr$(65) & Chr$(88)
KeyPos = 1
For f = 1 To Len(Pw)
    A1 = Asc(Mid$(Pw, f, 1))
    A2 = Asc(Mid$(K, KeyPos, 1))
    If Mode Then
        S = S & Chr$(A2 + A1)
    Else
        S = S & Chr$(A1 - A2)
    End If
    KeyPos = KeyPos + 1
    If KeyPos > Len(K) Then KeyPos = 1
Next
EncDecPw = S
End Function
La variabile K é una chiave di criptazione, che nel caso é RELAX, ma può
essere qualsiasi stringa. Nota che viene definta tramite chr$, in modo tale
da non permettere di leggere la chiave, compilando in P-Code. Mode vale True
per criptare e false per decriptare.
Rozzo ma efficace.. un po' come HAL 2001 di 2001 Odissea nello spazio, che
era la codifica in chiave Z di IBM  ( I-1=H, B-1 = A, M-1 = L).
Ciao
Genesio

buono il suggerimento di Genesio. Ho "decriptato" diversi archivi, ma non so
se il metodo per nascondere il testo era quello che ha postato Genesio
Ad ogni qualche anno fa studiai un codice personale in Dos per criptare
qualcosa e renderne assai dura la decodifica. Immagina una stringa di 100
caratteri. La password può essere 10 caratteri, 15 caratteri ecc...
In questa stringa (dove si utilizzano rigorosamente i caratteri Ascii da 127
in su - con il VB sono un pò meno-) due caratteri identificano la lunghezza
della Pass, un carattere identifica la posizione di partenza della Pass
(cioè ad esempio con ASC (carattere) ricavi il numero a 2 cifre per
conoscere la partenza della pass). La pass viene scritta al contrario.
Il punto più difficile è assegnare dei caratteri Ascii a ciascun carattere
della Pass. Se consideri che ciascun carattere ha un suo valore numerico
allora devi ragionare in termini numerici e considerare l'ipotesi che una
sequenza è facilmente riconoscibile. Per cui lo schema che avevo impostato
era il seguente.. si converte il primo carattere e si aumenta di x unità
Chr$(Asc(A)+x). Se il risultato è un numero pari si scrive il secondo
carattere nella casella successiva (a ritroso) se invece è dispari si salta
una casella e così fino all'ultimo carattere. Inoltre a ciascun carattere
viene tolto un fisso progressivo -1, -2, -3, ecc .
ciao
Davide



Newsgroup: it.comp.lang.visual-basic
Titolo: [?REQ?] Metodo SEEK, questo sconosciuto....

sono un po' in difficoltà con il metodo "SEEK"
...quand'anche io provo l'esempio fornito nella guida in linea, mi viene
restituito il messaggio:
Errore di run-time 3015 'ChiavePrimaria' non è un indice di questa
tabella........
Aiutooooo   :-((
------------ ANTI SPAM ---------------
Nelle risposte sostituire xxx.xx
con 
tin.it
                      Grazie
----------------------------------------------









Newsgroup: it.comp.lang.visual-basic
Titolo: CC245IT.DLL

Dopo aver compilato il mio primo programma mi trovo a realizzare i
dischetti di installazione del programma stesso.
La compilazione e la creazione dei dischetti vanno a buon fine senza
problemi.
Quando però devo eseguire il setup per installare il programma su un
altro computer (ed anche sul mio!) si apre la finestra di dialogo degli
errori con questo messaggio:
"Errore durante la registrazione del file C:\WINDOWS\SYSTEM\CC245IT.DLL"
La mia versione di Cristal Report è la 4.6 abbinato al VisualBasic5
Enterprise.
Se può essere utile a qualcosa dico anche che questo file non è nei
componenti del progetto.
Come posso risolvere questo problema ?
Grazie.


Non lo hai aggiunto esplicitamente, ma questa DLL e' parte di Crystal
Report, quindi necessaria al suo coretto funzionamento.
--
Roal Zanazzi
z...@iol.it

 
z...@iol.it
Ti ringrazio per l'aiuto che mi hai dato in effetti sono riuscita a
modificare il setup.lst come mi hai detto e l'errore non mi si verifica
piů. Ma che cosa intendi quando dici che questa DLL non č stata aggiunta
esplicitamente? come devo fare per aggiungerla?
Grazie ancora.
Elisa.


Per "aggiunta esplicitamente" intendo aggiunta da te al momento della
creazione del setup kit, tramite l'apposito wizard.
Non devi aggiungerla, dato che il wizard del setup kit riesce a capire
automaticamente (anche se non sempre) di quali files aggiuntivi ha bisogno
il tuo progetto.
P.S. perche' continui a mandare in forward una copia del messaggio, allegata
ad un messaggio vuoto?
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Andare all'inizio di un file

Come faccio a riposizionarmi all'inizio di un file dopo essere arrivato in
fondo ?
--
Guercio che il 23 parte per naja :((((
--= Beati monoculi in terra cæcorum =--
--= Dubium sapientiae initium =--


istruzione Seek (consulta la guida)
Seek #2,1 -> riporta il puntatore all'inizio del file aperto sul canale 2
Ciao,
Enrico

 ha scritto nel messaggio
news:9d6f03$u0ed$1...@news01.it.net...

ehm........scusa in effetti sono stato stupido.......nn ho specificato che
era per vbscript :))))
chiedo scusa :))))
--
Guercio
--= Beati monoculi in terra cćcorum =--


 fondo ?
Manca una barca di informazioni:
Come apri il file (binary, random, input, etc) usi l'API il comando Open o
la filesystemoperation
Cmq. dai un'occhiata alla funzione seek
Ciao
--
Timothy Redaelli
timothy....@email.it


ops....riscusate :)))
dunque io uso vbscript (in una pagina ASP, ma poi dovro' esportare lo script
in locale......) cosi':
Set fso = createobject ("Scripting.FileSystemObject")
Set fsofile = fso.opentextfile("file.txt"))
<ciclo all'interno del quale devo aprire e chiudere il file>
fsofile.close
--
Guercio
--= Beati monoculi in terra cćcorum =--



no way, l'oggetto TextStream (quello ritornato da fso.OpenTextFile) non
consente alcuna operazione di seek; devi purtroppo chiudere e riaprire il
file;
se il file da elaborare č noriamente "piccolo" puoi leggerlo tutto in una
volta con il metodo ReadAll e fare le operazioni del caso; fai attenzione
che il file sia realmente "piccolo" come dimensione, o rischi di sprecare un
bel po di memoria;
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con rimozione directory

Sono due giorni che sto sbattendo la testa su un problema: ho fatto una
routine che dovrebbe cancellarmi una directory, (se non e' vuota
dovrebbe svuotarla).
Purtroppo il tutto si blocca (sulla prima chiamata di safeDeleteDir2)
con un errore di runtime 75 sulla RmDir.
Premetto che la directory esiste e che, nella prova che ho effettuato
contiene due immagini jpg.
Quindi la directory Operazioni contiene solo due immagini jpg
La directory pippo invece contiene solo la sottodirectory Operazioni.
Premetto che non ho usato il metodo DeleteFolder perche' anch'esso mi
dava problemi.
Chi mi sa aiutare?
Il codice e' il seguente:
---- INIZIO CODICE ----
Private Sub Command1_Click()
    safeDeleteDir2
"F:\mgtode\ProgettoScarpe\BackUp\AKU\pippo\Operazioni\"
    safeDeleteDir2 "F:\mgtode\ProgettoScarpe\BackUp\AKU\pippo\"
End Sub
' Cancella una directory se esiste
' Se non e' vuota rimuove i file in essa contenuti (non le
sottodirectory)
' nome deve terminare con "\"
Public Sub safeDeleteDir2(ByVal nome As String)
    Dim defaultFileFso As New FileSystemObject
    If defaultFileFso.FolderExists(nome) = True Then
        ' Se non e' vuota...
        If Dir(nome & "*.*") <> "" Then
            ' defaultFileFso.DeleteFile nome & "*.*", True
            Kill (nome & "*.*")
        End If
        RmDir nome
    End If
End Sub
---- FINE CODICE ----
Ciao
--
Mauro G. Todeschini
mgt...@lycosmail.com

 ha scritto nel messaggio
news:391BF829...@lycosmail.com...

mai usato il fso, pero'
dal codice sembra che se c'e' un file lo elimina
ma se ce ne' piu' d'uno forse dentro all'if dir ti servirebbe
while dir <>"" ... kill ... wend
o qc del genere.
(inoltre: ovviamente "nome" della dir termina con un backslash, vero?)

pal wrote:

Si "nome" finisce con backslash. Inoltre i file all'interno dell directory
vengno tutti eliminati dalla kill
Il problema salta fuori dopo (sulla RmDir nonostante la directory sia
vuota).
Visato che mi dici che non hai mai usato fso, mi sapresti dare indicazioni
su come fare una routine simile a questa senza utlizzarlo? Magari il
problema viene da li!
Ciao

 problema viene da li!
premetto che non mi e' mai capitato di sentirne l'esigenza (uso gestione
risorse e salamander apposta).
comunque, al momento (non sapendo se ci sono funzioni piu' evolute) farei
come si faceva in dos prima di deltree (malissimo che vada non puoi usare
uno "shell deltree tuadir" ?):
* puntare la dir
* se e finche' ci sono subdir:
* con una ricorsione, andarci dentro e, a partire dalla piu' annidata,
svuotarle, salire di un livello e rimuovere quella appena svuotata
* tornare a quella di primo livello, svuotarla e salire di un livello
* rimuoverla
una palla, me ne rendo conto. ma cosi' su due piedi non mi viene in mente
granche' d'altro.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: linguetta del foglio

Vorrei collegare la "linguetta" che riporta il nome del foglio attivo
 foglio1;foglio2; ...) ad una cella di un foglio...
tipo:
nel foglio RIASSUNTO metto il codice macchina e la lunghezza
[A1] M50     3mt
[A2] P85      5mt
[A3] C23     4mt
mi serve creare 3 fogli (M50 ; P85 ; C23)
al cambiare delle celle [A1;A2;A3;...] si debbono modificare anche le
"linguette"....   come?
...poi in ogni foglio metto il collegamento alle lunghezze e calcolo varie
cose....ecc.  ecc....

  foglio1;foglio2; ...) ad una cella di un foglio...
Il collegamento in "lettura" è facile, basta inserire in un modulo una
funzione del tipo
Public Function NomeFoglio(i As Integer) As String
  NomeFoglio = Sheets(i).Name
End Function
e poi usare la funzione "=Nomefoglio(1)" nella cella.
Una funzione che invece "scriva" il nome del foglio impostato nella
cella è per esempio questa, da inserire nell'evento Change
dell'oogetto Worksheet nel modulo del foglio principale:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
  If Target.Column = 1 And Target.Row < 10 Then
      Sheets(Target.Row + 1).Name = Target.Value
  End If
End Sub
ma devi gestire i nomi illegali (vuoti, o duplicati ad esempio).
Come al solito, sono solo spunti ;)
Ciao, Silv:o)
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo Codice a Barre

Ciao, mi servirebbe un controllo free per la stampa dei codici a barre.
Sapete dove posso trovarlo ?
ciao 


Perchč anzichč perdere tempo a postare su tutti i NG attinenti il VB non hai
fatto prima una ricerca su Google?
Perchč non hai specificato che tipo di codice a barre devi stampare?
Ciao, Vincenzo

Sapete dove posso trovarlo ?
Guarda tra questi prog.
http://www.it-lang-vb.net/archivio.asp?subMenu=Tutte&FullText=on&TypeRic=AND&keyword=barre
ciao
  Stefano


Non si tratta di un controllo ma di un font, che dovrai utilizzare per 
stampare una stringa particolare.
Per esempio: se devi generare un codebar per la stringa "PIPPO" fai cosě:
strDaStampare =  code128$("PIPPO")
e poi stampi strDaStampare con il font "code 128.ttf", che ovviamente va 
installato sul pc.
Qui trovi i font per i piů diffusi tipi di codebar e le relative procedure 
in un arcaico ma funzionante VB. Inoltre trovi tutte le spiegazioni (il sito 
č anche in inglese ma mi pare che alcune pagine ci siano solo in francese... 
se hai pb... io sono bilingue ita-fra ;-)  )
http://grandzebu.net/
Inoltre ho realizzato una procedura che permette di creare i codici a barre 
su pagine web senza usare né font particolari né componenti da scaricare nel 
browser, né immagini lato server. Insomma solo html, sfruttando la larghezza 
dei bordi dei <DIV>....Ma non mi pare che sia quello che chiedi.
Ciao
Elef.


Dove e' visibile un codice di questo tipo ?
Grazie e  ciao
RobertoA

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema esecuzione applicazioni

AIUTO!!!
Uso Visual Basic per fare piccole applicazioni personali e esiste un
problema che mi sta facendo impazzire!!.
Ogni tanto installo e rimuovo nuovi programmi (cad,grafica...) dopo
l'installazione di taluni di essi le mie applicazioni scritte con VB non
girano più.( se pero la eseguo dall'interno di VB con "run" funziona!! )
Suppongo sia per causa di una sovrascittura di qualche libreria da parte del
setup del nuovo programma ma nonostante la disinstallazione  del medesimo e
la successiva reinstallazione  di VB le mie applicazioni non girano lo
stesso!!.
Uso W95 + VB versione 4.0 .
Esiste qualche anima pia che sa dirmi cosa posso fare senza formattare l'HD
e reinstallare tutto da capo ogni volta che 'provo' un nuovo programma!.
Grazie.











girano piů.( se pero la eseguo dall'interno di VB con "run" funziona!! )

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi col Ping

Salve a tutti.
Ho scaricato, per imparare a fare un ping,
l'esempio che c'č sul SC a pagina 6 del
download sorgenti e che si intitola
"Eseguire un Ping sulla rete TCP/IP",
ora, visto che ci ho capito ben poco
ho deciso di utilizzare direttamente quel
programma, senza apportargli modifiche,
per i miei scopi. Compilandolo, perň,
il programma non funziona piů, in quanto,
dandogli il comando ping genera un errore:
"Run-time error 11, division by zero",
che non si verifica a design time e che
quindi non so come correggere, qualcuno
che ha usato questo stesso esempio č
arrivato ad una soluzione?
Grazie in anticipo.
--------------------------------------------
             ASSA
http://web.tiscalinet.it/Assatarram
Napster: Assatarram3
it.comp.lang.visual-basic: Assatarram
--------------------------------------------

 che ha usato questo stesso esempio è


 solo se č un exe?
Hai capito bene, era proprio questo il mio problema, fortunatamente
nel sito di origine di quell'esempio ce n'era uno corretto, cosě non
ho dovuto complicarmi troppo la vita!


Newsgroup: it.comp.lang.visual-basic
Titolo: problema con l'installazione

Ho creato due applicazioni (database con DAO 3.5) con VB 6 Professional.
Per entrambe o creato il pacchetto di installazione e:
mi dice che per alcuni controlli (tipo microsoft common control 6) non trova
le dipendenze aggiornate (do OK e tutto funziona ugualmente).
Le installo su due macchine diverse (con win95, io ho win98):
al termine della procedura dice: "Errore durante la registrazione di
EXPSRV.DLL"
clicco ignora e tutto funziona (applicazioni comprese).
Capita anche ad altri? Qualcuno sa come risolvere qs. problemi?
Grazie, Ciao a tutti.
-----------------------------------------------------------
Stefano Sala
stefan...@stcorp.cjb.net
http://stcorp.
.cjb.net/
http://clik.to/stefano/

 clicco ignora e tutto funziona (applicazioni comprese).
a quanto ne so il problema viene risolto se viene installato il SP3; se non
lo vuoi installare, apri con Notepad il file Setup.lst e cancella
$(DLLSelfRegister) dalla riga dove c'è EXPSRV.DLL (lo devi fare ogni volta
che ricrei l'installazione)
Cia'
Faber

 wrote in message 8ogafj$agq$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Shape

Con il control Shape ho la possibilità di costruire dei rettangoli (in
questo caso per me) o verticali o orizzontali.
C'è nessuno che sappia come poterli disegnare anche in diagonale ?????
Sviluppo in Visual Basic 6
Grazie 1000 in aticipo a tutti
fzan...@virgilio.it

Puoi usare il metodo Line del Form... Disegni le 4 linee... cosě gli angoli
li scegli tu... :-))
        Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa modo testo

Salve a tutti,
avrei un quesito da porvi.
Sto sviluppando un software di gestione magazzino e contabilita', che ho
ormai ultimato a meno delle stampe.
Il cliente vorrebbe utilizzare per la stampa di bolle e fatture dei moduli
continui su stampanti ad aghi.
Per motivi di velocita' di stampa sarebbe conveniente stampare in modalita'
testo, pero' ovviamente questo preclude l'utilizzo di generatori di report
quali Crystal Report e simili.
L'unica soluzione che vedo possibile al momento e' quella di stampare
direttamente da codice, utilizzando la porta LPT come se fosse un file e
"sparando" stringhe con la PRINT.
Non mi sembra pero' la soluzione + ottimale, considerando che ci sarebbero
da gestire a quel punto i margini di stampa, i salti pagina, ecc.
Avete un'idea migliore a parte quella di consigliare al cliente di cambiare
le stampanti? ;-)
--
Starman

 Salve a tutti,
Mi rispondo da solo ;)
Ho appena verificato che se con Crystal Report si usa uno dei font della
stampante, la stampa viene effettuata in modo testo.
Il problema che si pone adesso e' quello di creare un report che vada bene
su tutte le stampanti. L'unica soluzione possibile e' quella di cambiare il
font utilizzato dal report a seconda di quelli disponibili.
Sapete se e' una cosa fattibile con Crystal Report?
--
Starman
YZF 600 R Thundercat "Sly"
Coach 2000 16v "StarMobile"
(in giro per la città dei Sassi)
328/9184537
ICQ 56639503

Newsgroup: it.comp.lang.visual-basic
Titolo: Blocco Record ADO

Ciao,
Da Visual basic, dovrei interrogare un record sul db access posizionato sul
server in rete per verificare se è già in stato di modifica da un altro
utente.
Qualcuno mi sa dare qualche indicazione?
Grazie

 Qualcuno mi sa dare qualche indicazione?
che io sappia non puoi usare nessuna funzionalità di access, devi farti una
tabella "semaforo", prova a legere qui:
http://makeashorterlink.com/?N1BE25368
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare tasti a un programma non attivo

Salve a tutti, sono nuovo del newsgroup, vi chiedo umilmente aiuto,
sono disperato. Devo simulare in un programma in stato non attivo la
pressione di un tasto direzionale. Ho letto sui vecchi msg, mi sono
informato, ma niente...
Tutti gli esempi che ho trovato usano la funzione api SendMessage, ma
nn esiste un carattere ascii che rappresenti il tasto direzionale, e
inviando vbKeyUp la API invia il tasto "&". Ora mi affido alla vostra
benevolenza, vi prego se potete aiutarmi o se avete idee...
Ciao, Marco

[*M@rk Nitro* = 
mark...@tiscali.it
 in
news:ff56ac77.03110...@posting.google.com
] ha scritto:

Ho sempre più dubbi su questo tipo di richieste, ma una SendKeys non si nega
a nessuno.
Sulla guida c'è scritto tutto. Se non c'è la guida, allora proporrei il
doppio ergastolo.
Non esiste? Beh, ora lo registro e ne vanterò i diritti.

Newsgroup: it.comp.lang.visual-basic
Titolo: Saving web pages to file using webBrowser or inet control

   I am using visual basic 5.0(sp3) under win95 and want to navigate to
a web page and download it to a text file.  (The resulting web page is a
plain text file).
   I use "webBrowser1.navigate sUrl" to go to the page and the page appears
ok, but how do I save this result to file.  I do not see an available
property or method for this.
   If I try to use the inet control using the command "inet1.openurl sUrl" I
get an http 404 error, file not found but I know the sUrl address is correct
because the webBrowser or netscape or IE display it correctly.
   The sUrl is
"
http://204.71.198.40:443/930954003850?User=demo&Pswd=demo&DataType=DATA&Sym
bol=aol&Interval=60"
   I have also set the inet1.remotePort property to 443 but this still
results in a 404 error.
   Any suggestions on how to save this web page or similar pages to a file?

 wrote in message
news:7lr8k2$dhk$1...@bgtnsc02.worldnet.att.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco corso VB e ACCESS zona PD-VI

come da oggetto sapete indicarmi un posto SERIO dove fanno sto genere di
corsi ?
zona padova/vicenza
anche se sono programmatori che si prestano per un tot all'ora va bene lo
stesso !
grazie
max'72
risposta in e-mail + gradita
mailto:
pac...@netics.net

corsi ?
Prova a cercare sul sito della Mondadori.
http://www.mondadori.com/
Ciao
--
-
MIX (VB5SP3)
post...@yahoo.com
80 links ai siti VB
http://space.tin.it/computer/gaais
http://www.tempolibero.com/user/mix/
 (alternativo)
-
Newsgroup: it.comp.lang.visual-basic
Titolo: Clessidra camurrusa

Ho creato un Form che si collega ad un Form
database "frmForm" cliccando un tasto del menů
a tendina ad esso collegato.Tutto Ok fin quě, ma
come mai quando ritorno col mouse sul menů  a
tendina mi spunta la clessidra?
                                                    Lucky

 wrote in message
news:UxGG5.27115$Nz.8...@news.infostrada.it...



Non č che sia molto chiaro. Comunque, se ho capito bene, nel secondo
form, probabilmente imposti
screen.mousepointer = vbHourGlass     '    (o qualcosa di simile)
e non lo reimposti su vbNormal all'uscita.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 Non č che sia molto chiaro. Comunque, se ho capito bene, nel secondo
Mi spiego meglio:
    Creo un Form1, gli inserisco un menů a tendina collegato al form data
base
    frmform( fatto come mi ha insegnato lei), e avvio il progetto.
    Si apre il Form1, clicco sul tasto del menů a tendina e si apre il form
frmform;
    fin quě tutto Ok, della clessidra neanche l'odore. Se scorro col mouse
tra le due
    form visibili non succede niente, ancora tutto Ok.Se clicco ora sul
tasto "Esci"
    dell' frmform e ritorno col mouse sul Form1 mi appare la clessidra
camurrusa;
    questa perň non mi vieta di riaprire lo stesso frmform o un altro
collegato sempre
    coi tasti del menů a tendina del Form1.In pratica posso compiere
qualsiasi evento,
    ma sempre con la gentile presenza dell'amata clessidra.
Uso VB4 e non modifico le impostazioni standard date all'avvio di VB.
SALUTI&GRAZIE
Lucky


 wrote in message
news:UA2I5.63559$Nz.17...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB & SQL SERVER

Ragą, spero che mi potete aiutare:
ho scritto un programmino che mi fa connettere ad un database SQL su di un
determinato server. Dopo la connessione lancio una query che mi seleziona un
record in una data tabella soddisfacendo delle condizioni. Il problema che
riscontro si verifica quando lancio questo programmino da due pc in rete col
server. Risultato: stesso record su tutte e due macchine. E' un problema di
contemporaneitą che devo gestiore con VB o SQL lo gestisce da se ?
Attendo ansiosamente dei lumi ! :-))))

 contemporaneità che devo gestiore con VB o SQL lo gestisce da se ?
Se sei solo in lettura non esistono problemi.
Se invece devi apportare modifiche, devi cominciare a studiarti Transazioni,
IsolationLevel, Locking, ecc...
Ciao
Alberto

 ha scritto nel messaggio
news:a40adk$gjh$1...@newsreader.mailgate.org...



IsolationLevel di ADO, ma non è un argomento semplice.
Dire che il record deve essere lockato può voler dire tante cose diverse.
E' un argomento che deve essere studiato per bene, altrimenti è un macello.
Alberto

 ha scritto nel messaggio
news:a40b9a$ham$1...@newsreader.mailgate.org...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB & Autocad

Save the Pork<

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Mouse

Salve a tutti.
Avrei un piccolo...problema.
Vorrei cambiare il cursore del mouse con una forma per esempio una mano
trasparente , mantenendo
ovviamente tutte le funzionalità del mouse.
Come fare?
Grazie a chi vorrà rispondere.
ricca...@tiscalinet.it

 Come fare?
Da progettazione (per oggetti e/o form) agisci sulle proprietà MousePointer
(a vbCustom) e MouseIcon.
Da programma (per oggetti e/o form), analogamente:
    oggetto_o_form.MousePointer = vbCustom
    oggetto_o_form.MouseIcon = LoadPicture("percorso_e_nome_file_icona")
Per l'intero video (quindi al di fuori del form), non so.
Newsgroup: it.comp.lang.visual-basic
Titolo: Uso di Funzioni API con VBA di Access

Ho cercato di usare alcune funzioni dell'API di windows (es:
GetComputerName) in un modulo VB di un database di Access, ma si impalla
sempre tutto. Non sono utilizzabili queste funzioni, o semplicemente bisogna
settare l'uso di qualche libreria da qualche parte?
--------------------------------
Inviato via 
http://usenet.libero.it

settare l'uso di qualche libreria da qualche parte?
Sono usabilissime.
Se si impalla tutto vuol dire che e' colpa del programmatore
che non fa cio' deve fare o fa cio' che non deve fare.
-- 
ciao, hal


Ecco, allora devo capire cosa faccio che non devo fare (o viceversa).
Prendiamo l'esempio di GetComputerName: inserisco in testa al modulo la
stringa
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA"
(ByVal lpBuffer As String, nSize As Long) As Long
come da guida, poi uso la funzione cosě:
 Call GetComputerName(MiaStringa,1024)
Dove ho definito MiaStringa come String, ovviamente. Quando arrivo a questa
riga di codice... Addio!!!

 Dove ho definito MiaStringa come String, ovviamente.
Ma, meno ovviamente, l'hai lasciata vuota, vero? Alla faccia del fatto 
che quel parametro l'han chiamato lpBuffer.
Prova cosi`:
Dim RetCode As Long
Dim LenPcName As Long
LenPcName = 1024
MiaStringa = Space$(LenPcName)
RetCode = GetComputerName(MiaStringa, LenPcName)
Ora, se GetComputerName e` una funzione, ci sara` un motivo: restituisce 
zero se si e` verificato un errore.
Ti sei chiesto poi perche` nella declare il parametro nSize non e` 
dichiarato ByVal? 
Vediamo se hai un po' di spirito d'osservazione ;-)
-- 
Ciao, Mauro CB

 Vediamo se hai un po' di spirito d'osservazione ;-)
Ho riletto la guida di AllAPI, e ho capito un po' di cose (anche se non
tutto). Correggimi se sbaglio: lpBuffer viene parrato per valore, ma la
funzione ne legge l'indirizzo, e crea un puntatore che le permette di
modificarne il contenuto. nSize a questo punto dovrebbe servire solo per
evitare di scrivere in locazioni di memoria non proprie, ma allora perchč
usare nuovamente un puntatore (mi pare che sia cosě, come per lpBuffer,
giusto?), quando basterebbe passargli banalmente un numero per valore! Tra
l'altro non capisco perchč (ammesso che fino qui io abbia capito bene!), per
lpBuffer andava bene il ByVal e per nSize no! Un passaggio senza specificare
ByVal o ByRef cosa significa, allora?
Ciao.


 ByVal o ByRef cosa significa, allora?
Per VB, di default e` ByRef.
-- 
Ciao, Mauro CB

Thanks, sei stato davero illuminante!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: PROBLEMI CON DATABASE

Salve a tutti,
mi servirebbe un consiglio da delle persone che ne capiscono piů di me in
quanto a Visual Basic.
Sto lavorando al collegamento ad un database fatto in ACCESS 2000
all'interno di visual basic 6.
Quando collego l'oggetto DATA, perň, ogni database fatto da me non viene
letto perchč non viene riconosciuto il formato. Questo non succede per i
database Northwind e ogni altro fatto grazie a un wizard.
Quale puň essere la soluzione?
Grazie in anticipo.
Valentino
P.s. Potete rispondermi in email e non sul ng? Grazie

 Quale può essere la soluzione?


 Quale può essere la soluzione?


Newsgroup: it.comp.lang.visual-basic
Titolo: Debug ActiveX DLL

Ciao.
E' possibile fare il debug in VB5 di un ActiveX DLL ???
Se si, come si fa ????
Grazie in advance.
BYE



...


A differenza degli ActiveX EXE, non č necessario avere due istanze di VB,
basta che una volta caricata l'ActiveX DLL nell'IDE di VB, aggiungi un nuovo
progetto (in pratica il programma client che userai per testare la DLL) č
che in esso setti un riferimento all'ActiveX DLL che vuoi testare.
Ciao,
Corrado


Come setto un riferimento all'ActiveX DLL ????

Selezioni il progetto Client (quello usato per testare la DLL) poi dal menu
Project selezioni References... e nella finestra selezioni la tua
ActiveXDll.
Ciao,
Corrado

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 + openoffice calc

Devo modificare una procedura per passare da excel a calc.
 
Mi sono piantato da ore perchè non riesco ad attribuire ad
una colonna il formato numerico "#.##0,00" o simile.
 
Aiuto!
 
Grazie e saluti.
Sauro 
 
 

una colonna il formato numerico "#.##0,00" o simile.
 
E' una cosa che ho fatto molto tempo fa, ma ci si riesce.
 
Guarda questo esempio:
 
https://wiki.openoffice.org/wiki/Documentation/BASIC_Guide/Formatting_Spreadsheet_Documents
 
 
cerca
 
NumberFormatString
 
dovrebbe aiutarti.
 
-- 
ciao
  Stefano

Grazie Stefano.
 
In realtŕ non sono riuscito ad attribuire il formato
alla colonna.
Pero sono riuscito ad attribuire il formato ad un
range di celle.
Quindi basta creare un range con le celle di una
unica colonna e il gioco č fatto.
 
ciao ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Manuale VB

Ho trovato un attimo di tempo per mettere on line i
files pdf che ho trovato in rete.
Ho notato che i files pdf dei capitoli del libro di Francesco Balena
non sono altro che stampe tramite il driver PDF del file .chm
che si può trovare su volftp o allegato al libro.
In ogni caso se a qualcuno interessa i file sono qui:
http://www.minervini.org/vb/vb.asp
Compreso il codice sorgente degli esempi del libro.
P.S.
    Non ho tempo per assistenza tecnica e non mi interessa se
i files non sono di gradimento li ho messi solo per un amico,
non li ho fatti io, li ho solo trovati su internet e dato che non
mi costava nulla passarvi il link l'ho postato.
                                        danilo

È possibile raggiungerlo tramite ftp?
--
Ciao
Roberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Porta Seriale...

Massimo quanti dispositivi possono essere collegati contemporaneamente
alla seriale di un pc?
   Roberto
email: 
ro...@ctonline.it
icq:   47933273 

 wrote in message
383cf93...@news.ctonline.it...


 --


 Stracca

occupati, 
Il computer è dedicato (e usa Win NT come SO) quindi, credo che non
dovrebbero sorgere troppi problemi riguardo ai conflitti di interrupt.
   Roberto
email: 
ro...@ctonline.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Cerco Doc su dialetto SQL

Ciao a tutti.
Mi servirebbe un doc (da reperire aggratis in rete,
ovvio ;-) ) che spieghi il dialetto SQL utilizzato dal
Jet Engine di Access 2000 (il 4.0 se non erro),
utilizzabile in VB (quello in inglese).
Grazie
Bepi

 utilizzabile in VB (quello in inglese).
Non il VB in inglese, **la versione SQL in inglese**.
Dico questo perche' alcune funzioni usate in Access
(es. Somma([Importo]) usando DAO diventa Sum(...))
Scusate spero mi abbiate capito lo stesso.
Ciao
Bepi

 (es. Somma([Importo]) usando DAO diventa Sum(...))
direi che ti basta cercare qualunque tutorial su sql.
quello standard e' in inglese.
sotto qualche link, da verificare
In italiano:
http://asp.webjuice.it/risorse/guide/egidiopagliarella/index.php
http://www.aureaprogram.it/nov1Normalizzazione.html
http://www.programmazione.it/index.php?entity=earticle&idArticle7&idArea=
23
www.html.it/sql/
www.iprogrammatori.it/faq/faq_sql.htm
http://digilander.iol.it/TheCript/SQL/sql_main.htm
www.latoserver.it/database/ddl/
http://members.xoom.it/simonrob
http://digilander.iol.it/cclaudia/sql.htm
In inglese:
http://www.mssqlserver.com/faq/
http://www.swynk.com/faq/sql/sqlserverfaq.asp
http://vyaskn.tripod.com/repl_ques.htm
http://www.microsoft.com/technet/sql/
http://msdn.microsoft.com/sqlserver/
http://www.microsoft.com/sql/
http://www.sqlsecurity.com/
http://www.functionx.com/access/
http://members.optushome.com.au/anandasim/
http://homestead.deja.com/user.accdevel/SandA.html
http://easyweb.easynet.co.uk/~trevor/AccFAQ/
http://www.informix.com/answers/
http://www.iiug.org/resources/faq/
http://www.smooth1.demon.co.uk/informix.htm
http://www.hotwired.com/webmonkey/databases/tutorials/tutorial4.html
http://www.opendeveloper.org/PHP/HowTo/Web-Based_MySQL_Management_with_PHP/
http://www.mysql.com/Manual_chapter/manual_Tutorial.html
http://www.bitbybit.dk/mysqlfaq/
http://mysql.faqts.com/
http://www.orafaq.com/faq2.htm
http://www.cs.uwindsor.ca/meta-index/courses/95F/60-315/temp/sqlforms.html
http://www.postgresql.org/docs/faq-english.html
http://techinfo.sybase.com
Newsgroup: it.comp.lang.visual-basic
Titolo: aiutino sul CD-Rom

Ho bisogno di un "aiutino".
sto usando la Dll VBASM, presa dal sito comune, per eseguire gli interrupt
da una versione di VB a 16 bit. io sto usando VB4 16 bit.
finora ho provato ad eseguire la funzione int 21h, 3600h, per trovare lo
spazio libero su un disco, e ha funzionato benissimo.
ora vorrei usare la seguente funzione:
INT 21 - CD-ROM device driver - IOCTL INPUT
 AX = 4402h
 BX = file handle referencing character device for CD-ROM driver
 CX = number of bytes to read
 DS:DX -> control block (see #01449)
(Table 01448)
Values for CD-ROM data being requested:
 00h device driver header address
 01h drive head location
 02h reserved
 03h error statistics
 04h audio channel info
(continua...)
Format of CD-ROM control block:
Offset Size Description (Table 01449)
 00h BYTE data being requested (see #01448)
---function 00h---
 01h DWORD device driver header address (see also AH=52h,#01646)
---function 01h---
 01h BYTE (call) addressing mode
  00h HSG
  01h Red Book
 02h DWORD current location of drive's head
  logical sector number in HSG mode
  frame/second/minute/unused in Red Book mode
  (HSG sector = minute * 4500 + second * 75 + frame - 150)
(continua...)
bene, il mio dubbio è seguente:
cosa è il valore in BX? cosa è "character device" ecc. ecc.? non ne ho la
piu pallida idea... ::)))))
è vero o no che in DS e in DX devo mettere rispettivamente VarSeg e VarPtr
di una variabile da me dichiarata, variabile che poi riceverà l'output, e
dalla quale andrò a leggere con Peek?
aiutatemi, please...
MarioH

please... sto affogando nel fango e nelle sabbie mobili... ::)))))))
MarioH

Newsgroup: it.comp.lang.visual-basic
Titolo: Sempre DCOM

Che differenza c'e' tra un com exe e uno con estensione dll??
Se date un occhio anche agli altri post (che spero siano arrivati) ...
Grazie Andrea

L'exe è un eseguibile che può essere avviato da solo, mentre la dll
necessita di un file exe (anche activeX) che la istanzi.
In remoto di solito si usa un controllo activeX exe oppure COM+ oppure su
Win98 MTS.
ciao Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto gestione web cam

Avrei bisogno di realizzare un controllo tramite web cam di un locale. le
web cam sono situate in 3 punti diversi e vorrei che possano essere
selezionate a piacere da una pagina web. Come posso realizzare questo
progetto ?
Ho gia' guardato su siti come aspitalia html.i etc ma non mi sono stati di
grande aiuto.
Grazie in anticipo per le dritte.
Daniele

 wrote in message
news:8m70l0$pq1$1...@serv1.iunet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ordinare file in ComBobox

In VB6 nelle seguenti informazioni:
        DIR1$ = DIR + "*.TXT"
        FF = Dir(DIR1$)
        Me.ComboBox1.Clear
        For I = 1 To 150
        If FF = "" Then GoTo 3
        Me.ComboBox1.AddItem FF
        L1$(I) = FF
        FF = Dir
        Next I
3
     Accedo al contenuto dei file esterno in formato Testo (*.TXT) o Dati 
( *.DAT) contenuti
     nella directory DISR1$, ora   cosa   devo fare per  comparire in 
Combobox1 ordinati
    per esempio per la data con cui sono stati creati, oppure per ordine 
alfabetico ?
    Grazie.

 ha scritto

scusa la domanda, e' vb o qb?
- lascia perdere i goto. for..next dispone di exit for.
- stai usando dir$ in un modo poco pratico. se i file nella cartella sono 
151? se usi dir$ come va usato, ti risparmi il for..next.
forse anche a te, come a goody, un'occhiata a un manuale di vb6 non farebbe 
male...
il combobox puo' essere settato sported=true, ma ovviamente solo sulle voci 
che contiene. quindi
- o lo carichi con stringhe in cui metti anche la data, tipo
20080528 pippo.doc
20080529 pluto.doc
- o carichi la cartella in un array multidimensionale, lo ordini sulla 
colonna ch e vuoi, e da quello carichi il combo usando un'altra colonna. 
puoi semplificarti le cose usando un listview, tipo la parte destra di 
gestione risorse. lo trovi mettendo fra i componenti del tuo form i ms 
windows common controls.
dopo esserti guardato bene la guida di vb, qui 
http://vbnet.mvps.org/
 cerca 
listview per vedere come usarlo meglio.
ciao, a.

 ha scritto nel messaggio 
news:6af3tjF...@mid.individual.net...


> scusa la domanda, e' vb o qb?
si', l'avevi anche scritto. ma non sembrava.
se sei all'inizio, forse ti conviene imparare 
vb.net
. ha piu' prospettive.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Esecuzione programma ms-dos interno a uno VB

Anzitutto un saluto a tutti!
Premesso che sono un principiante di VB5, sarò grato a chi mi vorrà
aiutare a risolvere il seguente problema:
sto sviluppando un programma in VB5 che, a un certo punto, richiama più
volte un prg fortran (abbastanza corposo, che gira ancora sotto MS-DOS)
per eseguire dei conti e poi ne riusa i risultati. Quindi, fatti alcuni
cambiamenti ai file di input richiama il prg fortran.
Il problema è questo: come impedire a VB di proseguire nell'esecuzione
del listato finchè l'altro prg non ha terminato tutte le sue cosine? In
altri termini, come fare perchè VB si renda conto se l'altro programma è
ancora in esecuzione e quindi aspettare finchè l'altro prg "non molla
gli ossi"?
Mi sono state suggerite queste possibilità: 
1- controllare le date di creazione dei file maneggiati dall'altro prg,
ma la devo scartare poichè l'altro li crea e li distrugge più volte
durante la sua esecuzione.
2- impostare una pausa (!), ma non posso sapere a priori quanto tempo
impiega l'altro prg a terminare tutto.
Vi ringrazio e ricoprdo che saranno gradite risposte direttamente alla
mia mail.
Ciao!
Fabrizio

PARTE DICHIARATIVA
	Const PROCESS_QUERY_INFORMATION = &H400
	Const STILL_ACTIVE = &H103
	Private Declare Function OpenProcess Lib "kernel32" (ByVal 
dwDesiredAccess&, ByVal bInheritHandle&, ByVal dwProcessId&) As 	Long
	Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal 
hHandle As Long, ByVal dwMilliseconds As Long) As Long
	Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal 
hProcess As Long, lpExitCode As Long) As Long
FUNZIONE A CUI PASSARE IL NOME DEL FILE COMPLETO DI PATH
ESCE QUANDO IL PRG è TERMINATO TORNANDO TRUE o FALSE
Private Function ShellWaitNT(ByVal sFileName As String) As Boolean
 
    Dim hShell As Long
    Dim hProc As Long
    Dim lExit As Long
 
    On Error GoTo EH_ShellWaitNT
 
    hShell = Shell(sFileName, vbNormalFocus)
 
    hProc = OpenProcess(PROCESS_QUERY_INFORMATION, False, hShell)
 
    Do
        GetExitCodeProcess hProc, lExit
        DoEvents
 
    Loop While lExit = STILL_ACTIVE
 
    ShellWaitNT = True
 
EXIT_ShellWaitNT:
    Exit Function
 
EH_ShellWaitNT:
    ShellWaitNT = False
    Resume EXIT_ShellWaitNT
 
End Function
QUESTA DOVREBBE FUNZIONARE SIA SU NT CHE SU 95(SPERO)
CASOMAI FATTI SENTIRE.
Ciao 
 Danilo Scagnoli

Bella funzione ma... dopo che ho eseguito un po di volte il lavoro mi
si riempie la barra delle applicazioni di "PROGRAMMA MS-DOS
TERMINATO". Come si fa a chiudere anche quella segnalazione ?
Ciao 
Marco Grignoli
sinf...@tin.it

Trova il messaggio:
 'Aiuto x chiudere .exe' (Sandro)
e leggi le repliche.
Ciao,   fabrizio.
-----
On Mon, 20 Oct 1997 14:41:09 GMT, 
s.info.@tread.it
 (Marco Grignoli)
wrote:

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inviare comandi direttamente ad un server FTP

E' possibile in VB (con l'aiuto magari di qualche funzione API) inviare dei
comandi direttamente ad un server FTP?
Ho provato ad utilizzare il controllo Internet Transfer Control, ma questo
supporta solo alcuni comandi FTP, per cui vorrei "dialogare" direttamente
con il server, bypassando il controllo.
Ho notato che in WinInet.dll esiste la funzione FTPCommand, la quale fa
esattamente quello che mi serve, ma purtroppo questo comando e' un'aggiunta
ed e' disponibile solo con Internet Explorer 5.0. Conoscete qualche dll/ocx
che possa risolvermi il problema?
Grazie a chiunque mi risponda.
Omar Venturi
mailto:
o...@onion.it
ONION S.p.A Via L.Gussalli, 9
Communications-Technologies-Consulting
http://net.onion.it

Omar wrote:

E'possibile usare il controllo Winsock ..
Con questo puoi aprire le connessioni sulla porta 21 (ftp)
e parlare con il tuo server !!!
--
**********************************
*******Luke SkyWalker********
**********************************
Newsgroup: it.comp.lang.visual-basic
Titolo: Motore Vocale Microsoft Text-to-Speech

    Ciao a tutti.
E' la prima volta che inoltro un messaggio ad un NewsGroup anche se questo
lo sto seguendo da qualche mese.
Programmo per passione in VB 5 e da un po' di tempo sto pensando ad una
piccola applicazione che sia in grado di vocalizzare un testo.
Tra i componenti software del mio PC esiste   c:\windows\speech\XVoice.dll
(Microsoft Direct Text-to_Speech) che penso possa essere utile a realizzare
quanto desidero.
Il problema consiste nel fatto che non ho trovato nessuna informazione che
mi consenta di utilizzare tale libreria.
Sarò molto grato a chiunque possa fornirmi elementi di studio o di ricerca
per tentare di superare questo scoglio.
- - - 
mario...@inps.it
 - - -

 quanto desidero.
Quello di cui hai bisogno e' il Microsoft Speech SDK 5.1 direttamente
dal sito MS. E' corredato di manuali/esempi/tutorial.
Puoi anche googlare con key "SAPI" o "Speech API".
Happy Coding =)
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 Puoi anche googlare con key "SAPI" o "Speech API".
ma per curiosità, esiste un motore text 2 speech in iatliano ?
oppure c'è solo quello inglese (free intendo)
grazie
DAvide

 (free intendo)
AFAIK free c'e' solo in inglese.


 AFAIK free c'e' solo in inglese.
mi sembra qualcuno parlasse dell'sdk4. cfr:
http://www.lunet.it/offerte/berti/Vb/Sapi4.htm


usa il motore inglese...
ciao
DAvide

 mi consenta di utilizzare tale libreria.
usa 
http://www.microsoft.com/products/msagent/
anche in italiano
ciao :)

 qualcuno sa darmi informazioni in merito???
La pagina di M$ da cui scaricare i suddetti è qui:
http://www.microsoft.com/msagent/downloads.htm#tts
Tutta la documentazione è qui:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/msagent/age
ntstartpage_7gdh.asp

Grazie a tutti.
Il vostro aiuto è prezioso e indispensabile.
Spero una volta o l'altra di poter contraccambiare.
P.S.    Visto il periodo, auguri di buone vacanze.

Se non lo hai ancora fatto Prova dare un' occhiata su
http://www.microsoft.com/msagent/devdownloads.htm#tts
ciao Sergio
"Wiz@rd_2®®®" <fama®so...@Tiscali.It> ha scritto nel messaggio
news:agejkp$4bq$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: ADTG

Dovrei aprire delle Tabelle con estensione ADTG da visual basic, qualcuno sa
dirmi cosa sono e dirmi come fare ad aprirle  o darmi almeno una dritta?
Da quel poco che penso di avere capito cercando su Goglee dovrebbe trattarsi
di ASP, sbaglio?
Grazie a tutti
Renato

ADTG è  l'estensione dei recordset persistenti ( file .adtg). E' un formato
proprietario della Microsoft (Tablogramma di dati avanzato, Advanced Data
Tablegram).
Questo file contiene un recordset opportunamente salvato.
E' creato con ADO sfruttando il metodo Save dell'oggetto recordset :
rs.Save Filename, Format
Per aprire un recordset creato e salvato in formato ADTG si usa il metodo
Open passando come source la stringa contenente il path del file .ADTG,
esempio :
rs.Open percorso\file.ADTG, ,adOpenStatic,adLockOptimistic
Spero di esserti stato utile.
Saluti.


sě, Quirino, grazie, sei stato utile anche a me....
posso farti una domanda?
ma Quirino č un soprannome?
Non dirmi che č un nome che esiste veramente!
In tal caso, nessuno ha mai fatto rime, che so, del tipo: "Quirino viene col
pulmino da Sonnino e mangia un panino col salamino"?
 :-DD
tao
Ciao
Silvia.
--
www.silvietta.it
...everyone's invited!
Non Esiste Una Razza Bianca, Benche' Se Ne Parli Tanto: Ogni Uomo Bianco E' Solamente Un Uomo Scolorito 

Non dirmi che č un nome che esiste veramente!
va bene... visto che non ti offendi vengo a scocciarti direttamente alla tua
scrivania ;-)
ciao quirino!!
cmq sei bravissimo, davvero!!
