mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] PDF

Vorrei generare dei file PDF tramite VB5 per inviarli successivamente per
posta elettronica.
Per creare i miei prospetti di stampa utilizzo Crystal Report.
Domanda: č possibile passando attraverso le attuali stampe di Crystal
generare il file PDF?
La versione completa di Acrobat Reader, č per caso vista come un driver di
stampa?
Grazie e ciao.
Fabrizio.

 stampa?
si; da Excel, per esempio, si salva in PDF stampando con una stampante
particolare
Ciao
Faber

 Fabrizio.
Sul sito della seagate era disponibile il file u2fpdf.dll per CR 8 (versione
beta).
Provalo.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Oracle Ole server e ado

Ciao
Volevo chiedervi un consiglio:
nel caso in cui debba accedere ad un database Oracle da una applicazione
realizzata con Visual Basic 6e' meglio utilizzare gli ole server cersione
2.1 messi a disposizione ccon l'installazione di Oracle for NT oppure usare
la tecnologia Ado?
qualcuno sa spiegarmi pregi e difetti della prima scelta rispetto alla
seconda?
Grazie anticipatamente
                                                        Max

Newsgroup: it.comp.lang.visual-basic
Titolo: piccoli consigli

Ciao, sono un aspirante programmatore di vb, nel senso che ho incominciato
ora a studiarlo.
Sicuramente i miei problemi saranno ridicoli per chi è già esperto, vi prego
però di non ignorarmi.
Per iniziare ho la segg. domanda:
Che funzione posso usare per fare si che il mio eseguibile appena lanciato
sia in grado di sapere ove sono installati i file che gli servono ?
Un grazie in anticipo a chi mi risponderà
Pangea

 Pangea
App.Path
Ciao

 wrote in message
K%Oe4.28469$I3.3...@news.infostrada.it...


 dove dovrei definirlo?
Non devi definirlo: esiste già e devi solo usarlo. App.Path ti restituisce
una stringa contenente il percorso del tuo programma. Per esempio: se il tuo
programma si trova nella cartella C:\MIOPROG, se scrivi qualcosa del genere
Private Sub Form_Load()
    MsgBox (App.Path)
End Sub
nel msgbox troverai scritto C:\MIOPROG.
Ancora, se devi far riferimento al file MIOFILE.MIO che si trova nella
cartella C:\MIOPROG, potrai scrivere:
App.Path & "\MIOFILE.MIO". Il risultato di questa stringa sarà:
C:\MIOPROG\MIOFILE.MIO
Spero di essere stato chiaro. Comunque l'help in linea in questo caso è
piuttosto esauriente: dagli un'occhiata se ancora non l'hai fatto.
Ciao a tutti
Cesare Nicola
http://digilander.iol.it/cesare
L'indirizzo del sito comune è:
http://www.murialdo.it:8000/it_lang_vb/

 Per iniziare ho la segg. domanda:

Newsgroup: it.comp.lang.visual-basic
Titolo: open for input: ebbene sì, mi arrendo :-(

Dopo una settimana che provo in ogni modo a capire da solo dove è l'errore,
alzo bandiera bianca e chiedo a voi:
Dunque, file con circa 20.000 dati, un text box dove inserire i dati da
cercare ed un grid box dove visualizzare i soli dati che iniziano con  le
lettere inserite nel text box.
Open for input il file as #1 ed input#1 per la lettura sequenziale (ma ho
provato, per debug, anche con freefile).
Do While Not EOF(1) per non leggere oltre la fine.
La lettura del file, dato che i dati oltre che letti vengono elaborati per
altre operazioni, dura 3/4 secondi.
La cosa che mi fa specie è questa: dato che per ogni evento KeyPress si va
alla routine di lettura del file (inserita in una sub text_change), se
inserisco velocemente che so, tre lettere nel text box, il file viene
aperto, letto e chiuso per tre volte sequenzialmente, dando naturalmente
alla fine il risultato corretto, cioè nel grid box vengono visualizzati i
soli dati che iniziano con quelle tre lettere.
Voi direte: basta mettere un DoEvents nel ciclo di lettura del file, e la
cosa si risolve: ad ogni ulteriore pressione di un tasto si esce dal ciclo
di lettura eventualmente iniziato e l'esecuzione viene rimandata alla
routine KeyPress.
E' vero, la cosa si evita, il processo di lettura viene interrotto
immediatamente, il file viene ovviamente chiuso con un close, MA COSI'
FACENDO ALLA FINE DELLA LETTURA FINALE DEL FILE OTTENGO INEVITABILMENTE UN
ERRORE  DI RUN-TIME 52 (nome o numero di file non valido), cosa inspiegabile
tanto + che il file viene regolarmente aperto ed i dati letti fino a EOF, e
quindi ovviamente sia nome che numero sono validi.
La cosa ancora + inspiegabile è che l'errore è ingestibile: posso mettere
tutte le routines On Error del mondo ma l'esecuzione si blocca con messaggio
di Errore 52.
Se qualcuno mi può illuminare... :-)
Grazie

Hai accennato solo una volta a freefile... come lo usi?
Prova a mettere un flag booleano impostato a TRUE nella keypress (non appena premi un tasto).
Poi metti,
* prima del ciclo di lettura "flag=FALSE"
* all'interno del ciclo di lettura, un bel "IF flag = TRUE Then exit ciclo "
* dopo il ciclo di lettura "flag=FALSE"
* chiudi file e altre operazioncine, ed esci dalla procedura.

 ha scritto nel messaggio
news:NBtQ7.4389$NB6.1...@news2.tin.it...


 Se qualcuno mi può illuminare... :-)
Fai come fa la guida in linea: attende 1 o 2 secondi dall'ultimo tasto
premuto prima di iniziare la ricerca.
Lascia perdere il DoEvent con routine ricorsive!
E' per questo che non riesci nemmeno a trappare l'errore!
L'errore verrà anche gestito, ma poi ti salta al passo successivo dello
stack e esplode tutto.
Ciao

 Se qualcuno mi può illuminare... :-)
Ci ho provato :-)
Bye, G.


