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

tengo una listview e ci voglio associare il file prova.rtf tramite il metodo
refresh come si fa?
--------------------------------
Inviato via 
http://usenet.libero.it

 metodo refresh come si fa?
Di che nazionalità sei?
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: delete record in tabelle collegate

ciao
mi potreste dire se e' corretto il seguente metodo:
ho tre tabelle  una gruppi  , l'altra nominativi e una dettagliogruppi
nei gruppi possono far parte dei nominativi e i nominativi possono far parte
di diversi gruppi
il mio problema e' :
quando cancello un gruppo di conseguenza devo cancellare ogni riferimento in
tabella dettagliogruppi dei relativi nominativi e quando cancello un
nominativo devo cancellare il riferimento nei gruppi (dettagliogruppi)
1 ) prima cancello tutti i riferimenti dei nominativi
eseguo una query del tipo
query = "delete from dettagliogruppi where gruppo = gruppocorrente "
ado.execute query
2) poi cancello il gruppo
ado.delete
cosi'  ogni tanto mi da' errore
se prima del ado.delete
inserisco ado.update, quindi salvo le modifiche e poi cancello il record
funziona.
e' giusto o devo procedere in altro modo
grazie mille

 e' giusto o devo procedere in altro modo
La seconda: Devi pubblicare un po' di codice e anche il codice/descrizione
dell'errore.

 ha scritto nel messaggio
news:kdrf9.7639$6O4.1...@twister1.libero.it...


 puoi suggerire?
Io tutta questa parte non l'ho proprio capita.
Comunque, tagliando la testa al toro.
A naso :-))))
Due modi Imho molto più rapidi per fare questa operazione.
O setti l'integrità referenziale DELETE ON CASCADE e a quel punto non te
ne
frega più una cippa di niente, fà tutto il motore del Db, oppure crei
una
stored procedure che richiami passandogli il nome del gruppo da
eliminare.
Ciao

 ha scritto nel messaggio
news:alupap$9v4$1...@fe2.cs.interbusiness.it...


 se setto l'integrita' referenziale (access) non mi creera' nessun problema
?
Se la usi correttamente no.
Imparare a quotare please!
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: programma nella systray che controlla query di Access

Salve a tutti, sto realizzando un piccolo programma vb interfacciato ad un
database access, il programma si mette in systray e ogni 1 secondo esegue un
controllo:
Il controllo che deve fare è controllare se una query del database non è
vuota inviare un msgbox a video.
il fatto è che devo connettermi al db attraverso stringa SQL con password
dal programmino VB e non è il mio forte, mi sapreste aiutare?
come controllare se non è vuota?
Grazie a tutti.


Con ADO:
Dim db As Connection
Dim rs As Recordset
Dim sql As String
     'apre la connessione al db
     Set db = New Connection
     db.CursorLocation = adUseClient
     db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security 
Info=False;Jet OLEDB:Database Password=miadatadinascita;Data source=" & 
PATH & ";"
     Set rs = New Recordset
     rs.ActiveConnection = db
     sql = "SELECT * FROM tabella "
     rs.Open sql, , adOpenStatic, adLockOptimistic
     If Not rs.EOF Then
	'ci sono dei record, visualizza messaggio
     end if
ciao
	maxx
P.S. Ovviamente ti consiglio di studiare un po' ADO. Sul sito comune 
c'e' un articolo interessante
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 controllo:
premesso che va bene come ti hanno detto.....
un "brividino" mi corre la schiena...ogni secondo fai fare una query ad
access?????tra aprire il db chiedere mostrare distruggere variabili e
chiudere programma......
ogni secondo sei sicuro?????
non ci sono altri sistemi?
:o?

 
A volte si impara di piu' sperimentando da soli i problemi ... :-)
	maxx


Metti a posto il tuo orologio, per favore. Voler stare in testa a tutti i
costi non è simpatico.
Anche il tuo nick non viene ben digerito dagli automatismi per la risposta.


non era per restare in testa, non me ne ero accorto.
Newsgroup: it.comp.lang.visual-basic
Titolo: ridimensionamento finestre

Salve a tutti,
ho un problemino di ridimensionamento delle finestre che vi vado subito a
spiegare.
Avete presente quei famosi banner pubblicitari che ti pagano i collegamenti
ad Internet? Bene, quando questi banner vengono attivati riescono
automaticamente a ridimensionarti la finestra del browser in modo che la
loro finestra si vada a mettere sotto e sia sempre visibile (come una task
bar), io vorrei fare una cosa simile.
Ho provato nel mio programma a far partire automaticamente Netscape con
"shell" in modalità attiva, ho quindi utilizzato "getactivewindow" nella
speranza di ottenere l'handle della finestra di Netscape, il problema è che
l'handle che mi ritorna non è quello di Netscape. Tale prova l'ho fatta sia
in fase di debug (in cui mi ritorna ovviamente l'handle della finestra di
VB) sia in esecuzione in cui non mi dà nessun handle. Qualcuno sa come
aiutarmi?
Ringrazio anticipatamente tutti quelli che mi sapranno dare una mano.
Ciao RemiX

prova con GetForegroundWindow invece che GetActiveWindow...
poi se vuoi fare la prova anche in debug fai partire il programma, riduci ad
icona VB, poi in un bottone scrivi:
WindowState = vbMinimized    'Cosě riduci ad icona la tua finestra
DoEvents    'Gli dai il tempo di ridursi
hWndInPrimoPiano = GetForegroundWindow
[ecc... ecc..     ecc...]
Ciao!
Faber

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

Salve a tutti.
Sto scrivendo un programma che gestisce la posta elettronica, tipo outlook.
Fin'ora ho sviluppato la parte che scarica l'email dal mail server,
la domanda è..
Come faccio a interpretare le diverse codifiche, tipo quoted-printable.
Ci sono delle procedure o qualcosa di simile per interpretare il codice
scaricato dalle email?


Esistono specifiche RFC.
Basta attenercisi, e grossomodo si fa tutto.
Ciao
Alberto
-- 
Rigore è quando arbitro fischia

Magari esiste qualche sorgente già fatto?
per prendere spunto.
"Albe V°" <vaccariTOGLI_QUESTO@TOGLI_QUESTOhotmail.com> ha scritto nel
messaggio news:AUtib.31131$vO5.1...@twister1.libero.it...


> > codice scaricato dalle email?
Sto scrivendo un server mail con Visual Basic con suddivisione del contenuto
delle mail per estrapolare gli allegati.
Mandami una mail a negus@negusweb così mi ricordo di inviartelo (perchè il
sorgente non ce l'ho a casa).
-- 
Ciao,
        Fabrizio
<=- 
http://www.negusweb.it
 -=>

 ha scritto nel messaggio
news:r8cgmb...@192.168.1.1...


Salve qualcuno può indicarmi dove trovare specifiche o sorgenti per
interpretare le email scaricate nelle diverse codifiche

 interpretare le email scaricate nelle diverse codifiche
la mia email è 
ne...@negusweb.it
Ho provato a mandarti il sorgente a 
job...@libero.it
 ma mi dice "mail
full".

Newsgroup: it.comp.lang.visual-basic
Titolo: Eco e seriale

Ciao a tutti.
Come da oggetto il mio problema riguarda la porta seriale e il controllo
MSComm.
Ho sviluppato delle routine per ricevere dati da seriale e tutto andava bene
finchè non è entrato in gioco l'eco..
Ossia ho un ritorno del comando dato (ma questo è il minimo) e dei dati
"sporchi", cioè con dei bit che nn c'entrano nulla con il dato che mi
aspetto.
Qualcuno ha una vaga idea di come fare per risolvere il problema ?
Ringrazio anticipatamente ciao
Simone

 ha scritto nel messaggio
news:JEE97.76320$Pb6.4...@news1.tin.it...


 finchè non è entrato in gioco l'eco..
C'e' un apposito comando AT per disabilitare l'eco del modem.
-- 
Samuele Battarra
mail server: 
libero.it
, indirizzo: battarsa@(mail server)
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/leggiminews.html

 wrote in message
dOF97.1376$_07....@news.infostrada.it...



Ti ricordo che MSComm ha due modi di lavorare, uno se hai solo
testo da trasferire, e l'altro se hai anche dati binari.
Dacci maggiori informazioni.
Ciao
Sir Jo

 wrote in message
9kb5n6$pdd$1...@pegasus.tiscalinet.it...


.RTSEnable=False
non dai il tempo alla coda di svuotarsi e "chiudi" la linea mentre sta
uscendo la coda del messaggio.
Soluzione:
nell'evento di MSComm1, devi intercettare lo stato di "coda di trasmissione
vuota" (guarda l'help di VB, c'e' un esempio con tutti i casi) e SOLO li'
chiudere l'RTS.
Inoltre ti consiglio di aggiungere un carattere "DUMMY" in fondo al tuo
pacchetto (chr(2) sta' per STX, chr(3) per ETX, quindi chi riceve il
pacchetto sa dove inizia e dove finisce).
Il carattere DUMMY (che puo' essere anche un carattere chr(32) ) potrebbe
anche essere TAGLIATO ma sarebbe ininfluente sulla comunicazione.
Spero di esserti stato d'aiuto.
Cia'
--
Fab, kay...@genie.italy (change italy with it to answer via email!!)

 Questo succede solo con una rete di macchine e non con una sola macchina.
Che tipo di rete è ? Può darsi che più di una macchina trasmetta
contemporaneamente
e quindi i dati si sovrappongano.
Usi un sistema di rete RS-422 o che cosa ?
Non mi risulta che la RS-232 permetta di fare una rete.
Ciao
Sir Jo - Automazioni Industriali snc
Newsgroup: it.comp.lang.visual-basic
Titolo: Screen Saver ?

Come posso compilare uno Screen Saver   SCR ???
Rinominando l'EXE in SCR.
se vuoi sapere come si fa uno screen saver guarda a:
http://www.geocities.com/SiliconValley/Lakes/1218/screen.html
Ciao
Stefano - 53.6%
gl...@eponet.it
http://www.geocities.com/SiliconValley/Lakes/1218
(programmazione VB 32 bit)
Quake Nickname: The-Nerd

Come posso compilare uno Screen Saver   SCR ???
Sembra uno scherzo ma non lo e': basta compilarlo in EXE e poi
rinominarlo!
Nella parte che dice "Application Title" metti SCRSAVE prima del nome
dello Screen Saver.
Se hai bisogno di altre informazioni, fatti sentire.
    __  ___ ____ _        _____
   /  |/  // __ `/  _____/ ___/ ____
  / /|_/ // /_/ /  / ___/ /__  / __ \
 / /  / / \__,_/  / /   \___/ / /_/ /
/_/  /_/         /_/          \____/
Vincenzo   Carnazzo
--
"Andreotti e' Andreotti. Questo basterebbe per inchiodarlo" - Ellekappa
--
http://www.geocities.com/SouthBeach/Marina/9922

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione DecHex

Salve,
ho un problema che non riesco a risolvere.
Ho un contatore in decimale che
incrementato mi deve passare il suo valore
trasformato in Hex. Se uso il comando di conversione Hex(stringa),
si presenta un problema quando il valore supera
una certa soglia (&HFFFFFF) (Overflow)..
Io devo usare valore che in Hex possono arrivare fino a
(&HFFFFFFFFFFFFFFFF).Come posso fare??
Come si incrementa di 1 un valore Hex???..

 ho un problema che non riesco a risolvere.
cut
http://www.valturio.it/docenti/adeghe/sistnum.htm
e ti fa una tua piccola funzione!

Newsgroup: it.comp.lang.visual-basic
Titolo: colorare riga Dbgrid

Ciao e grazie e per l'attenzione
io ho bisogno di due grossi favori...
come faccio a run-time a colorare una determinata riga di una Dbgrid?
e inoltre è possibile aggiungere ad una Dbgrid Bound una riga
che faccia la somma dei prezzi di una colonna e se si quale è il codice?
CIAO A TUTTI E buone VACANZE!!

Puoi fare un'altra tabella appoggio con ulteriori campi per i totali: lě ci
trascrivi i tuoi dati ed anche i totali calcolati che vuoi e su questa
tabella attivi una dbgrid che visualizzerai.Non so se esistono anche metodi
piů semplici, perň!
Giorgio

Newsgroup: it.comp.lang.visual-basic
Titolo: [~OT] forum in .NET

L'ho visto solo oggi: 
http://www.dotnetbb.com/
A prima vista non è niente male.
Peccato che il Sito Comune non supporti (per ora) .NET :)
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 L'ho visto solo oggi: 
http://www.dotnetbb.com/
Come non detto: il nome mi ha tratto in inganno, invecie è a pagamento. :(
Ciao

 Peccato che il Sito Comune non supporti (per ora) .NET :)
Ma certo che si invece... c'č pure la categoria (l'ho aggiunta io a suo
tempo)... e adesso pure il WM che puň testare direttametne i sorgenti! :P