Fatto!!!!!!!!!!!!
Tutto ok, ora.
Un bel On Error Resume Next (adesso finalmente l'evento viene gestito) ed il
programma non si blocca +.
Grazie a te ed anche agli altri che hanno risposto.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: update sicuro ... numeratori

Qual'č il metodo sicuro, in ambiente di rete, per far sě che un record
database access sia aggiornato immediatamente, impedendo ad altri
utenti di leggerne il contenuto finchč non aggiornato?
E' il classico problema di "staccare" un numero di fattura e
aggiornare il numeratore, prima che un altro utente faccia la stessa
cosa e ci si ritrovi con due fatture con lo stesso numero.
Pensavamo di aver risolto il problema, poi ...
Grazie dell'aiuto.
Roberto Bava

database access sia aggiornato immediatamente, impedendo ad altriutenti di



Non si tratta precisamente dello stesso problema, in quanto i
numeratori si trovano su una tabella a parte, e perciò è necessario
usare campi numerici ...
Comunque abbiamo probabilmente il problema: in realtà si trattava di
una svista (piuttosto grave!) di chi ha elaborato la procedura:
leggeva il valore del contatore prima di fare .edit, perciò nello
spazio di un paio di istruzioni, qualcun altro riusciva ad "infilarsi"
e a leggere lo stesso valore e leggere lo stesso valore ...
Grazie comunque dell'aiuto.
ErreBi
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP! ActiveX e Internet Explorer

Ho provato, con VB6,  a creare un componente (semplice) ActiveX (un OCX) per
provarlo con internet explorer.
Il progetto č un semplice UserControl chiamato PippoOCX con una label.
Ho aggiunto una property Valore, come segue:
Public Property Let Valore(ByVal pValore As String)
    Label1.Caption = pValore
End Property
Se il componente cosě creato lo uso all'interno di una applicazione VB
funziona (ovvio), ovvero passando un valore alla property Valore, questo
diventa la caption della label. Fin qua nessun problema.
Ho provato ad usarlo in una pagina web,
Testandolo il compilatore crea una pagina di prova con il seguente codice
HTML:
<HTML><BODY><OBJECT classid="clsid:E6F6BBC1-C700-4E7E-A046-3CB4BC202A83">
</OBJECT></BODY></HTML>
e mostra l'OCX come creato (con la caption di default)
Ora io vorrei passare anche da HTML un valore all'OCX e pensavo di usare la
sintassi
<HTML>
<BODY>
<OBJECT classid="clsid:E6F6BBC1-C700-4E7E-A046-3CB4BC202A83">
<PARAM NAME="Valore" VALUE="test caption">
</OBJECT>
</BODY>
</HTML>
In questo modo perň la pagina non viene caricata correttamente ma genera un
warning tipo:
"L'interazione di un controllo ActiveX in quesa pagina con altre parti della
pagina č potenzialmente dannosa. Consentire l'interazione ?"
Clicco su Si, ma non funziona.
premetto che ho provato anche a firmare digitalmente l'OCX con un
certificato valido, ma non funziona ugualmente.
Qualcuno ha dei suggeriemnti ?
Grazie

 certificato valido, ma non funziona ugualmente.
Una cosa molto importante quando crei un componente che sia per IE o che sia 
un OLE/DLL per pagine ASP e di ricordarsi che deve essere sempre presente 
non soltanto la proprerty LET ma anche la GET, altrimenti potrebbe non 
riconoscere la presenza della proprietà, se la GET non ti serve mettila 
comunque semmai ci metti err.raise 393 al suo interno.
----------------------------------
FREE Development Components
http://www.prioregroup.com
------------------------------------------------------------
Biometrics Components and SDK for Advanced Security
http://www.biosecuredev.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Si può fare?????

Ciao a tutti i partecipanti al MG.
Sto realizzando un'applicazione che mi
permetta di aprire i file di word, in una OLE, anche senza avere Word
istallato.
il form è composto da tre elementi:
COMMON DIALOG
OLEDOD
Command_Buttun
Nel codice del  command button ho me questo:
CD1.Filter
= "Documento (*.doc)|*.doc|File Ascii (*.txt)|*.txt"
CD1.FilterIndex = 2
        CD1.ShowOpen
        If CD1.FileName <> ""
Then
           Nome_File = CD1.FileName
        End If
OLEDOC.CreateEmbed Nome_File, "Word.Document.8"
        OLEDOC.Refresh
OLEDOC.DoVerb (-1)
End Sub
Tutto Ok, apre il documento, ma con un
piccolo problema:
mi apre anche tutti i controlli di word che mi
consentono di modificare il file.
E' mia intenzione aprirlo di sola
lettura.
Cosa debbo mettere, affinchè non mi apra i controlli di
Word?????????
deve aprirmi il file solo e basta.
Non ho ancora provato ad
istallarlo su un computer senza Word, secondo voi li apre anche su quel
computer??????
Ciao e grazie
--------------------------------
Inviato via 
http://usenet.iol.it

 computer??????
Non so se ci hai badato, ma stai utilizzando una classe registrata come
"Documento Word 8" (o qualcosa di simile).
Questo vuol dire che stai chiedendo al SO di chiamare l'Ole Server
registrato per quella classe, cioè Microsoft Word!!!!
Se vuoi leggere e visualizzare un documento Word SENZA Word, devi scriverti
praticamente il Visualizzatore di Word che Ms distribuisce free. Ovvero devi
andare a leggerti le specifiche del formato file di Word, leggere il file
(nel senso binario del termine) e "interpretare" correttamente quanto ci
trovi scritto.
Oppure usi effettivamente un Ole container, ma ti assicuri che sulla
macchina dove sarà installato il tuo programma sia installato Word o almeno
il visualizzatore (il visualizzatore, eventualmente, potresti distribuirlo
tu insieme alla tua app, dato che è free).
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Errore durante creazione DLL

Ciao a tutti.
Non capisco, e di conseguenza non so come risolvere, questo problema.
Nella classe gestione per i form ho quanto segue:
'-------------------------------------------------------------------------------------
Private WithEvents mForm As Form  ' Form reference
Private mCollection As Collection  ' Item collection
Public Property Let Form(vData As Form)
   Set mForm = vData  ' Set reference
End Property
etc etc....
'---------------------------------------------------------------------------------
Tentando di compilare mi ritorna il seguente errore:
"Impossibile utilizzare moduli di oggetto privati  in moduli di
oggetto pubblici come parametri o tipi restituiti per routine
pubbliche, come membri pubblici di dati o come campi di tipi pubblici
definiti dall'utente."
segnalando la riga "Public Property Let Form(vData As Form)" come
incriminata.
Questa classe, chiamata CForms, č definita come 5 - MutliUse.
Vorrei riuscire a creare una DLL da questa.
Tnx in advance
Aran Banjo :)
<La pace regnerą nel mondo, perchč i Meganoidi verranno distrutti da Daitarn 3.
E se non temi la mia potenza, fatti avanti!>

 definiti dall'utente."
[SNIP]
'Form' e' un tipo privato, e non puo' essere esposto direttamente da un
metodo di classe pubblico; temo non ci sia altra scelta se non quella di
dichiarare vData As Object
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

dichiarare vData As Object
Infatti adesso non da errore di compilazione.
Rimane da vedere se funziona correttamente.
Grazie 1000 intanto
Aran Banjo :)
<La pace regnerà nel mondo, perchè i Meganoidi verranno distrutti da Daitarn 3.


 Rimane da vedere se funziona correttamente.
Per funzionare funziona... fintanto che viene passata un'istanza di classe
corretta; devi quindi sempre verificare il parametro, per esempio con:
Public Property Let Form(vData As Form)
    If TypeOf vData Is Form Then
       Set mForm = vData
    Else
        Err.Raise 13 'Type mismatch
    End If
End Property


Ciao
Ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: Password in database

Salve,
ho fatto un database e vorrei proteggerlo con una password, ma non
riesco ad aprirlo se uso i DataControl. (Data1, Data2 etc etc)
Qualcuno avrebbe un esempio da postarmi?
anche per e-mail:
vaccar...@krol.it
 (togliereNOSPAM)
Poi: una piccola domanda OT:
posso dare una licenza gratuita, per un anno rinnovabile di anno in
anno, di un mio programma ad un ENTE (con cui lavoro) ?
Ho regolare licenza del VB5 Prof.
Grazie in anticipo.
Ciao 
Robin

Data1.databasename = app.path & "\DB.mdb"
Data1.connect = ";PWD=MIAPW"
Data1.refresh
MIAPW = password del db
Ciao Luciano.

 wrote in message
SjMbOWarOOOxQz9=kaKePS...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Come dichiaro una variable che splitto

Come devo inizializzare una variabile che conterrà lo split di una 
stringa se voglio usare OptionExplicit.
se faccio 
dim Str as string 
e poi faccio 
str = split("CIAO*BELLO","*")
quando eseguo mi da errore 'tipo di dati non corrispondente'
Grazie, Alverman

 dim Str as string
dim Str() as string


Newsgroup: it.comp.lang.visual-basic
Titolo: errore con ado

Salve a tutti.
Durante la manipolazione di un recordset ADO mi si verifica il seguente
errore  sull'istruzione ado.update: "run time error 
2147467259
 (80004005) le
informazioni sulle colonne chiave non sono sufficienti per effettuare
l'aggiornamento", tuuto questo con W98. Se lo stesso programma che opera
sullo stesso database, in rete, viene eseguito su una macchina W2000 nessun
problema.
Qualcuno di voi avrebbe una possibile idea del perchč?
Grazie
marzia

 problema.
Win98 o 2000 non c'entra.
In un caso hai eseguito una singola transazione sul record e nell'altro una
insert seguita da una modifica con update.
Il punto è quello che ti dice Ado: "informazioni insufficienti per
l'aggiornamento".
Rivediti le chiavi della/e tabelle interessate.
ciao
ugo

 ha scritto nel messaggio
news:a8d0bq$j3h$3...@lacerta.tiscalinet.it...


Non ho ricevuto tutti i post del thread, per cui potrei dire delle cavolate.
Potrebbe esserci un problema legato al modo in cui tu traduci il True o
False nella stringa SQL che mandi ad Ado.
Se fai un & con la variabile Booleana di VB, a seconda delle impostazioni
internazionali potrebbe tornarti la parola "False" o "Falso", cosě come
"True" o "Vero". Ovviamente questo potrebbe non essere compatibile con il
tipo di DB e con le sue impostazioni.
Come regola, cerca di usare sempre i valori numerici al posto dei booleani,
ad esempio 0 e -1, che sono accettati da quasi tutte le versioni di SQL.
Eventualmente posta la Adodb.Command.CommandText che ti crea problemi.
Ciao
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: SQL e sorta di raggruppamento di record

Ciao a tutti, ho un problema con sql.
Ho una tabella simile a questa:
Nome		Gruppo		ecc..
Nome1		Gruppo1	....
Nome2		Gruppo1	...
Nome3		Gruppo2	...
Nome4		Gruppo2	...
Nome5		Gruppo3	...
Vorrei prelevare tutti i campi che hanno lo stesso gruppo,
graficamente qualcosa di questi genere:
Nome1		Gruppo1
Nome2		Gruppo1
e poi:
Nome3		Gruppo2
Nome4		Gruppo2
e ultimo:
Nome5		Gruppo3
Sapete come posso fare? Mi serve anche il campo Nome ( e altri campi )
della tabella.
ciao e grazie

Ciao Giacomo,
non credo di aver capito il problema.
A me verrebbe in mente una semplice
SELECT Nome, Gruppo
FROM Tabella
ORDER BY Gruppo, Nome
ma credo che ti riferissi a qualcosa di + complesso.
Ciao!
-- 
Lorenzo Benaglia
UGIdotNET - 
http://www.ugidotnet.org

Ciao!
ciao, e grazie

 della tabella.
per rilevare i nomi dei campi:
Dim i As Integer
For i = 0 To adoRS.Fields.Count - 1 'numero dei campi
      Debug.Print adoRS.Fields(i).Name ' nome del campo
Next
giuseppeD
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

giuseppeD
ciao

 su tutti questi record. 
Potresti usare la clonazione di ADO,
cioè costruire una copia dell'oggetto e filtrarlo.
es.
	Dim rsDolly1 As ADODB.Recordset
       Set rsDolly1 = adoRS.Clone
       rsDolly1.Filter = "Area=" & 6
 
        Dim rsDolly2 As ADODB.Recordset
       Set rsDolly2 = adoRS.Clone
       rsDolly2.Filter = "Area=" & 9
 
  e lavorare con i singoli recordset


 wrote in message
news:3d07238d...@news.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: splitter - sito comune ?

ho fatto un mini-vbp per uno splitter e per quanto schematico mi sembra un
po' piu' immediato di quello sul sito, che peraltro e' ben piu' articolato.
ci sono 1 frm, 2 pic e 6 righe di codice. l'ho messo in un prg mio e mi
sembra vada.
stracca te lo posso mandare ?
ciao, andrea
=*=
andrea palazzi
pal at cedoc dot mo dot it

 wrote in message 80u417$6ap$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Comunicazione seriale tra PC e PLC

Ciao c'è qualcuno che sa dove posso trovare qualche esempio o magari
qualcuno che mi manda in e.mail classi o moduli che utilizza normalmente?
Il plc è un siemens con CP340
Grazie a tutti!

 ha scritto nel messaggio
news:tcc87.29442$Qf6.2...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Applicativo SNDVOL32.EXE