> Come non detto: il nome mi ha tratto in inganno, invecie è a pagamento. :(
Credo di aver visto, gratis, i sorgenti del forum di 
www.asp.net
, sul sito
stesso
Certo, forse non ha tutte quelle funzioni...
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb.net] Gestione di assembly e progetti

Ho un po' di confusione in testa su assembly e progetti.
Ho capito che in un assembly ci possono essere più progetti, ma che succede
poi con la distribuzione del pacchetto di setup? Il setup che genero é unico
per tutti i progetti dell'assembly o no?
In particolare, devo sviluppare una piccola applicazione che gestisca gli
aggiornamenti dell'applicazione principale: un piccolo programmino che, in
uscita dall'applicativo (ma si potrebbe usare anche in avvio) vada a vedere
se in una directory é presente una nuova versione e, nel caso, la installi
in automatico.
Per fare questo avevo pensato di aggiungere un nuovo progetto nello stesso
assembly dell'applicazione principale, ma non mi é chiaro cosa succede
dopo....
ciao e grazie
GigioTD
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Anche se non vero al 100% Assembly=Progetto semmai e' la Solution che e' 
composta da piu' progetti.
Quindi nel tuo caso avresti una singola Solution composta da vari progetti 
(exe o/o dll)
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://blogs.ugidotnet.org/corrado/

 (exe o/o dll)
e sul setup mi sai dire qualcosa?
Ciao e grazie


Newsgroup: it.comp.lang.visual-basic
Titolo: OT: Stored Procedure

Un saluto a tutti del Gruppo,
Credo che qui c'e' qualcuno che mi possa dare una mano:
Vorrei delle indicazioni sulle stored procedure con sql server 7
- Libri
- link sia in italiano che in inglese
e quant'altro si possa trovare.
Grazie anticipatamente per la risposta

 ha scritto nel messaggio
news:PujE7.25994$7A4.1...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Approssimare i numeri...

Salve a tutti,esiste qualche metodo per approssimare delle valori con la
virgola? Ho dei valori tipo : 2,865  e vorrei approssimare i valori per
eccesso o per difetto.In questo caso a 2,9 ,nel caso di 2,835 approssimare a
2,8,è possibile?
Saluti

Prova:
X=Cint(X/Passo)*Passo
Dove ovviamente X è il tuo numero e Passo è il valore "approsimante"
Es.
X=2.835
Passo=0.1
Cint(X/Passo)=28
X=28*passo=2.8
X=2.875
Passo=0.1
Cint(X/Passo)=29
X=28*passo=2.9

 esiste qualche metodo per approssimare delle valori con la virgola? Ho dei
valori tipo : 2,865  e vorrei approssimare i valori per eccesso o per
difetto.In questo caso a 2,9 ,nel caso di 2,835 approssimare a 2,8,č
possibile?
Piu` che di "approssimare" generalmente si parla di "arrotondare". Cosi` e`
anche piu` facile trovare la funzione sulla guida (VB6): Round. Che opera un
arrotondamento *matematico*; proprio quello che sembra servirti. Tra
parentesi, "per eccesso" e "per difetto" sono termini che si usano in
contrapposizione a questo tipo di arrotondamento.
    Round(2.865, 1) ' Risulta: 2,9
    Round(2.835, 1) ' Risulta: 2,8
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Code 39 dal sito comune.

Ciao a tutti! ^_^
Ho scaricato dal sito comune il font per stampare barcode in code 39, ho
stampato qualcosa ed ho cercato di farli leggere a dei lettori Symbol.
Niente da fare. Secondo il lettore c'e' qualche errore di formato. Qualcun
altro ha fatto dei test? Magari si deve iniziare o finire la stringa con
caratteri particolari? Oppure passare prima per una funzione di
trasformazione come nell'esempio sull'EAN 13 (che tra l'altro funziona
egregiamente).
Bye.
Teo

 stampato qualcosa ed ho cercato di farli leggere a dei lettori Symbol.
il codice 39 prevede che all'inizio ed alla fine della stringa ci sia il
carattere * (asterisco)
questo carattere non viene restituito nella lettura, serve solo come
delimitatore
ciao

 ha scritto nel messaggio
news:E_nU8.33338$vm5.1...@news2.tin.it...

Non riesco a scaricarlo dal SC potresti inviarmelo (se non ti causa troppo
disturbo), mi interessa. Graze mille in ogni caso :-)
--
Ciao
   Sharkman
-----------------------------
Rimuovere NOSPAM per risposte

 ha scritto nel messaggio
news:afu5im$4d7$1...@newsreader.mailgate.org...


 ha scritto nel messaggio
news:lnzU8.28930$Jj7.7...@news1.tin.it...



[CUT]
A me gli asterischi neppure li stampa :-(
Sicuro di aver inserito gli asterischi? Come hai fatto?


 ha scritto nel messaggio
news:tyzU8.100927$j65.2...@twister1.libero.it...



[CUT]
Noterai che non ti rappresenta gliasterischi..
Ma qualcuno è mai riuscito a farlo funzionare (io sto sotto W2K)


 ha scritto nel messaggio
news:E_nU8.33338$vm5.1...@news2.tin.it...


 anche lo spazio (il primo no).
Che ne dici di inviarlo al Sito Comune, chedendogli magari (giustamente) di
eliminare il vecchio che non va e mettere al suo posto questo??  (sennņ il
font sul SC rimane una trappola per altre persone)
Ciao
Ettore Maronese, il Mes

 anche lo spazio (il primo no).
[CUT]
A me non funzionano :-(


 eliminare il vecchio che non va e mettere al suo posto questo??  (sennò il


 ha scritto nel messaggio
news:tkEU8.102273$j65.2...@twister1.libero.it...


 Teo
[CUT]
Nel senso che il lettore non me li legge. A te dimensione hai impostato i
font? Il grassetto è attivo?
A me non va ancora...


 ha scritto nel messaggio
news:zoGU8.102235$Kt3.2...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: API ... queste sconosciute

Vorrei sapere se esiste un'API che mi restituisca le dimensioni dei margini
della stampante predefinita;
se non esiste niente di simile com'è possibile stampare esattamente al
centro del foglio ???
Grazie per l'attenzione
Dante Capra

...

Premetto che la risposta era di Walter Colonna.
------------------------------------------------------------------
Public Declare Function GetDeviceCaps Lib "gdi32" (ByVal hdc As Long, ByVal
nIndex As Long) As Long
' Utilizzate per GetDeviceCaps
Public Const PHYSICALWIDTH = 110                         ; dimensione del
foglio
Public Const PHYSICALHEIGHT = 111
Public Const PHYSICALOFFSETX = 112                   ; punti non stampabili
Public Const PHYSICALOFFSETY = 113
anche se bisogna fare delle conversioni sul risultato in quanto ritorna un
valore espresso in numero di punti e quindi bisogna convertirlo nell'unità
desiderata tenendo conto della risoluzione impostata sulla stampante
(printer.printquality) oppure, per ottenere le dimensioni in twips puoi fare
la proporzione con le dimensioni del foglio espresse nell'oggetto printer.
margDX = GetDeviceCaps(printer.hdc, PHYSICALOFFSETX) * (printer.width /
GetDeviceCaps(printer.hdc, PHYSICALWIDTH))
-----------------------------------------------
Ciao Marco.

Newsgroup: it.comp.lang.visual-basic
Titolo: Operazioni con le matrici

Esistono Librerie/DLL  che mi permettono di eseguitre operazioni con le
matrci (prodotti,inversione...)?
Grazie!

 writes:
M> Esistono Librerie/DLL  che mi permettono di eseguitre operazioni con le
M> matrci (prodotti,inversione...)?
Matlab :) :) ?
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )

 Grazie!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] come intercettare il pulsante X?

ho un programmino.. se lo voglio chiudere ho 2 modi:
- con il menů esci...-> mi esegue una funzione
- con il pulsante in alto a dx, la X per intenderci che vb chiama Control
BOX... che perň non riesco ad intercattare
io vorrei che anche quando clicco la X mi eseguisse la funzione.
(la X ci deve essere!!)
grazie caccamo81

C'era un POST di ieri identico...ti rifilo la risposta identica:
Vai nelle dichiarazioni del FORM del quale vuoi disabilitare la X e scrivi:
Const MF_REMOVE = &H1000&
Const SC_CLOSE = &HF060
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long,
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal
nPosition As Long, ByVal wFlags As Long) As Long
Vai nel Form_Load e scrivi:
        Call RemoveMenu(GetSystemMenu(Me.hwnd, 0), SC_CLOSE, MF_REMOVE)
Funziona....ho provato adesso
Gianni Moretti

 ha scritto nel messaggio
news:9868qk$hf18$1...@ID-77941.news.dfncis.de...


 ha scritto nel messaggio
news:3Jxp6.117879$Y93.2...@news.infostrada.it...


Ok..allora vai nell'evento Unload del form e scrivi la tua funzione...e nel
caso vuoi annullare l'uscita setta il CANCEL=TRUE.
Gianni Moretti

 ha scritto nel messaggio
news:9869f5$h248$1...@ID-77941.news.dfncis.de...


 stesso i migliori... :-P
Grazie della stima :-) Perň funzionava uguale...perchč TRUE č diverso da
zero! :-)
Gianni Moretti

caso vuoi annullare l'uscita setta il CANCEL=TRUE.
]zac[

 aveva gia' eseguito le operazioni di chiusura).
Hai provato anche usando QueryUnload? viene scatenato prima di Unload, non so se
cambia qualcosa per il datacontrol....
Ciao
--
Luca Dormio
luca....@tin.it

Credo di si, ma sono fatti un po' lontani, poi ho preso una decisione, ciao
ciao datacontrol e ma vieni classe clsGestData (scritta da me medesimo).
Salve
            Dbg
Luca Dormio ha scritto nel messaggio


 ha scritto nel messaggio
news:lyxp6.117772$Y93.2...@news.infostrada.it...

Il parametro UnloadMode della QueryUnload non va bene?
Da MSDE:
L'argomento unloadmode restituisce i seguenti valori:
Costante Valore Descrizione
vbFormControlMenu = 0 =Č stato scelto il comando Chiudi dal menu di
controllo del form.
vbFormCode = 1 =L'istruzione Unload viene richiamata dal codice.
vbAppWindows = 2 =La sessione corrente dell'ambiente operativo Microsoft
Windows č conclusa.
vbAppTaskManager = 3 =L'applicazione č stata chiusa tramite Task Manager di
Microsoft Windows.
vbFormMDIForm = 4 = Il form secondario MDI viene chiuso in quanto viene
chiuso il form MDI principale.
vbFormOwner = 5 = Il form viene chiuso in quanto viene chiuso il
proprietario
Scusa la formattazione
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic IN OUT

Dovendo pilotare e ricevere dei dati da una scheda su Bus vorrei sapere come
posso realizzare tale programma con visual basic visto che non riesco a
capire quale insieme di istruzioni utlizzare.
Ogni aiuto sarą gradito.
Grazie
Michele

Ogni aiuto sarą gradito.
Non ricompensato? Allora ritiro tutto quello che ho detto e non ti aiuto piu
:-))  (scherzo ovviamente)
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: VB3 Pro e OS2

Possiedo VB3 Pro e ho sviluppato alcuni prg in win 3.1 win 3.11 for
workgroup e win 95 sarei interessato a creare l'eseguibile per  OS2.
E' possibile effettuare questa operazione? se si come?
Ringrazio
Marco  
icv...@box1.tin.it

E' possibile effettuare questa operazione? se si come?
Devi usare Visual Age della IBM !!!
In pratica, ti procuri V-Age, apri il progetto .MAK, lo compili con il
compilatore della IBM e il gioco è fatto.
Saluti......
Carlo ZICCARDI

VB (qualunque versione) non è in grado di generare eseguibili OS2
Ciao
Corrado


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