Un saluto a tutti per primo.
Situazione:
WIN2000 come SO aggiornato a SP4
Dall'Icona(Volume) nella TRY con DB_LFCLICK si apre 
regolarmente l'applicativo in oggetto e ne vedo il processo.
Con LFT_CLICK si apre invece un'interfaccia grafica ridotta
ma nei processi ho sempre l'EXE in oggetto.
Ora mi viene da pensare che l'EXE possa ricevere un Parametro
per poter gestire l'apertura di un'interfaccia piuttosto che
l'altra.
Ora poichè io dovrei poter lanciare l'interfaccia ridotta
vi chiedevo se vi è capitato di affrontare questa cosa
e se avete da suggerirmi una soluzione.
Grazie
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @Alex
di un tuo programma o proprio del controllo volume?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 di un tuo programma o proprio del controllo volume?
No di un mio programma, proprio di sndvol32.exe
Il fatto č che se faccio partire dall'icona con Left_Click
l'applicativo mi si avvia sndvol32.exe, ma con un'aspetto
ristretto al Volume/Mute generico con una Form Popup piccola ecc...!
Ora io vorrei lanciare proprio quell'interfaccia e non il normale
controllo Mixer.
Da quanto letto su MSDN devo inviare una UDT particolare,
ma non riesco a capire cosa, per il come poi penso ci si debba
appoggiare a Winmm.dll in particolare a MixerSetControlDetails
ma mi perdo via qualche pezzo....!
Spero di aver chiarito.
Ciao


 No di un mio programma, proprio di sndvol32.exe
C:\WINNT>sndvol32 /t
ho provato a cercare shell sndvol32 parameters
il primo link ne accenna qualcuno.
sempre che sia questo che ti serviva.
ciao, a.


 ciao, a.
Innanzitutto ti ringrazio per l'attenzione, purtroppo
a casa non ho scheda audio, e no posso provare, ma domani
faccio un est al lavoro per capire se quanto suggerito
mi risolve il problema.


 mi risolve il problema.
ok, fa' sapere.
dalla console il /t apre il semplice master, come il click sx sul tray, e
in taskman appare per un attimo il processo.
unica cosa, il master direi appaia dove vuole lui, forse dovresti beccare
il processo e incastrare la finestra in un punto preciso, seno' diventa
una caccia al tesoro :)


 ciao, a.


 ciao, a.
Allora, funziona perfettamente, c'è solo un'inghippo che non
riesco a risolvere.
La Form Popup del Master_Volume si apre esattamente leggendo
la posizione del Mouse_Pointer, ho provato a riposizionarla
con SetWindowPos, ma pare non gli freghi nulla.
In ogni caso questa era una pignoleria, direi che l'obiettivo
principale è raggiunto.
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Passare dati ad un form in modalità GET

Ho la necessità di modificare i dati di un form HTML che pare lavori in GET...
 
<FORM action=conf.htm method=get><INPUT TYPE=HIDDEN NAME=WEB_URL VALUE=/conf.htm>
Chi mi sa dare una mano?
In un vecchio post avevo trovato questo codice... ma non mi funziona!
va bene per la modalità GET?
Inoltre, se i valori della pagina sono più di quelli che passo, può creare problemi?
L'equivalente del 'Submit' come avviene?
Grazie a chiunque mi possa aiutare.
Edo
--------------------------------------------------------------------------
Private Sub Command2_Click()
    Const b As String = "Content-Type: application/x-www-form-urlencoded"
    Dim Dati() As Byte
    Dati = TraduciStringaInByte "WEB_URL=conf.htm&nome1=valore1&nome2=valore2")
    WB1.Navigate "
http://x.x.x.x/conf.htm
" ', , , Dati, b
End Sub
Public Function TraduciStringaInByte(s As String) As Byte()
Dim l_ByteArr() As Byte
Dim i As Long
ReDim l_ByteArr(Len(s) - 1)
For i = 1 To Len(s)
    l_ByteArr(i - 1) = AscB(Mid(s, i, 1))
Next i
TraduciStringaInByte = l_ByteArr
End Function
---------------------------------------------------------------------

 End Sub
WB1.Navigate "
http://x.x.x.x/conf.htm
?" & Dati
oppure prova con Naviage2
ciao

 ciao
Funzia! Thanks.
Edo

Newsgroup: it.comp.lang.visual-basic
Titolo: (INTERDEV) barre di navigazione

problemisimo con interdev...
dopo lo sviluppo di un sito perfettamente funzionane, con tanto di diagramma
del sito e link tutti a posto
come diamine è che le barre di navigazione di front page vengono
visyualizzate (in fase di progettazione) come oggetti VUOTI (il che non è
assolutamente simpatico) e in fase di browsing come inutili segnaposti
compresi tra parentesi quadre?
prego chiunque di darmi una spiegazione (nonchè una motivazione) per poter
portare avanti lo sviluupo con interdev
dimenticavo...sono un programmatore VB, se servono consigli (x quanto posso)
chiedete pure
CIAUZ

 wrote in message news:7ltqp9$1h0$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Lettura MP3 ID3v2 tag

Ciao a tutti.
Come faccio a leggere in VB/API il tag ID£v2 degli MP3?
Ho trovato degli esempi per il tag ID3v1.1, ma niente sulla v2 che sempbra
molto più complicata.
Qualche suggerimento?
Grazie
Potete rispondermi anche in mail? Grazie

Per ora... non mi sono ancora documentato... Credo che tu possa trovare
qualcosa sul sito 
http://www.winamp.cpm
Inoltre... :) IMHO credo che sia scritto press'a poco come la versione 1
perň all'inizio del file...
            Ciao
                Allanon
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come aspettare la fine di un "UpdateBatch" ?

Ciao a tutti !!
Ho scoperto qual'e' la causa di un problema che mi assilla da tempo...
E' il comando UPDATEBATCH che invio quando voglio aggiornare tutte le
modifiche fatte su un database. (mdb)
Pare che dopo aver inviato il comando, debba aspettare qualche secondo (da 2
a 5) prima di poter avere i risultati nuovi.
Ora mi chiedo.. come posso fare a dire al programma, che deve aspettare
qualche secondo prima di continuare ?
Esiste un evento che mi indica quando ha finito di aggiornare il DB ?
Grazie mille e alla prossima !!
DaVe
VB6 ; Win98

dichiara gli oggetti con la parola chiave withevents...
In questo modo avrai la possibilita' di intercettare tutti
gli eventi che i tuoi oggetti sollevano. Non ricordo
bene, ma ci sara' sicuramente l'evento che ti interessa!
Bye
Dario

Newsgroup: it.comp.lang.visual-basic
Titolo: 2 Quesiti