Due to a couple of misfortunes I have lost the source code for a
application I have been working on, but I do have the exe. does anyone know
about a utility that will generate the source code from a exe....I know its
a long shot but would really appreciate any help
Brett McClintock	
bmccl...@dunavant.com.au
 

Dunavant Australia ha scritto nel messaggio
<01bd0214$9e706750$01b33ecb@dvt_aus>...

I know there is a Decompiler (for VB3 only) and it works!
But I've never tried it.
Art.

Newsgroup: it.comp.lang.visual-basic
Titolo: digitalizzatore vocale

è possibile secondo voi far leggere a visual basic vocalmente lettera per
lettera il contenuto di una text box?
se per esempio scrivo la parola MARCO secondo voi è possibile fare in modo
che il computer magari atteraverso un ocx
legga la parola MARCO e se scrivo STEFANO pronunci vocalmente la parola
STEFANO?
Grazie a tutti .

 che il computer magari atteraverso un ocx...
io ne ho fatto uno, ma ce n'è uno della microsoftcerca sapi o text to speech o
tts
io l'ho provato e la voce è abbastanza buona ma ti avverto se gli dai una
decina di parole si blocca (almeno sul mio pc) (il mio no.)
ciao Valerio

 se per esempio scrivo la parola MARCO secondo voi č possibile fare in modo


 > se per esempio scrivo la parola MARCO secondo voi è possibile fare in modo



Saro' ciocco ma non lo trovo mica sto coso, qualcuno m ida un link?
ciao
Luther

prova alla microsoft o cerca con google


Caisco che uno non debba avere la robba servita sul piatto ma almeno impara
un po a quotare meglio, sarebeb gradito al tutto il ng.
Comunque ho trovato gracce a chi serve posto il link se me lo chiede.
Ciao
Luther

Newsgroup: it.comp.lang.visual-basic
Titolo: ZIP files

Salve!
Dove posso trovare una DLL (e relativa documentazione) per
decomprimere files ZIP da utilizzare in una applicazione VB5?
Grazie...
See ya soon!
    <<  The Avatar  >>
    <================>
    <ICQ UIN: 3129019>
 
 
the.a...@deathsdoor.NOSPAM.com
    Remove NOSPAM to get the correct E-Mail address.
    Homepage: 
http://www.pclinkclub.com/personal/avatar

...



Forse qui puoi reperire qualcosa di utile:
http://www.cdrom.com/pub/infozip/zlib/
Hi, Ciao
Ettore  dal lavoro               By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Come colorare il testo in text-box?

Come si fa a colorare una parola scritta in un box di testo?
In passato non era possibile, il colore era valido per tutto il testo, con
le nuove versioni č cambiato qualche cosa?
Grazie e saluti, Vittorio


usa la Rich Edit
Newsgroup: it.comp.lang.visual-basic
Titolo: Query: Aiuto (URGETNTE)

Ciao a tutti
ho un file access con delle query salvate nella cartella query
Una di queste, ad esempio, č programmata in modo tale che cambiando il
record di una prima tabella, intercetti gli stessi valori in altre tre
tabelle e produca un recordset con un mix di campi (divisi tra le
diverse tabelle)
Come faccio a usare questa query?
Ad esempio:
se la apro usando il comando
set myrec = dbs.openrecordset("MYQUERY")
quanto il record nella prima tabella si sposta la query non viene
aggiornata e  il contenuto resta invariato.
Devo eseguire nuovamente tutta la query con il comando SELECT.... ecc
o esiste qualcosa di piu' semplice?
E' da notare che le ho provate tutte con il metodo requery, ma non
riesco ad aprire quella maledetta query come se fosse un oggetto di
tipo querydef, la apro solo come recordset e allora il requery non va.
Grazie a tutti
Attilio

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Funzioni e passaggio di parametri per valore e riferimento

Salve, guardate la dichiarazione dell'API GetWindowsDirectory:
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias _
"GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As
Long
La variabile del primo parametro, dopo che la funzione viene eseguita, viene
modificata anche se nella dichiarazione è esplicitamente passata per valore.
Non è un controsenso?
Grazie

 Non è un controsenso?
Non proprio, perchè in realta VB converte quel byval As String in un 
puntatore alla stringa.
Infatti sei tu che devi preoccuparti di allocare la stringa e di dirgli 
quanto è grande lo spazio allocato.
Ciao

 Ciao
ciao

 ha scritto nel messaggio
news:rbD5b.11882$hE5.4...@news1.tin.it...

Per dirla molto brevemente, e' una conseguenza della differenza tra il
formato stringa LPSTR accettato dall'API di Windows (o dalle DLL di terze
parti, quando anch'esse sono scritte in C/C++) e il formato stringa BSTR di
VB.
Laddove la funzione si aspetterebbe il puntatore all'array di caratteri,
usando ByRef passeresti invece il puntatore *al puntatore* all' array di
caratteri...
Tra i tanti, una lettura interessante la trovi su MSDN fornito con VB6 sotto
'Book Excerpts\Win32 API Programming with Visual Basic\Chapter 6: Strings';
lo trovi anche sugli MSDN piu' aggiornati con un percorso leggermente
diverso, prova a fare una ricerca...
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown


Grazie della dritta, andrň a dargli un'occhiata!
P.S. Ritorno al futuro rulez ;)

Newsgroup: it.comp.lang.visual-basic
Titolo: Libreria di pulsanti?

Dove posso trovare pulsanti di comando grafici?
Grazie e ciao a tutti.
--
Mauro

 ha scritto nel messaggio
news:94ruto$ljt$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] AIUTO dblclick WebBrowser

Ciao
AIUTOOOO!
� possibile intercettare il doppio click in una pagina webbrowser per 
memorizzare una variabile come gi� faccio con una txt?
Non trovo nessun comando al proposito.
GRAZIE!

"ApipApip" <As...@chiedime.lo> ha scritto nel messaggio 
news:4aa2dddf$1...@news.x-privat.org...

... Per memorizzare in una variabile quello che clicko come gi� faccio con 
una txt?...
Proprio nessuno mi potrebbe aiutare???
GRAZIE MILLE!

 GRAZIE MILLE!
Ma cosa credi che abbiamo la bacchetta magica?
Se non si pu� fare... non si pu� fare!
MA VA' A CAGARE!!!
-- 
Ciao Fede
By Chicco Production
http://bcp.freetools.it

 MA VA' A CAGARE!!!