Ciao a tutti,
avrei due quesiti da porvi...
1) Ho una TextBox che quando viene premuto il tasto invio esegue una
routine. Subito dopo aver eseguito la routine viene emesso il tipico
suono di sistema. Come posso fare per eliminare questo suono?
2) Avrei bisogno che al primo avvio del mio programma esso legga una
stringa e la vada a scrivere nell'exe ed ai successivi avvii controlli
questa stringa.
Come posso fare???
Vincenzo Accardi
vin...@iol.it

...


...


Risposta al 2° quesito: l'unica posizione in cui puoi scrivere nell'EXE
senza rovinarti è quella contenente la caption del form principale. In fase
di progettazione scrivici qualcosa di ben riconoscibile (es. una ventina di
lettere 'X') e poi sovrascirivi in questa posizione, e occhio a non superare
la dimensione.
Così sono riuscito ad ovviare al problema...
Good luck!
Newsgroup: it.comp.lang.visual-basic
Titolo: Eventi KeyPress e KeyDown

Ciao ragazzi,
sulla mia MSDN Library (versione 6.0a) viene riportato che: "Un evento
KeyPress può includere qualsiasi carattere stampabile, qualsiasi
combinazione di CTRL con un tasto alfabetico o un carattere speciale, nonché
il tasto INVIO o BACKSPACE."
Ok, tutto corretto ma ho alcuni dubbi:
Ho un menu a tendina in cui c'è una scelta che si attiva (enabled = true)
solo in determinate circostanze ed è abbinata alla c<ombinazione
Ctrl+Carattere
Allora fino a che la scelta è inattiva riesco ad intercettare la
combinazione, nel momento in cui è attiva no! Come mai? Si tenga presente
che nel codice non è attivo nessun evento KeyDown.
Inoltre ho notato che se vi è presente anche un KeyDoen la KeyPress viene
bypassata. La KeyDown forse ha una prirità maggiore?
Spero di èssermi spiegato a sufficienza
Grazie a tutti

bypassata. La KeyDown forse ha una prirità maggiore?
KeyDown avviene prima, seguito da KeyPress, quindi da KeyUp.
Cosa intendi per bypassata?
-- 
ciao, hal


Ciao Hal,
cercherò di spiegarmi con un esempio:
Costruisco un Form (senza alcun controllo!!!!) e associo ad esso gli eventi
KeyDown e KeyPress come di seguito riportato:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If (KeyCode = vbKeyC) And (Shift = vbShiftMask) Then
        MsgBox (KeyCode & " " & Shift)
    End If
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
    If (KeyAscii = 65) Then
        MsgBox ("Tasto premuto shift + a")
    Else
         MsgBox (KeyAscii)
    End If
End Sub
Allora se io in fase di esecuzione faccio:
- Shift + a mi risponde correttamente la KeyPress
- Shift + tasto qualsiasi diverso da c mi risponde giustamente la KeyPress
- Shift + c mi risponde la KeyDown, MA NON CAPISCO PERCHE' NON MI RISPONDA
ANCHE LA KEYPRESS
in questo senso intendevo "bypassata"
ciao e grazie


Ciao Hal,


 ha scritto nel messaggio
news:KIcz8.31694$8D3.8...@news1.tin.it...



Ciao Scoglio,
grazie mille... giusta osservazione!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Formattare, Etichette di volume ed affini in VB5...........come?

Grazie per aver aperto il mio messaggio........
1- volevo sapere se esiste un qualche comando per formattare un dischetto ed
assegnargli un'etichetta di volume scelta da me....
2-come faccio a sapere quanto spazio libero c'è su un dischetto con il VB?
3-esiste qualche metodo per spezzettare un file di grosse dimensioni e
compresso in modo da farlo stare su + dischetti?
4-IT.COMP.LANG.VISUAL-BASIC GRAZIE DI ESISTERE!!!!!!! ;)
Alex
--
----Alex-----------------------------
| Ford Mondeo 1.8 16v SW Driver  |
| Ford.....una gomma avanti....          |
| ICQ : 13221809                                   |
|___________________________|

 2-come faccio a sapere quanto spazio libero c'č su un dischetto con il VB?


2-come faccio a sapere quanto spazio libero c'è su un dischetto con il VB?

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT]accedere al newsgroup

salve a tutti io accedo al ng da casa con 
powernews.libero.it
vorrei accedere anche dal lavoro dove però ho tin e su 
news.tin.it
 non
trovo questo ng
come posso fare? (prima che cambiasse da news a powernews dal lavoro ci
accedevo (almeno credo))
grazie a tutti ciao
Valerio

 ha scritto

http://news.cis.dfn.de/
ti devono dare login e pass, poi e' libero e ci arrivi da qualunque
connessione.

grazie domani proverň
javalab ha scritto:


 ha scritto nel messaggio
news:3C8695D3...@hotmail.com...

io ti rispondo da news.tin.it... 8-o
ciao. buc

 ha scritto nel messaggio
news:tbxh8.41533$_u5.1...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Perhe i miei file MDB sono gia compressi ?

Vedi Subject !
Antonio Tanzillo  
a...@pippo.netgroup.it
KillPippoforrepondez

...



http://www.isp.it
Ok, risolto l'archivio era cifrato. Non ho idea a cosa serve essere
cifrato visto che accesso lo apre tranquillamente. Forse standoci una
password .....
Antonio Tanzillo  
a...@pippo.netgroup.it
KillPippoforrepondez

Newsgroup: it.comp.lang.visual-basic
Titolo: Date in formato Giuliano

Ciao a tutti,
il mio problema e' questo vorrei fare una funzioncina VB che converta le
date in formato Giuliano (tipiche di Oracle) nel formato data supportato da
MsAccess, questo per evitare di dover fare una Query (Pass Through) di
selezione con il To_char(To_date(<data>,'J'),'DD/MM/YYYY') e poi le
successive elaborazioni che mi interassano.
Ce ne sono di gia' fatte oppure qualcuno sa come viene calcolato il numero
progressivo nel formato Giuliano, cosi' che mi possa costruire la funzione
???
 Grazie in anticipo
<LuigI>

 wrote in message
Z69_3.85868$s17.9...@typhoon.libero.it...


 wrote in message
81ef20$oo4$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ridurre a...

Salve a tutti, come si fà a mettere un programma sulla barra delle
applicazioni nello spazio vicino l'orologio (come ad esempio l'antivirus)?
Non so se sono stato chiaro, grazie anticipatamente dell'aiuto!!!