Beh, una risposta del genere comunque non va data.
L'OP ha atteso 4 giorni prima di chiedere nuovamente aiuto... mi sembra 
si sia comportato correttamente. Tralaltro l'ultimo messaggio risale a 5 
giorni fa.
Nicola

 GRAZIE MILLE!
Per il resto tutto OK.. ignoranza inclusa!


> E' questa risposta seccata che non mi st� bene:
E noi tutti dovremmo accettare la tua modalit� leggendo quanto scrivi?
Da che pulpito.... ma certo che se hai problemi personali di vita sfogateli 
pure senza problemi.
La mia domanda � stata corretta, educata e non diretta a te.
La tua direttamente offensiva e oltremodo maleducata.
Ma pensi che me la prenda se un poveretto si sfoga per altri suoi problemi 
esistenziali?
Comunque per il lettore intelligente, ci sarei riuscito in modo empirico 
spostando l'html in una txt e lavorandola da l� col dblclick della TXT in 
una richtbox!
Farla direttamente sarebbe stato meglio, ma almeno una soluzione l'ho data.
La tua soluzione... beh.. lascia perdere sei gi� in PLONK.
Ti rimando alla tua povera, infantile nonch� puerile arroganza da 
saputello....
Certo che quando ti svegli al mattino qualche problema nella vita te lo 
porti dietro!
BRAVO! Hai vinto tu!
Hahaha!
roba da matt!
ROTFL :-(

Chi di spada ferisce...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Descrizione parametri

Come si fa, in VB 6 e/o .NET, ad inserire le descrizioni dei parametri delle
proprie funzioni?
Esempio (la funzione MsgBox di 
VB.NET
):
PROMPT: String expression displayed at the message in the dialog box.
Grazie

 ha scritto nel messaggio
news:NNaF8.73508$US3.1...@twister1.libero.it...

VB6:
Strumenti / Attributi routine / Descrizione
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta Aiuto per Esperti

se devo far apparire in una maschera, i dati  contenuti nella tabella pippo
del database Dati, che si trova in c:\,  con questa riga funziona
Me.RecordSource = "SELECT  * FROM Pippo IN 'C:\Dati.mdb'"
Ma se il database č protetto da password, allora non funziona piů, c'č
qualcuno che mi saprebbe dare il codice per ottenere il solito risultato?

Ciao, conviene creare prina una connessione dove puoi immettere username e
pwd, e poi tramite un recordset (che fa riferimento a tale connessione)
tirarti giů i dati da visualizzare.
Se usi un DB Access va benissimo una connessione RDO.
Bye
--
Tango
www.af.mil
ICQ: 35463931
Newsgroup: it.comp.lang.visual-basic
Titolo: un dubbio

In VB č necessario inizializzare le variabili prima di usarle come si fa in
C?
Mi spiego meglio: nei manuali C e C++ si raccomanda di inizzializzare le
variabili prima del loro uso perchč dopo la loro dichiarazione il loro
contenuto č imprevedibile e perciň non č detto che contengano 0 o NULL. In
VB č la stessa cosa o č l'IDE stesso ad occuparsi dell'inizializzazione
delle variabili?

delle variabili?

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

Salve a tutti.
Ho iniziato a studiare e a lavorare con il mico ST7, prendendo spunto dalla
rivista Nuova elettronica.
Chi conosce gia' le caratteristiche del predetto micro ?
In particolare il modello "Lite".
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 
Prova a chiedere informazioni ad OT!
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 In particolare il modello "Lite".
E' fantastico, piccolo e lucente, non si lascia programmare in VB, ma fa lo
stesso, quando ne parlo col giornalaio faccio un figurone.

Newsgroup: it.comp.lang.visual-basic
Titolo: sms repost

riposto perche la prima domanda è andata... inevasa... :))
forse sara gia stato chiesto, ma io ho qualche dubbio...
come è possibile mettere su un sito un piccolo servizio che consenta di
mandare sms gratuiti?
il dubbio riguarda tutti quegli OCX che dicono di mandare sms... ma c'è
bisogno di "appoggiarsi" cmq a qualche altra azienda "esterna", oppure no?
insomma, vorrei capire il meccanismo con cui viene mandato un sms da una
pagina web.
grazie
Mario

 mandare sms gratuiti?
Probabilmente non hai ricevuto risposta perché negli ultimi giorni ci sono
stati parecchi messaggi sull'argomento. Cerca internamente al NG.
Ciao,
Carlo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Inviare tasto asterisco ?

Come faccio a simulare la pressione del tasto * (asterisco) in un altro
programma ?
Ho provato con SendKeys, ma non funziona perché il programma destinatario
vuole proprio il keycode dell'asterisco del tastierino numerico...
Ho provato anche con l'API SetKeyboardState, ma sbaglio qualcosa perché
quando la richiamo mi chiude direttamente VB...
Qualche idea ?
Grazie.
Roby.

 wrote in message 844sir$bat$1...@nslave1.tin.it...