Usa la api shell_NotyfyIcon.
[Code]
'user defined type required by Shell_NotifyIcon API call
      Public Type NOTIFYICONDATA
       cbSize As Long
       hwnd As Long
       uId As Long
       uFlags As Long
       uCallBackMessage As Long
       hIcon As Long
       szTip As String * 64
      End Type
      'constants required by Shell_NotifyIcon API call:
      Public Const NIM_ADD = &H0
      Public Const NIM_MODIFY = &H1
      Public Const NIM_DELETE = &H2
      Public Const NIF_MESSAGE = &H1
      Public Const NIF_ICON = &H2
      Public Const NIF_TIP = &H4
      Public Const WM_MOUSEMOVE = &H200
      Public Const WM_LBUTTONDOWN = &H201     'Button down
      Public Const WM_LBUTTONUP = &H202       'Button up
      Public Const WM_LBUTTONDBLCLK = &H203   'Double-click
      Public Const WM_RBUTTONDOWN = &H204     'Button down
      Public Const WM_RBUTTONUP = &H205       'Button up
      Public Const WM_RBUTTONDBLCLK = &H206   'Double-click
      Public Declare Function SetForegroundWindow Lib "user32" _
      (ByVal hwnd As Long) As Long
      Public Declare Function Shell_NotifyIcon Lib "shell32" _
      Alias "Shell_NotifyIconA" _
      (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean
      Public nid As NOTIFYICONDATA
[/code]
ora non ho molto tempo per risponderti adeguatamente, ma se guardi nell'msdn
c'č l'esempio completo.
Ciao

Che Parola chiave devo mettere per trovarlo nell'msdn?
"Lasagni Matteo" <m.l4s4gni[N0R3PLY]@tutt0imb4ll0.1t> ha scritto nel
messaggio news:arnlh8$624$1...@fata.cs.interbusiness.it...


Io l'ho appena trovato per curiosità ricercando "Shell_NotifyIcon"
bye

 ha scritto nel messaggio
news:QnMD9.12737$2B1.3...@twister2.libero.it...


 Me lo potresti copiare qui il codice?
La prossima volta assicurati che il tuo pirata ti faccia una copia
_illegale_ anche di MSDN oltre a quella di VB.

Newsgroup: it.comp.lang.visual-basic
Titolo: DirectShow... qualcuno ha avuto esperienza?

salve a tutti...
dopo varie ricerche sono approdato a DirectShow per la riproduzione
degli MP3 (ho postato in precedenza su questo argomento... ma non
avevo ancora considerato DirectShow di DirectX).
Ho trovato alcuni esempi di come riprodurre un MP3, incluso la
gestione del volume del brano.
Mi servirebbe sapere come:
- durata del brano
- timer riproduzione
- possibilitą di rilevare il suono per poter creare un vu-meter
- possibilitą di rilevare il suono per determinare i silenzi.
come posso fare?
grazie a tutti.
ciao.

 - possibilitą di rilevare il suono per determinare i silenzi.
Questi no, perlomeno dalle directshow ed in modo semplice...
Perchč non pensare di utilizzare bass.dll?
http://www.un4seen.com/
-- 
IBM: Itty Bitty Mouse
News 2002 [v 2.07] / StopDialer / PopDuster - 
http://www.socket2000.com
Akapulce portal: 
http://www.akapulce.net
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO e Locking record

Qualcuno ha idea di dove trovare esempi di codice che spieghino l'uso di
locking dei record con ADO (SQLSERVER) e Visual basic?

 locking dei record con ADO (SQLSERVER) e Visual basic?
Onestamente credo che vi sia poco da sapere (in verità non lo credo ma lo
dico lo stesso)... una volta che apri un recordset applichi un blocco ai
record definito dal parametro LockType ...
Per gestire un record bloccato, devi eseguire l'operazione di update quindi
verifica la presenza di un errore e procedi di conseguenza : riprova o
annulla ...
Comunque esempi non saprei dove trovarli .. mi spiace ...
Ciao
    Davide

Newsgroup: it.comp.lang.visual-basic
Titolo: R: Fabrizio Galastro e la SELECT

 SSQLrep = "SELECT NOTE, DESCNC FROM notenonconfrpt WHERE NUMNC=" & numero
&
" AND REPNC= '" & reparto & "' AND ...
DATAAP = datavalue ('" & datadacercare & "');"
posso aggiungere che la data da cercare deve essere così:
"17/01/2001" (cioè in formato date), inoltre fai molto attenzione agli apici
e doppi apici.
ciao
Cristina

 wrote in message
94444t$c6ndc$1...@ID-61090.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Il valore di sender in una textbox

Ciao a tutti.
Come faccio a riportare il valore di sender relativo ad un delegate in una 
textbox?
Nella forma classica:
textbox1.text=sender
mi da errore.
Ciao e grazie.
StarryNight

 wrote in message 
news:45794deb$0$19094$4faf...@reader4.news.tin.it...


 textbox1.text=sender.tostring
Adesso funziona, ti ringrazio.
Ciao
StarryNight

Newsgroup: it.comp.lang.visual-basic
Titolo: Come collegare un controllo "drive" con uno "dir"?

Ciao
Come si fa a collegare un controllo drive con un controllo dir?
cioč: quando io cambio drive, la lista delle directory deve
aggiornarsi!!!!!!
E lo stesso con il controllo dir e file!
_________________________________________
Public Unita as string
Public Direc as string
Public File as string
__________________________________________
Private Sub Drive1_Change()
    Unita = Drive1
    ChDrive (Unita)
End Sub
__________________________________________
Private Sub Dir1_Change()
    Direc = Dir1
    ChDrive (Direc)
End Sub
__________________________________________
Come devo collegare questi due codici tra di loro?
Grazie.
ByeZ!
Alkondor

imposti opportunamente il controllo dir all'evento onchange (mi pare sia
quello) del controllo drive.
Magari i nomi dei metodi e degli eventi non sono quelli, ma il procedimento
si.

 E lo stesso con il controllo dir e file!
5 minuti fa' ho sentito Scotty (non gerry!) che mi ha detto:
"Fai cosi:
    sub drive1_change()
        dir1.path=drive1.drive
    end sub
    sub dir1_change()
        file1.path=dir1.path
    end sub
    e THA-DHA! tutto si aggiorna.....
    ah, capitano, a proposito dei chip isolineare ho bisogno ancora di 5
minuti!"
    bye bye Marco



Newsgroup: it.comp.lang.visual-basic
Titolo: Da VB6 a VB2008: eventi che cambiano nome

Salve,
ho appena cominciato a studiare il VB2008 e per impratichirmi un po'
sto realizzando piccoli esempi. Per cominciare sto scrivendo un
piccolo reminder. Non riesco ad associare il vecchio evento "Private
Sub Label1_Change()" del VB6 per intenderci, nella nuova sintassi.
Potreste darmi una mano?
grazie


evento TextChanged
In generale i nomi tendono a essere un po' piu' autoesplicativi (e
lunghi); hanno anche cercato di uniformare il più possibile per cui,
ad esempio, non hai più controlli che hanno .Caption e altri che
hanno .Text per descrivere sostanzialmente la stessa cosa, è diventato
per lo più sempre .Text


Ti ringrazio molto. Si può reperire in internet dei riferimenti
rapidi? Tipo: in VB6 si faceva così... in Vb2008 adesso eccetera.
grazie

 ha scritto nel messaggio 
news:727df7a4-a7d1-49f1...@d1g2000hsg.googlegroups.com...


Sull'MSDN di VB2008 c'è tutto.
mi pare basti premere F1
Newsgroup: it.comp.lang.visual-basic
Titolo: [BUG] Quicksort

tempo fa, in risposta a qualcuno che chiedeva aiuto riguardo come ordinare
un array di stringhe, avevo postato una sub di esempio, che implementava il
noto procedimento di quicksort;
ebbene (mea culpa, mea culpa) tale sub conteneva un paio di insidiosi bug;
sperando di far cosa gradita a tutti voi (e sperando di poter guadagnare il
perdono del newsgroup...) riposto qui di seguito il codice corretto;
bye
' esempio:
' per ordinare un array di stringhe X dalla posizione 1 alla posizione 10
' con verso crescente:
'   QuickSort X(), False, 1, 10
' per ordinare un array di stringhe X dalla posizione 0 alla posizione 100
' con verso decrescente:
'   QuickSort X(), True, 0, 100
Public Sub QuickSort(SortArray() As String, flgMode As Boolean, Low As
Integer, High As Integer)
    Dim RandIndex As Integer
    Dim i As Integer, j As Integer
    Dim Partition As String
    If (Low = -1) And (High = -1) Then
        Low = LBound(SortArray)
        High = UBound(SortArray)
    End If
    If Low < High Then
        If High - Low = 1 Then
            If Compare(SortArray(Low), SortArray(High), Not flgMode) Then
                Swap SortArray(Low), SortArray(High)
            End If
        Else
            RandIndex = RandInt(Low, High)
            Swap SortArray(High), SortArray(RandIndex)
            Partition = SortArray(High)
            Do
                i = Low: j = High
' ===> BUG                Do While (i < j) And Compare(SortArray(i),
Partition, flgMode)
                Do While (i < j) And Not Compare(SortArray(i), Partition,
Not flgMode)
                    i = i + 1
                Loop
' ===> BUG                Do While (j > i) And Compare(SortArray(j),
Partition, Not flgMode)
                Do While (j > i) And Not Compare(SortArray(j), Partition,
flgMode)
                    j = j - 1
                Loop
                If i < j Then
                    Swap SortArray(i), SortArray(j)
                End If
            Loop While i < j
            Swap SortArray(i), SortArray(High)
            If (i - Low) < (High - i) Then
                QuickSort SortArray, flgMode, Low, i - 1
                QuickSort SortArray, flgMode, i + 1, High
            Else
                QuickSort SortArray, flgMode, i + 1, High
                QuickSort SortArray, flgMode, Low, i - 1
            End If
        End If
    End If
End Sub
Private Sub Swap(x As String, y As String)
    Dim z As String
    z = x: x = y: y = z
End Sub
Private Function Compare(x As String, y As String, flgMode As Boolean) As
Boolean
    Compare = ((x < y) And (Not flgMode)) Or ((x > y) And (flgMode))
End Function
Private Function RandInt(Lower As Integer, Upper As Integer) As Integer
    Static flgYetInit As Boolean
    If Not flgYetInit Then
        Randomize Timer
        flgYetInit = True
    End If
    RandInt = Int(Rnd * (Upper - Lower + 1)) + Lower
End Function

 wrote in message
RpM54.765$m62....@news.infostrada.it...


 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione file guida

Ciao a tutti,
qualcuno conosce qualche programmino free per la scrittura dei file della
guida (.hlp .chm).
Grazie, Luca.

guida (.hlp .chm).
Microsoft HTML Help Workshop. Free e sul cd di VS o sul sito MS.
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 ha scritto nel messaggio:

Io ti consiglio windows help designer 3.6 la vers. trial la scarichi da
tucows (circa 7Mb se non sbaglio). E' qualcosa di eccezionale......io non
sono un guru come Moreno e gli altri.......ma mi son trovato benissimo.
ciao
e.

Newsgroup: it.comp.lang.visual-basic
Titolo: Password con un controllo Data

E possibile in un Controllo Data impostare una password di accesso al
database
Grazie Andrea

 database
Sů Connect scrivi:  ;pwd=La TuaPassword
Sů DatabaseName:  File.mdb
Sů RecordSource:  NomeTabella
Ciao, Angelo

 ha scritto nel messaggio
news:x5XO8.21896$j65.5...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [VBA] Report da Access

Premetto:
1. dovrebbe essere facile (e allora perchè non ci riesco?)
2. ho cercato su google ma non ho trovato granchè
Ho un report basato su una tabella righe vendite.
Possono esserci MERCI, SERVIZI o NOTE.
Se stampo una nota non devo vedere i campi qta, prezzo unitario, prezzo
totale...
(li mette a zero perchè fisicamente nella tab ci sono ma nel report non li
voglio)
come faccio?
Grazie mille,
Alex

come faccio?
Comincia col chiarirti le idee, formulando una domanda chiara e
precisa ;-)
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: download visual basic

Ciao a tutti,
vorrei sapere se è possibile scaricare da qualche sito visual basic, oppure
se sono obbligato a comprarlo, e quanto costa
Grazie

 ha scritto nel messaggio
news:w%W%7.14789$aD.5...@twister2.libero.it...

No creado esistano versione GPL o freeware (tipo il Dev-C++)
quindi PAGA!!!!
Il prezzo dipende dal "tipo".
www.microsoft.com/italy

 ha scritto nel messaggio
news:w%W%7.14789$aD.5...@twister2.libero.it...

MA SENTI QUEST'ALTRO!! MA SONO IO L'UNICO PIRLA CHE COMPRA LE COSE??
--
Starla. SP.
Sito Brutto: 
http://digilander.iol.it/starlasp
Sito Comune: 
http://www.it-lang-vb.net
star...@libero.itspam

 MA SENTI QUEST'ALTRO!! MA SONO IO L'UNICO PIRLA CHE COMPRA LE COSE??
Dai stai calmo!!!
Non sei l'unico(Per fortuna)!!!
Ciao
--
Timothy Redaelli

Esiste una versione "con limitazioni" la VB CCE...
Cerca cerca... ;)
                                Ciao
                                                        Allanon

 MA SENTI QUEST'ALTRO!! MA SONO IO L'UNICO PIRLA CHE COMPRA LE COSE??