Puoi provare l'API keybd_event.
Un codice che dovrebbe funzionare è questo:
______________________
' Inserire nella sezione Dichiarazioni di un Form
Private Declare Sub keybd_event Lib "user32" _
     (ByVal bVk As Byte, ByVal bScan As Byte, _
     ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C
Private Const VK_CONTROL = &H11
Private Const VK_DELETE = &H2E
Private Const VK_MENU = &H12
Private Const VK_ESCAPE = &H1B
Private Const VK_SHIFT = &H10
Private Const VK_OEM_PLUS = &HBB
Private Const VK_MULTIPLY = &H6A ' asterisco del tastierino numerico
______________________
Per il codice di altri tasti puoi vedere qui:
 
http://msdn.microsoft.com/library/psdk/winui/vkeys_529f.htm
Esempi di chiamata:
______________________
'Simulare la pressione del tasto asterisco
keybd_event VK_MULTIPLY, 0, 0, 0  ' simula la pressione del tasto *
keybd_event VK_MULTIPLY, 0, KEYEVENTF_KEYUP, 0  ' tasto * rilasciato
'Esempio per il tasto asterisco della tastiera normale
______________________
keybd_event VK_SHIFT, 0, 0, 0  ' simula la pressione del tasto SHIFT
keybd_event VK_OEM_PLUS, 0, 0, 0  ' simula la pressione del tasto +
keybd_event VK_SHIFT, 0, KEYEVENTF_KEYUP, 0  ' tasto + rilasciato
keybd_event VK_OEM_PLUS, 0, KEYEVENTF_KEYUP, 0  ' tasto SHIFT rilasciato
Esempio per Control-Esc
______________________
keybd_event VK_CONTROL, 0, 0, 0  ' simula la pressione del tasto Control
keybd_event VK_ESCAPE, 0, 0, 0  ' simula la pressione del tasto ESC
keybd_event VK_ESCAPE, 0, KEYEVENTF_KEYUP, 0  ' tasto ESC rilasciato
keybd_event VK_CONTROL, 0, KEYEVENTF_KEYUP, 0  ' tasto Del rilasciato
______________________
Buone feste !
G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

Newsgroup: it.comp.lang.visual-basic
Titolo: Porta Parallela

Sono un programmatore C/C++, solitamente faccio programmi per gestire schede
di interfaccia (Relè,Acensori,Luci,etc.) da me progettate e costruite, che
richiedono quindi l'uso di una porta parallela ed rs-232.
Vi chiedo cortesemente come gestire le due porte (mandare/ricevere dati) in
Visual Basic 5.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Unire immagini

Ciao a tutti. Ho bisogno di un aiutino. Sto facendo un programma che
mi permetta di incorniciare delle immagini. Questo incollando delle
immagini  "cornice" attorno all'immagine originale. Poi salvare il
tutto in una nuova immagine.
Purtroppo una delle poche cose che conosco pochissimo di vb è il
lavoro con la grafica e le immagini.
Grazie a chi mi può aiutare.
Meg
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

Il Modo più semplice senza usare le api è usare il metodo Paint
Esempio Prima ti disegni l'immagine quadro sulla picture con il metodo
paint
Poi naturlamente cerchi di disegnare sulla stessa picture utilizzando
sempre il metodo
Paint l'immagine che ti interessa cercando di centrarla.
Dopo ti Refreschi l'immagine per ottenerla.
E piu difficile dirlo che a farlo.
Ecco un pezzo di codice
Dim Quadro As String
Dim Immagine As String
Quadro = "C:\Documents and
Settings\Administrator\Documenti\Immagini\venere.bmp"
Immagine = "C:\Documents and
Settings\Administrator\Documenti\Immagini\email.gif"
Picture2.Picture = LoadPicture(Immagine)
Picture1.Picture = LoadPicture(Quadro)
Picture1.PaintPicture Picture2, 20, 20, Picture1.Width - 40,
Picture1.Height - 40
Picture1.Picture = Picture1.Image
SavePicture Picture1.Picture, "C:\Documents and
Settings\Administrator\Documenti\Immagini\Test.bmp"

-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio dei form tra funzioni

Questo il mio problema:
parto da un form che chiamo frm_principale, in questo form c'è un pulsante
di uscita cmdFine. Il programma ha una procedura di uscita che richiede una
password. Questo il mio codice:
Private Sub cmdFine_Click()
ctrlUscita = true 'ctrluscita è una variabile Boolean
ProceduraUscita (frm_principale, timer1)
End Sub
In un modulo con le mie funzioni
Public Sub ProceduraUscita (form1as form, timer1 as timer)
if ctrlUscita=true then
    form1.enabled = false
    timer1.enabled=false
    load frm_uscita
    frm_uscita.show
endif
if ctrlUscita=False then
    form1.enabled=true
    timer1.enabled=true
endif
End sub
il form uscita chiede una password ed è composto da due pulsanti se premo OK
con la pwd esce se premo annulla devo tornare a ProceduraUscita con la
variabile ctrlUscita=False.
Il mio dilemma è come posso far sì che form1, timer1 siano quelli della
chiamata da frm_principale. Non esiste la possibilità di avere una
"variabile form" o "variabile timer".
Vi prego aiutatemi
Grazie a tutti
p.s. Ovviamente mi serve questo tipo di gestione perchè l'uscita deve essere
richiamabile da più parti del programma o meglio ancora da più form.
Paolo


Non capisco, per come hai strutturato le tue Sub, mi pare che invii
esattamente la Form ed il Timer di cui stai parlando e quindi, le modifiche
alla proprietà Enabled si riferiscano a quelli. Se invii il nome di un Form,
invii un riferimento a quel form e non ad un form generico. In quanto al
timer, dovresti invece specificare a quale form si riferisce: Form1.Timer1.
C'è qualcosa che non ho capito nella tua domanda?
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

richiamabile da più parti del programma o meglio ancora da più form.
Allora, se quello scritto prima non va bene fai così:
Public Sub ProceduraUscita(F as Form, T As Timer, ByVal Uscita As Boolean)
    F.enabled = Not Uscita
    T.enabled = Not Uscita
End Sub
Public Sub MustLoadFrmUscita(ByVal Value As Boolean)
    If Value Then
        load frm_uscita
        frm_uscita.show
    End if
End Sub
Private Sub cmdFine_Click()
    ctrlUscita = true 'ctrluscita è una variabile Boolean
    Call ProceduraUscita(ctrlUscita) 'Se proprio ti serve ctrlUscita
    Call MustLoadFrmUscita(ctrlUscita) 'Se proprio ti serve ctrlUscita
End Sub
Questa si chiama parzializzazione del problema, cioè dividere un singolo
problema in tanti sottoproblemi più semplici.
vorrei sapere l'opinione anche di altri...
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Type Library

Ciao
Come da oggetto qualcuno mi sa dire dove trovare quella di Word95
Grazie in anticipo a tutti.
gna



Newsgroup: it.comp.lang.visual-basic
Titolo: GUID con SQL 2000

Ciao,
   dovrei realizzare un'applicazione che prende dati da Access e 
replicarli su SQL 2000. Volevo usare come chiave un campo basato su GUID 
, la domanda è: il GUID è supportato in SQL 2000?

 , la domanda č: il GUID č supportato in SQL 2000?
Si,
il nome del tipo č:
uniqueidentifier
ciao
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: show di una form da una principale

Ho questo problema: da una form principale, in cui avevo inserito dei valori , apro
un'altra form (con form.show) e salvo  un nuovo record. Fin qui tutto bene. Quando
chiudo la form secondaria e ritorno alla principale perdo perň i valori che avevo
precedentemente inserito.  Vorrei che questi rimanessero visibili per poter continuare
alla creazione e al salvataggio del record senza dover ricominciare dal primo campo.
Credo che sia un problema banale, almeno lo spero, certo non lo č per me.
Qualcuno puň aiutarmi ?
Grazie, Bruno.
--
Automatic posted from 
giglio.iol.it
 [195.210.91.87]
via Mailgate Server - 
http://www.mailgate.org

alla creazione e al salvataggio del record senza dover ricominciare dal primo campo.
  Quando chiudi la seconda form, utilizza Hide invece di Unload, cosi'
ti limiti a nasconderla invece di eliminarla dalla memoria ed in
questo modo continui ad avere disponibili tutti i suoi controlli con
le relative properties ed i valori che avevi inserito.
  Naturalmente, una volta che hai salvato i valori nel record e che la
seconda form non ti serve piu', ti conviene fare l'Unload, in modo da
non tenertela inutilmente in memoria.
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

Qualcuno può aiutarmi ?


Newsgroup: it.comp.lang.visual-basic
Titolo: Microsoft Multimedia Control

Ciao,
non so proprio come usare il controllo Microsoft Multimedia Control ,
qualcuno sa dove posso trovare una documentazione su tutte le sue
operazioni???

"Kartman" <Kart...@Libero.it> wrote in message
news:%UB97.6269$y_3.5...@news.infostrada.it...

1. inserisci il controllo in un form
2. selezionalo
3. premi F1
Ciao
Enrico

 ha scritto nel messaggio
news:9k6pt8$1apor$1...@news02.it.net...


scusa ma non ho l'msdn......
no msdn? ahi ahi ahi ahi ahi....
C'è quello on-line.... quello ce l'hai...
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
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Tasto della tastiera associato a button

Ho la necessità di associare la pressione di un tasto della tastiera ad un
button, in pratica come accade alla calcolatrice di windows nella quale
oltre al click sulla cifra e possibile agire direttamente sul pad numerico
sfruttandone anche il repeat della tastiera.
Come posso fare??
Utilizzo VB6 con SP5
Grazie.

 Come posso fare??
all'evento keypress se il tasto è quello giusto
richiami la funzione associata alla pressione del pulsante


 richiami la funzione associata alla pressione del pulsante
Aggiungo di impostare a True la proprietà Keypreview del form
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Archiviazione documentale

Vorrei capire come è possibile memorizzare file all'interno di un db SQL 
Server non limitandosi a salvare solamente il percorso del file ma l'intero 
file,un pò come avviene con gli allegati di posta elettronica. Sto cercando 
di documentarmi in merito, se avete qualche articolo da segnalarmi, o 
qualche libro o meglio ancora qualche esempio ve ne sarei grato. Grazie 

indaga sul tipo dati BLOB o sui campi MEMO

Bandini wrote:

"How To Access and Modify SQL Server BLOB Data by Using the ADO Stream 
Object"
http://support.microsoft.com/default.aspx?scid=kb;en-us;258038
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
Newsgroup: it.comp.lang.visual-basic
Titolo: Istruzione atan2

Cari Amici,
Qualcuno sà darmi un' analogo della funzione atan2 col VB?
La funzione atan2 è quella che restituisce l' arcotangente di un numero
direttamente nel suo quadrante.
Grazie
Pasquale Galianni
astrop...@libero.it

direttamente nel suo quadrante.
Purtroppo non c'e', ma e' facilmente simulabile (se ho capito):
/* 
 * TEST.C
 */
#include <math.h>
#include <stdio.h>
#include <errno.h>
void main( void ) 
{
   double x1, x2, y;
   printf( "Primo numero: " );
   scanf( "%lf", &x1 );
   y = atan( x1 );
   printf( "atan di %f: %f\n", x1, y );
   printf( "Secondo numero: " );
   scanf( "%lf", &x2 );
   y = atan2( x1, x2 );
   printf( "atan2 %f / %f: %f\n", x1, x2, y ); 
   y = atan( x1 / x2);
   printf( "atan2 simulata %f / %f: %f\n", x1, x2, y ); 
   return;
}
-- 
hth, hal

 */
Oops, ragioniamo in VB:
Public Function Atn2(X As Double, Y As Double) As Single
    Const NearZero = 0.000000001
    Const PI = 3.14159265358979
    If Y = 0 Then Y = NearZero
    Atn2 = (Atn(Abs(X) / Abs(Y)) * Sgn(X) - PI / 2) * Sgn(Y)
End Function
-- 
hth, hal

Grazie HAL!

 Qualcuno sà darmi un' analogo della funzione atan2 col VB?
Il sito è brasileiro, ma il codice si capisce:
http://www.vbribafs.hpg.ig.com.br/vbdicasmat.htm
Ciao,
Valerio


http://www.vbribafs.hpg.ig.com.br/vbdicasmat.htm
Interessante link, da aggiungere ai bookmark :-)
-- 
ciao, hal

 wrote in message
a17jcm$oms2c$1...@ID-56381.news.dfncis.de...


hello
non capisco la variabile tua variabile nearzero   e mi sembra inutile......
basta ricordare bene  "cerchio triginimetrico" e...ripassare la
trigonometria
ecco la mia versione
leonello
Public Function atan2(Y As Double, X As Double) As Single
'
'       in Visual basic  la atan2 NON esiste !
'       uguale alla funzione fortran atan2
'
Dim pi
Dim hpi
pi = 4 * Atn(1)    '  pigreco        3.14.....    (180)
hpi = pi / 2#       ' pigrecomezzi   1.57......   ( 90)


a17n8l$ovsb5$1...@ID-56381.news.dfncis.de...


Public Function atan2(Y As Double, X As Double) As Single
[snip]
Grazie mille per il codice, in effetti non ero certo su come gestire lo zero.
Terro' il codice, usando pero' il pi greco come costante (e' un calcolo
in piu' inutile, anche perche' vb lo restituisce comunque alla 14esima
cifra decimale con i Double o alla 15esima con i Decimal) e specificando
il tipo di dato per "pi" e "hpi".
Grazie ancora :-)
-- 
ciao, hal