3.600.000 VB5 Enterprise.
No, non sei l'unico.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
.
Però a me l'ha pagato la ditta :-PPP
Bye, G.

 wrote in message
w%W%7.14789$aD.5...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Attivazione tasto ESC

Ciao raga. tutto rego.?
Nel modulo che finalmente ho quasi finito (era l'ora) ho cercato di
gestire l'immissione dei dati da tastiera abilitando alcuni tasti che
possono velocizzare le operazioni dell'utente permettendoglidi non
abbandonare continuamente la tastiera per prendere in mano il mouse.
Ad esempio ho sistemato la tabulazione in modo che ci si possa spostare
con il tab, ed ho attivato il tasto di invio per confermare le modifiche
eventualmente effettuate sulle DBCombo e sulle TXTBox.
Ora però vi domando come diavolo deve funzionare la gestione del tasto
Esc?
Ho cercato di abilitarlo (associandolo ad un CmdButton) in modo che
premendolo, l'utente possa interrompere la routine di inserimento dei
dati, ma funziona solo se premuto sulla prima casella di testo, mentre
se ci si sposta sulla seconda casella di immissione già risulta non più
abilitato ed a quel punto si deve necessariamente clikkare sul CmdBox.
PPPPEEEEEEEEEEEERRRRRRRRRRRCCCCCCCHEEEEEEEEEEEEE'?
Grazie a chiunque mi aiutera a riemergere dal fango!
Ciaps.
Elisa.

...

probabilmente (penso) perche' la 1a casella di testo si chiama in un modo,
la 2a in un altro.
Mi spiego.
Se la 1a text si chima TEXT1 tu penso hai fatto :
Sub Text1_KeyPress(keyasii as integer)
       if keyascii = 27 then quellochedevofareconESC !!
end Sub
se la 2a si chiama TEXT2 devi fare la stessa cosa !!!! ossia all'evento
KeyPress devi mettere la stessa istruzione di cui sopra.
e cosi' via se hai 10 textBox chiamate in modo diverso.
Se invece hai un array di controlli TextBox che in questi casi e' la cosa
piu' logica e pulita allora vedi se fai un controllo sull'indice del
controllo prima di gestire la pressione del tasto ESC.
Fammi sapere come e' andata.
Ciao
Ven.

Ciao raga. tutto rego.?


 (alias Sgainz)
Grazie per la risposta. In effetti io ho fatto quello che tu mi
suggerisci, ma nonostante questo la pressione del tasto esc ha effetto
solo se mi trovo sulla prima casella di testo.
Sai dirmi perché ?
Elisa.

Ciao raga. tutto rego.?
Adesso sparo con il canone ai passeri.......
... e "subclassare" la gestione dei tasti intercettando la premuta del
tasto ESC?
Non chiedermi come si fa, impiego 15 giorni e due riformattazioni
dell'hard disk per ogni subclassamento  !  
Magari qualche anima piů pia e capace puň darmi conferma e darti
ulteriore aiuto !
Buon lavoro 
Marco Grignoli
sinfosofNO...@tin.it

Elisa.
Io non so darti spiegazioni: da me funziona.
Ho però un altro suggerimento:
prova a impostare la proprietà KeyPreview de form su True e ad intercettare la pressione del tasto
Esc nell'evento Form_KeyPress con
If KeyAscii = 27 then 'Il codice Ascii di Esc è 27
    'Quello che vuoi
End If
oppure nell'evento Form_KeyUp con
If KeyCode = vbEsc then
    'Quello che vuoi
End If
Ciao
    Diego

 ulteriore aiuto !
sito comune, modulo KeybAPI, l'ho postato oggi stesso :-)
-- 
Ale...@tiscalinet.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con VB

Salve,
da un pň di tempo ho il seguente problema con VB: Se creo un nuovo progetto con una normale form e del codice, quando lo vado a riaprire, non ho problemi nel rivisualizzare il codice, ma se tento di rivisualizzare la form, viene segnalato che VB ha cercato di scrivere in una pagina di memoria errata e si chiude tutto l\'IDE di VB.
Qualcuno sa da cosa puň dipendere? Personalmente ho pensato al fatto che possa essersi compromessa qualche DLL ma sde cosě fosse non saprei proprio come individuarla. C\'č qualcuno che puň aiutarmi?
Vi ringrazio anticipatamente.
Saluti,
Shumy
------------------------------------------------------------------------
Questo messaggio e' stato inviato tramite i Newsgroup di Punto
http://www.punto.it
------------------------------------------------------------------------

 Qualcuno sa da cosa può dipendere? Personalmente ho pensato al fatto che
possa essersi compromessa qualche DLL ma sde così fosse non saprei proprio
come individuarla. C\'è qualcuno che può aiutarmi?
Non vorrei dire str.....te, hai eliminato tutti i File.tmp?
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Seriale?

Ciao a tutti,c'č un modo x forzare alto il segnale di un singolo pin della
seriale (9 pin)?

 ha scritto nel messaggio
news:j5_08.31256$cU4.1...@twister1.libero.it...


seriale (9 pin)?
Che vuoi dire ? Ogni pin ha la sua funzione ...

Qualunque pin, basta che non sia RX e il GND

Newsgroup: it.comp.lang.visual-basic
Titolo: Mandare un messaggio ad un'applicazione

Ciao a tutti
Vorrei sapere come fare a mandare un messaggio ad una applicazione che
ho avviato da codice e di cui ho l'handler.
Nello specifico dovrei mandare un messaggio a WinAmp.
Sul sito dell NullSoft parlavano di una funzione SendMessage, ma non
sembra essere disponibile in VB 6.
Esiste qaulcosa di simile
Grazie a tutti
****************************************************************
Alphalund on the net:
Mailto:
Pge...@libero.it
Mailto:
go...@yahoo.com
http://crash.to/gerry
****************************************************************

Esiste qaulcosa di simile
Cerca la dichiarazione nel file Win32Api.txt
Ciao

 sembra essere disponibile in VB 6.
La SendMessage è un' API di Win32...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

Newsgroup: it.comp.lang.visual-basic
Titolo: conoscete il programma pic setup per definire delle mappe sulle immagini?

ho trovato questo programma, e mi permette di caricare un immagine e di
definire dei rettangoli, lui a fianco inserisce automaticamente una lista di
coordinate per ogni rettangolo da me creato sull'immagine, volevo sapere se
sapete come poi potrei usare queste coordinate in vb.
sapete come funziona? grazie.

Non conosco il programma, ma io ne ho sviluppato uno uguale...
Dove si trova il programma che citi?
E' un ActiveX c'è una demo da provare, sono molto curioso...
Grazie
Ciao