mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] vb6 e porta com e elettronica

Devo risolvere questo problema. Provo a spiegarmi.
Devo cotruire una scheda da collegare a una porta com del pc. Questa scheda
deve contenere tre bottoni. Ogni uno deve restituire un valore.
Poi con questa scheda devo pilotare un programma sul pc.
Inoltre su un'altra porta com del pc devo collgare una gettoniera e gestire
tutto con un programma in vb.
Con il controllo MSCOMM riesco a gestire le porte com.
Ho cercato su google ma non mi riesce trovare quello che mi serve.
Qualcuno conosce qualche link?
Mi servono informazioni su come creare questa scheda?
Ogni aiuto e' gradito

> Mi servono informazioni su come creare questa scheda?
prova su it.hobby.elettronica 

 ha scritto nel messaggio
news:32805tF...@individual.net...


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

Vorrei sapere come faccio, con il metodo OpenDatabase, ad aprire un database
Access con password.
Grazie
Nicolň
Per rispondere scrivete a:
dot...@iname.com

Sul ng it.binari.visual-basic ho postato un esempio...
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

 wrote:
Search at:
http://www.lostpassword.com
Help forgetfull users to "crack" password to Word, Excel, etc.

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

 Access con password.
dim dbs As DataBase
Set dbs = OpenDatabase"mioDatabase.mdb", False, False, ";pwd=miaPassword" )

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

Ho scaricato dal SC il file "spooler" ma ho visto che non funziona
perfettamente alcuni parametri li ignora.
Tipo il numero di pagina che ha finito di stampare e a me serve sapere
proprio questo.
Ho usato in più modi la DLL ma non ci riesco.
Il mio problema è che devo interrompere un ciclo di stampa per il cambio del
foglio.
Il mio cliente ha una stampante ad aghi e usa un modulo prestampato su tre
copie e non è a modulo continuo.
Quindi devo trovare un modo per interrompere la fase di stampa nel momento
in cui il foglio è stato espulso dalla stampante.
Consigli?
Ciao Carmelo

 wrote in message
news:_UTq9.34092$RO.8...@twister1.libero.it...

Non puoi mettere in pausa la stampa a fine pagina perchè se la stampante ha un
buffer molto grande rischi che la serie di stampe vada nella stampante prima che
possa essere stampata.
Ho visto una vecchissima stampante ad aghi con 128KB di memoria.
Lo spooler non sà quando la stampa è terminata ma quando ha concluso l'invio
sulla porta parallela.
Secondo me ti conviene inviare 3 stampe separate e alla fine di ogni stampa
metti un bel msgbox
"Attendere la fine della stampa e cambiare il foglio"
Altrimenti vedi se puoi settare la stampa su "Alimentazione manuale" e lo
spooler alla fine della pagina gli scrive "Inserire foglio"
Il secondo sistema secondo me va meglio perchè se il cliente cambia stampante e
compra una laser cambi le impostazioni del driver e il gioco è fatto
Ciao
P.S.: Il progetto spooler l'ho fatto io, è un miracolo che funziona! :-)
--
Camplix
-Windows .Net Server (RC1)
-Visual Basic .NET Standard
-Framework Sp2
Newsgroup: it.comp.lang.visual-basic
Titolo: Da log ad access

Devo realizzare un software che mi faccia della reportistica su eventi
registrati in file di log.
La mia domanda e la seguente: è possibile tramite codice esportare delle
semplici stringhe contenute in file di log (o txt) in un DB access??
Grazie
Troy

 in un DB access??
Si, e' possibile. Buona ricerca!
Happy Coding =)
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

Newsgroup: it.comp.lang.visual-basic
Titolo: immagini che si "attivano"...

Dovrei fare una presentazione con qualche effetto speciale, per  un
programma in VB, qualcuno ha un'idea carina su come gestire delle immagini
su un form sullo stile dei CD_multimediali,  tipo un particolare che da
sfuocato e chiaro diventa nitido e colorato, pensavo a qualcosa tipo
un'immagine di sfondo con porzioni di immagini sovrapposte con sfondo
trasparente da rendere visibili quando il mouse e' sopra,  ed utilizzarli
come Hot Point : cosa è possibile col solo VB?
ci sono OCX dedicati?
Grazie
Luigi.

 trasparente da rendere visibili quando il mouse e' sopra,
Non pensare che i CD Multimediali facciano cose molto complesse. In realtà
la maggior parte del lavoro lo fanno prima i grafici.
Di solito si fanno 2 immagini di sfondo, una con gli hotspot spenti e una
con gli hotspot accesi. Poi si ritagliano i riquadri degli hotspot (niente
trasparenze, tanto devono andare a sovrapporsi esattamente anche allo
sfondo, e non capita mai che siano accesi 2 hotspot contigui che potrebbero
sovrapporsi).
Infine si carica in design mode la prima immagine come sfondo della form, e
in corrispondenza degli hotspot si mettono dei picturebox (un array di
picturebox, per essere precisi) in cui sono state caricate le immagini degli
hotspot da sovrapporre.
Quando hai fissato tutte le posizioni, puoi anche decidere di cancellare
tutte le immagini, e caricarle da disco a runtime durante l'inizializzazione
della form. Di solito è meglio  perchè così puoi avere su disco le immagini
in formato Jpg, che occupano meno spazio, mentre quando le salvi nella form
VB le trasforma in BMP, che sono notoriamente più pesanti.
Per gestire gli hotspot, fai un semplice ciclo sulla mousemove della form:
Dim R as integer
Dim bHotSpotAcceso as Boolean
For R=0 to KNumPictureBoxDiHotspot
    bHotSpotAcceso=False
    if x>PicHotSpot(R).left and x<PicHotSpot(R).left+PicHotSpot(R).Width
        if y>PicHotSpot(R).Top and y<PicHotSpot(R).Top+PicHotSpot(R).Height
            bHotSpotAcceso=True
        Endif
    Endif
    PicHotSpot(R).visible=bHotSpotAcceso
NExt
Se vuoi fare il fine, devi gestire il mousemove anche delle picture box,
oppure devi inserire un timer che controlli se sei uscito col mousepointer
dalla form, chiamando la GetCursorPosition.
Per correttezza il timer andrebbe acceso quando c'è acceso un hotspot, e
spento quando viene spento quello acceso.
Ciao
*Roby*

Intanto  ti ringrazio per la cortese e dattagliata risposta,
proverņ senz'altro a seguire i tuoi consigli.
Ciao,
 Luigi
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL VB6

Avrei bisogno di mettermi in contatto con qualcuno che ha gia' creato
e utillizzato le librerie DLL con VB6.
Chi vuole aiutarmi e' pregato di contattarmi privatamente
all'indirizzo
gianni....@tiscali.it
Grazie

[*Gianni Catucci* = 
gianni....@tiscali.it
 in
news:r86tnvspl7ss3ct27...@4ax.com
] ha scritto:

Beh, la guida di VB6 è sufficiente, si tratta solo di aprire un progetto di
tipo adeguato e di posizionare qualche proprietà per lo stesso, metterci le
Sub e le Function che vuoi, compilare e citare fra i riferimenti di un
progetto "normale" la librearia creata.
Poi, questo è un NewsGroup ed essendo il tuo problema assolutamente InTopic,
c'è la buona abitudine di parlarne qui, per la conoscenza di tutti.
Se non sei d'accordo, ... mi manderesti una pizza a casa? Ma alla svelta, ho
appetito... ;-)

 appetito... ;-)
No, io protesto!!!! Questo è un NG pubblico, quindi la pizza ce la mangiamo
tutti
ROTFL :-)
Antonio Mirarchi




2) quali passi utilizzare per richiamarle dalla memoria?
Per il file risorse, passo ancora palla. Per i file sul'HD, basta un
LoadPicture...
Premetto che però non so niente della libreria cards.dll...
Antonio Mirarchi

 Premetto che perň non so niente della libreria cards.dll...
E' la DLL che usa windows per i suoi solitari.
Contiene le funzioni e le immagini per la gestione delle carte.
Per Gianni direi che una bella DLL con la coppia di classi CMazzo e CCarta č
quello che ci vuole.
Che ne so, poi bisogna vedere cosa vole fare, perň queste potrebbero essere
cosě:
CMazzo.TipoDiCarte =
[tcNapoletane|tcPiacentine|tcScala40|tcTarocchi|tcCartaStraccia...]
      .Carte() As CCarta
      .Mischia
      .EstraiCarta As CCarta
CCarta.Seme
      .Valore
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: connessione reomota

Ciao a tutti,vorrei gentilmente sapere se per Visual BAsic c'è un
conmtrollo che permetta di fare una connessione remota mediante
modem,o se ci sono dei comandi adatti allo scopo.
Grazie,
          Alberto
Ciao,Alberto M.
 

...

--------
Ciao!
Vai a vedere sul mio sito 
http://www.armaditaggia.com/marco
. Dovresti
trovare qualcosa che fa al caso tuo sia tra le "Dichiarazioni utili a
tutti", sia leggendo la sezione "Ciò di cui non si può fare a meno". Fammi
sapere.
Marco Minerva
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Disabilitare Conferme Invio Posta

Ciao a tutto il News ho un piccolo problema:
Il mio tool usa outlook per inviare alcuni messaggi tramite posta e sotto
WinXp (credo sia winxp) mi dice che ci sta un tool che sta cercando di
inviare posta in automatico e quindi mi chiede se sono sicuro di voler
inviare la posta...Ecco, io vorrei disabilitare il messaggio di conferma
altrimenti il mio tool non invia il messaggio come dovrebbe...
Grazie e Saluti...

 Grazie e Saluti...
Ciao e fammi sapere.
--
***************************************************************
La Classe non è Acqua.
infatti è il modello in base al quale vengono create le istanze di un
oggetto in fase di esecuzione. Definisce le proprietà dell'oggetto e i
metodi utilizzati per gestire le funzioni dell'oggetto stesso.
***************************************************************

 ha scritto nel messaggio
news:bvbt2k$p8jp9$1...@ID-216634.news.uni-berlin.de...

Ciao,
non puoi disabilitare il messaggio ma puoi installare questo programma che
preme la conferma al tuo posto.
http://www.express-soft.com/mailmate/clickyes.html
Ciao Giorgio

Newsgroup: it.comp.lang.visual-basic
Titolo: mi date una mano per cominciare?

finalmente mi sono deciso a passare da VBA (access) a VB5.
vorrei sapere come si fa a creare (se è possibile) le sottomaschere tipo
quelle che ci sono in access. un'altra cosa che ancora non capisco è come
faccio a connettere un frame con degli option buttons ai valori di un campo
di un database?
in realtà le domande che ho sono molteplici. ho già trovato in queso n.g.
dei titoli di libri e vedrò di leggermeli (se li trovo).
grazie del vostro aiuto
ciao
federico



Mi dispiace deluderti ma le sottomaschere di Access in VB te le devi proprio
scordare.
Se decidi di creare una maschera con una sottomaschera in formato tabellare
devi utilizzare per la seconda una DBGrid o un controllo equivalente.
Ciao, Gundam
Federico Terenzi ha scritto nel messaggio
<01be69b6$67a6c6a0$6de178c3@federico>...

Newsgroup: it.comp.lang.visual-basic
Titolo: form

Salve ho tre form inizio, form1. form2 di cui dal form inizio apro il form1 
e da form1 apro il form2
nsturalmente tramite il comando form.show 1,me ,
il problema è che quando voglio ridurre ad icona
tutti i form tramite la funzione windowstate = 1 i form vengono ridotti ad 
icona ma non riesco più ad rivisualizzarli anche premendo sull' icona. 

> naturalmente tramite il comando form.show 1,me ,
secondo me non è tanto naturale aprire un form in questa
maniera,,,prova a fare così
form1.windowstate=1
form2.show vbModal '(in questo modo fino a che non chiuderai il form2
non sarà possibile  ripristinare il form1)
se apri il form2 in modalita Modale nella sub del form2
Form_QueryUnload inserisci questo
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Form1.WindowState = 0
End Sub
se ti serve ripristinarlo ometti dall'istruzione vbModal.....

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Routing NT

Ciao non sono Pal ma un suo amico che approfitta del newsgroup di visual
basic per chiedere informazioni sul routing di Windows NT Server 4 con sp6.
(So che non sarebbe il newsgroup adatto, ma su altri non ho avuto la minima
considerazione)
Allora il mio problema è far fare da router a Windows NT tra una rete
interna collegata ad una scheda ethernet ip 192.168.0.1 e internet (con
accesso dial-up tramite modem), l'ip forwarding è abilitato e la tabella di
routing è formalmente corretta! Allora perchè se da un client interno pingo
un qualunque indirizzo internet questo fallisce.
Grazie mille cmq
Davide
***
aggiungo solo:
la LAN e' la mia, quindi vi sarei *estremamente* grato :)
grazie e ciao, a.

 un qualunque indirizzo internet questo fallisce.
Perché NT non effettua il NAT.
Ti occorre un programmino che faccia da Gateway o
implementi la funzione di Network Address Translator,
appunto. I programmi sono sempre gli stessi.
ProxyServer di MS, Wingate, WinRoute, NAT1000 ecc.
Oppure sostituisci il modem con un router.

 Oppure sostituisci il modem con un router.
di nuovo grazie 1000.
per le macchine sotto proxy usiamo appunto wingate 3.05.
ora vediamo se ci saltiamo fuori.
ciao, a.

 Oppure sostituisci il modem con un router.
..o un LAN modem. Ad ogni modo la soluzione piu' economica
resta il ruoter-sw/proxy (aggiungerei alla lista anche
"WinProxy").
Loris.
--
Newsgroup: it.comp.lang.visual-basic
Titolo: Disabilitare la ComboBox

Ciao,
io avrei la necessità di disabilitare il controllo 
combobox, in modo tale da non permettere all'utente di poter
selezionare dalla lista.
Il problema è che non posso utilizzare la proprietà Enabled = false
perchè questa mi imposta in autoamtico il colore di grigietto. e la mia 
combobox per default ha impostato la proprietà Backcolor = blue.
Come posso fare a disabilitare la combo senza che cambi colore?
Grazie in anticipo.

 ha scritto nel messaggio
news:200510111...@mynewsgate.net...

.Locked = True
Bye
Raf

 Raf

 hai qualche altro suggerimento?
Quello di specificare subito quale ambiente di sviluppo utilizzi, ad
esempio.
Al load della form, assegna tu il colore di sfondo che preferisci alla tua
combobox.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
Se i tempi non chiedono la tua parte migliore, inventa altri tempi. 
(Baolian, libro II, vv. 16-17)
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 griazie tante
Nell'MSDN, a proposito di "ComboBox Control Changes in Visual Basic .NET", dice:
"In Visual Basic 6.0, setting the Locked property to true also prevented the
selection from being changed. You can duplicate this behavior by canceling the
selection in the MouseDown event."
Dovrebbe fornirti una strada.
Ciao
Raf
P.S.
Se non detto chiaramente, solitamente in questo NG si sottintende VB6...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Controlli griglia

Ciao,
devo manutenere un'applicazione VB6 su un sistema Windows 2k e 
necessiterei di un controllo griglia avanzato, possibilmente gratuito.
Ne conoscete qualcuno, come la TrueDbGrid, ad esempio?
Grazie, ciao. Stefano.

Ne conoscete qualcuno, come la TrueDbGrid, ad esempio?
 
 
Guarda se questo puo' andare:
 
http://www.vbaccelerator.com/home/VB/Code/Controls/S_Grid_2/S_Grid_2/article.asp
 
 
 
 
-- 
ciao
  Stefano

 
http://www.vbaccelerator.com/home/VB/Code/Controls/S_Grid_2/S_Grid_2/article.asp
 
 
Guardavo ora, ma sembra richiedere le librerie di Vb5, per il resto mi 
sembra valida.
Grazie.

Nel suo scritto precedente, Stefano ha sostenuto :

Sbagliavo, ci sono anche sorgenti e binari per vb6.
Grazie, ciao. Stefano.
Newsgroup: it.comp.lang.visual-basic
Titolo: Datacombo - comportamento strano?

Salve a tutti,
mi succede che mi viene modificato il database se utilizzando un datacombo,
dopo aver trovato il nome che mi interessa, per cercare nel db uso la
seguente linea di codice, inserita nel lostfocus del datacombo:
rs.bookmark=datacombo1.SelectedItem
in particolare ho notato che viene sostituito il nome precedentemente
visualizzato nel datacombo con quello su cui ho cliccato.
il db lo apro in qs modo:
/**********************************************************/
  Dim cn As Connection
  Set cn = New Connection
  cn.CursorLocation = adUseClient
  cn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & percorso &
"\k2.mdb;"
Set rs = New Recordset
rs.Open "select * from consulente", cn, adOpenStatic, adLockOptimistic
/***********************************************************/
Sicuro di un vostro riscontro anticipatamente vi ringrazio.

> rs.bookmark=datacombo1.SelectedItem
perche' non metti la precedente riga nell'evento click del datacombo?
O per lo meno, prova a vedere se cosi' hai problemi...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto - Sintassi SQL

Cari tutti,
devo estrarre da un DB, con una connessione ADO, un recordset con tutti i
record del campo Cognome nei quali compaia un testo specifico (es. 'efan')
Praticamente devo eseguire una query che in SQL dovrebbe essere scritta piů
o meno cosě:
select COGNOME from ANAGRAFICA where COGNOME like *efan*
Quando provo a riportarla in Vb e la scrivo cosě:
rst.Open "SELECT COGNOME From ANAGRAFICA WHERE COGNOME Like '*" & test &
"*'", conn5, adOpenKeyset, adLockOptimistic
tenete conto che nella variabile stringa 'test' ci metto il testo che voglio
ricercare....ma non riesco ad estrarre alcun record (..su Access la query in
questione funziona benissimo !)
Dove sbaglio ? Il carattere jolly "*" in vb rimane uguale ? o devo cambiare
qualcosa ? e le virgolette centrano qualcosa....?
Aiutatemi...per favore.
Grazie in anticipo a tutti
Chris

 qualcosa ? e le virgolette centrano qualcosa....?
% al posto di *
Newsgroup: it.comp.lang.visual-basic
Titolo: Eseguire un file

Ciao,
devo fare eseguire un file BAT a visual basic. In pratica premendo un
bottone (cmd) il programma deve lanciare un file bat che si trova in un
determinato percorso.
come faccio?

 come faccio?
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

> Shell "NomeFile.bat", vbHide se vuoi avviarlo in modalità "nascosta".
come si faceva a dire "cerca il file nella stessa directory
dell'eseguibile".
non mi ricordo

 ha scritto nel messaggio
news:RdE3b.7834$aG6.2...@news1.tin.it...

app.path

 
app.path
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 dell'eseguibile".
BatchPath = app.path & "\" & BatchName


E adesso vediamo se GBC lo assume...
Alberto


grazie e a te a tutti gli altri per la risposta.
il tutto funziona correttamente.

E adesso vediamo se GBC lo assume...
ROTFLASTIC!
-- 
ciao, hal
ecco perche' anche in ferie leggo iclvb ;-)

 E adesso vediamo se GBC lo assume...
ROTFLISSIMO!
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Forzare scollegamento connessioni ad access

E' possibile forzare lo scollegamento di TUTTE le connessioni ad un database
di access?
Cioè.. se io ho X utenti collegati al mio db access, posso fare
un'applicazione che li butta giù tutti, fa delle elaborazioni e poi
riconsegna la possibilità di collegarsi al db?
--
Ciew, Lepfio.

 riconsegna la possibilitŕ di collegarsi al db?
Se tutti gli X utenti accedono al DB tramite un'applicazione client scritta
da te, sicuramente si.
Altrimenti, anche riuscendo a chiudere le connessioni, come riusciresti a
farle riaprire?

 farle riaprire?
A me non interessa riaprirle con la mia applicazione. Finiti gli
aggiornamenti e "sbloccato" il db centrale, gli utenti si ricollegheranno "a
mano" !!! ^__^
Mi sai indicare come fare?
ciau e grz.

 Mi sai indicare come fare?
Sorry... non credo di avere il tempo, anche se mi interesserebbe saperlo...

Newsgroup: it.comp.lang.visual-basic
Titolo: SQL : Contare i giorni, e' possibile ?

Utilizzando l' SQL, e' possibile contare i giorni compresi in un periodo ?
Se si, in che maniera ?
Grazie

 Grazie
Io uso Microsoft SQL7 e c'è la funzione DateDiff proprio come in VB:
DATEDIFF(datepart, startdate, enddate)
Ciao!
--
Esteban
Hosted by 
www.seber.it
Remove 'nonspammare' for reply

 ha scritto nel messaggio
news:DkH08.27088$cU4.9...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare il testo in una casella di un programma esterno

Salve
ho un problema : ho creato un semplice programma che utilizzando le api
trova l'handle di ogni oggetto su cui passa il puntatore del mouse. Il
problema è ora questo : attraverso l'handle è possibile cambiare il testo
presente in una casella di testo di un programma esterno (ovvero non del
programma in VB) ? Ho provato utilizzando l'API settextwindows ma con questa
si riesce solo a cambiare il titolo della casella ,mentre usando l'API
Textout non ottengo niente. Esiste un metodo per fare quello che serve a me
? Con lo stesso metodo esiste un modo per simulare la pressione di un
bottone di cui si conosce l'handle (bottone sempre esterno al programma in
VB) ?
Grazie
Milliken

 VB) ?
dovrebbe essere SendMessage con BN_CLICK
Ciao
Faber

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

 
          Salve a tutti
in un foglio exel eseguo questo codice scritto da me che sono autodidatta
xr = 2
xs = 2
Do Until Sheets("CM").Cells(xr, 2) = ""
  If Sheets("CM").Cells(xr, 5) <> "x" Then
   cod = Sheets("CM").Cells(xr, 2)
  Else
   GoTo prox
  End If
     Do Until Sheets("CCC").Cells(xs, 2) = ""
         scod = Sheets("CCC").Cells(xs, 2)
         If scod = cod Then
           setup = Sheets("CCC").Cells(xs, 3)
           tc = Sheets("CCC").Cells(xs, 4)
           Sheets("CM").Cells(xr, 8) = setup
           Sheets("CM").Cells(xr, 8) = tc
           xs = 2
           Exit Do
         End If
         xs = xs + 1
      Loop
prox:
    xs = 2
    xr = xr + 1
Loop
Considerando che il foglio CM a circa 13000 righe e il foglio CCC circa 2000
il tutto è sicuramente poco efficiente. Inoltre devo ripetere altre
situazioni simili diverse volte.
Qualcuno potrebbe indicarmi un algoritmo più efficiente?
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Qualcuno potrebbe indicarmi un algoritmo più efficiente?
prova su :
news:free.it.comp.officexp.excel
microsoft.public.it.office.excel
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Run-time error 3343

Ciao a tutti,
mi succede una cosa strana con alcuni PC su cui installo un mio programma,
aprendo un form in cui c'è un data control ed un dbgrid va in errore:
Run-time error '3343': Unrecognized Database format.
Il programma è realizzato in VB6 SP5 ed utilizza DAO 3.6, i PC che danno
l'errore hanno Win98 e Access97 mentre l'mdb che viene installato è stato
creato con Access 2000. Su altri PC con diverse configurazioni funziona
tutto egregiamente.
Ho verificato che la proprietà Connect del data control punti correttamente
ad Access 2000. Non so più che cosa tentare..........
Se c'è qualcuno che ha un'idea mi farebbe un grandissimo piacere.
Grazie.
Adriano


Alcuni PC potrebbero non avere installata una versione recente dei
driver di accesso ai dati.
Verifica la versione dei driver dal pannello di controllo->ODBC,
ed eventualmente reinstallali.
Nel setup dovresti avere MDAC_TYP.EXE: eseguilo sulle macchine target.
Io attualmente installo l'mdac versione 2.5 e non ho errori di
accesso quali i tuoi; tuttavia, potrebbe esservi una versione ancora 
più recente.
Per sincerartene vai sul sito microsoft. È free.
HTH
	Adriano

Newsgroup: it.comp.lang.visual-basic
Titolo: Record Number

Come faccio a capire quanti record mi ha restituito una query senza 
doverli percorre tutti? sempre se č possibile!
Grazie, Dario

 Grazie, Dario
dovrebbe essere qualcosa del tipo:
SELECT COUNT(*)
FROM studente
WHERE corso='LETTERE'
da "visual basic la programmazione dei database"
di Giuseppe Naccarato
Apogeo 
www.apogeonline.com

 doverli percorre tutti? sempre se è possibile!
Certo, e' possibile. Sicuramente ti verra' anche risposto come. Sarebbe
bello pero' che tu indicassi il tipo di database e se usi, per esempio, DAO,
ADO o chessoio. Ma, a parte questo, la mia curiosita' e': perche' lo vuoi
sapere? La domanda mi e' "sorta spontanea" leggendo l'oggetto "Record
Number", che ricorda altri mondi. Considera anche che se la tua esigenza e'
limitata al "contare", puoi sfruttare la funzione SQL "Count".
--
Ciao.
Maurizio

 Grazie, Dario

WHERE corso='LETTERE'
Comunque questo e' puro e semplice SQL Ansi 92, ergo va bene con
qualsiasi DBMS tu utilizzi.
Ciao!!
Luca Menegotto.

Newsgroup: it.comp.lang.visual-basic
Titolo: [VbKeyUp e Down]: serio problema in rilevazione

Gentili utenti del NG,
ho verificato che su un form nel quale il focus appartiene ad un controllo
CommandButton, non e` possibile intercettare i tasti VbKeyUp e VbKeyDown
(immagino anche i fratelli Left e Right), nemmeno con la proprieta`
KeyPreview della form a TRUE e intercettando Form_Keydown(...).
Ora, io credo che la situazione non sia poi cosi` rara come sembra; in
particolare, devo simulare il tasto Tab ogni qualvolta viene premuto un
tasto 'freccia', ma se sul form prende il focus un bottone, rimango fregata!
Qualcuno DEVE sapere come e` possibile risolvere questo strano
comportamento, confido.
Grazie in anticipo.
susanna

Ciao Susanna
nota di MSDN su KeyPreview
Nota   Alcuni controlli intercettano gli eventi della tastiera in modo che
il form non sia in grado di riceverli. Un esempio è fornito dal tasto INVIO
quando lo stato attivo è su un controllo CommandButton e dai tasti di
DIREZIONE quando lo stato attivo è su un controllo ListBox.
Se non è il tuo caso non è che il tasto che prende il focus abbia la
proprietà default a true ?
Ultima spiaggia: fai una routine che controlla il keydown sul tasto e da lì
richiama la routine generica per il keydown sul form.
Spero di esserti stato d'aiuto
Ciao!
--
___________________________________________
                             Davide Deidda
URL      
http://web.tiscalinet.it/meridies
E-Mail          
davide...@tiscalinet.it
___________________________________________

 Ciao!
Temo, anzi ne sono certa, che quando lo stato attivo si trova su un
CommandButton, lo stesso intercetta ANCHE tutti i tasti direzione (frecce) "
in modo che il form non sia in grado di riceverli " (per dirla come
Microsoft).
La cosa mi sembra ridicola e mi rifiuto di pensare che NON possa esistere
soluzione.
Grazie comunque.
susanna

Newsgroup: it.comp.lang.visual-basic
Titolo: OLEDB e CrystalReport 7

Salve a tutti
Qualcuno sà dirmi qual'è la stringa di connessione da passare ad un report
tramite codice utilizzando la tecnologia ADO e un database SQLSERVER?
Grazie anticipati

 Qualcuno są dirmi qual'č la stringa di connessione da passare ad un report


 > Qualcuno sà dirmi qual'è la stringa di connessione da passare ad un


 ha scritto nel messaggio
news:8p7p4s$q4k$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: ARCHIVIARE IMMAGINI

Come posso archiviare immagini in access?
send: 
agi...@libero.it

 send: 
agi...@libero.it
Scusa se la mia č una non-risposta, ma questo č un argomento su cui si
rischia di ripetersi spesso, ed č peraltro piuttosto articolato. So,
please search in 
deja.com
 sul presente NG con parole chiave, "immagini"
"access", o "immagini" "mdb". Vedrai che salta fuori qualcosa di
interessante.
Solo un orientamento generale: č *molto* sconveniente usare l'OLE,
mentre č consigliabile memorizzare nel db il solo path delle immagini,
memorizzate come files in directory prestabilite.
Serve un po' di codice.
-- 
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]


vai a vedere le FAQ di it.comp.appl.access dove e' spiegato dettagliatamente
barbi

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report e stampanti

Volevo chiedervi se avete informazioni per fare in modo che una volta che ho
fatto un report con CR e lo stampo con una stampante e' tutto allineato;
quando poi cambio stampante si disallinea tutto...sapreste darmi una
indicazione per fare in modo che cio' non succeda ?!?!
Ciao e grazie

 wrote in message
914t7a$eb5$1...@fe1.cs.interbusiness.it...


sono passata ad access, ha altri piccoli problemi ma non è ingestibile >come CR.
Se non ricordo male, problemi d'automazione OLE con l'Access Runtime...
Però è strano che CR dia i problemi che denunciate: è utilizzato massicciamente da software house
che distribuiscono orizzontali a migliaia di aziende italiane.
Come faranno? :-)
Ciao, warp

Io credo che possano essere problemi dipendenti da driver di stampanti che
gestiscono in maniera lievemente diversa i font (grandezze ecc...) ma io
purtroppo sono costretto ad usarlo e devo trovare una soluzione.....
Ciao e grazie

 ha scritto nel messaggio
news:914t7a$eb5$1...@fe1.cs.interbusiness.it...


purtroppo sono costretto ad usarlo e devo trovare una soluzione.....
Beh, non conosco l'entità precisa dei "disservizi" che hai incontrato, però tutti i Reports Egine
dipendono dai drivers delle stampanti.
Conseguentemente è bene calibrare i Report con dei margini di sicurezza.
Ad esempio (anche se esteticamente non è il max) lasciare almeno un cm di margine Destro,
dimensionare le etichette più del necessario, etc. etc.
IPSOA s.r.l che sviluppa software per commercialisti, si tutela con un elenco preciso di stampanti
supportate.
Credo tuttavia che la maggioranza dei produttori di software non abbiano tale forza!! :-)
Ciao, warp

CR 7 !!
Ciao

Diciamo, parole sovrascritte da righe ecc......diciamo che bisogna andare
per tentativi !!!
Ciao Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Compilare.....

Qualcuno sa dirmi come posso rendere meno ingombranti i miei progetti in vb5
dopo che li ho compilati..anche se faccio un semplice programmino mi occupa
sempre almeno 2.5 MB......(dll..ecc).grazie

 ha scritto

non includere la msvbvm50.dll, pero' avverti chi scarica / controlla che ci
sia dove installi. in 98 direi ci sia di default, in 95 no, anche se e'
molto probabile.
per il resto, puoi provare a *non* usare ocx aggiuntivi se non sei per il
collo. pesano e rischiano di incasinare.
hth, pal
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

 wrote in message
news:899ltk$map$1...@lacerta.tiscalinet.it...





Newsgroup: it.comp.lang.visual-basic
Titolo: Auto_open in Excel 97

Come posso far eseguire, all'apertura di Excel 97, una routine contenuta in
una aggiunta da me realizzata? Ho cercato invano una funzione tipo Auto_open
di Excel 4 o OnSheetActivate di Excel 95, ma senza risultati...
Grazie e saluti a tutti.

 wrote in message
news:754290$nl2$1...@nslave1.tin.it...

Devi avviare dal menu strumenti, l'editor di visual basic, all'interno
dell'editor trovi tutte le cartelle che hai aperto, individui quella che ti
interessa, vai nella sezione "This Workbook", ti si apre una finestra, nella
combo box di sinistra scegli "Workbook" e in quella di destra "Open" a quel
punto scrivi (in VBA) le istruzioni che vuoi eseguire all'apertura del
codice, piu' o meno cosi'.
Private Sub Workbook_Open()
Qui scrivi le istruzioni
End Sub
Come sempre e' piu' facile farlo che spiegarlo, se hai ancora bisogno,
scrivimi.
Ciao
--
Andrea :-{)
acm...@hotmail.com
================================================
Leggi 
http://beatles.cselt.it/news-it/FAQ.html
 e
http://beatles.cselt.it/news-it/gruppi-it.html
Potresti imparare qualcosa di piu' sui NG
================================================

Newsgroup: it.comp.lang.visual-basic
Titolo: ci viole una procedura VB ?

Dovrei  fare una procedura VB  ( oppure VBA , se basta ) che svolga questo 
compito :
 Con una query non riesco ad  accodare dati in due distinte tabelle presenti 
in due
 distinti file MDB di access.
 Cioč ho un file TXT che contiene due colonne di dati da importare , A e B
 La colonna A deve finire dentro alla tabella A presente nel file A.MDB
 mentre l'altra colonna B deve finire dentro alla tabella B presente nel
 file  B.MDB
 Servono due query  mi dicono , oppure una procedura scritta in VB.
Ci vuole un programmatore  ?
Grazie e ciao 

 Grazie e ciao
Penso che ti abbiano consigliato in modo non completo anche se
corretto...!
Siccome stai parlando di Access, visto che hai postato il problema sul
NG di access, presumo sia sempre la stessa domanda....!
Access supporta l'importazione di File con un file di specifiche, se
studi un pò la cosa
vedi che è possibile, se sei digiuno dell'uso del mezzo e non hai
interesse ad imparare in quanto devi risolvere il problema fine a se
stesso, ti serve uno che te lo faccia perdi meno tempo.
Farlo in VB o in VBA non c'è nessuna limitazione o differenza(nel tuo
caso) pertanto puoi
proseguire il 3D originale sul NG di Access.
@Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: file di testo

Ciao a tutti
Il mio problema è il seguente!!
Devo ricavare dei dati da un file di testo
uso il comando 
open c:\doccumenti......\pippo.txt" for input as #1
input#1, riga
...
...
...
tutto funziona benissimo se all'interno della riga non eè presente una
virgola ",". Se c'è la interpreta come un punto a capo e non legge la
parte restante della riga! come posso fare per leggere tutta la riga
compresa la vircola, che eventualmente andrò a levare dopo io??
Grazie a tutti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Questo funziona:
    Open "c:\prova.txt" For Input As #1
    Do While Not EOF(1)
        Line Input #1, riga
        List1.AddItem riga
    Loop
    Close #1
La prossima volta prova a premere F1 sopra alla parola Input! ;-)
Ciao, Vincenzo

 ha scritto nel messaggio
news:eab5cf20c14e7157961...@mygate.mailgate.org...


 Loop
Daje con sto FileSystemObject... e poi usandolo esattamente come si
userebbero le native VB e' proprio volersela cercare.
P.S". Do While Condizione = False " si puo' ottimizzare con "Do Until
Condizione"
-- 
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
Statuto: 
http://www.it-lang-vb.net/docs/Statuto.txt
UGIdotNET - 
http://www.ugidotnet.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Danneggiamento archivi ACCESS MDB

Problemino.......
Spesso mi accade che per mancanza di tensione, incriccamenti soliti di
windows, malfunzionamento di rete ecc, si danneggiano irreparabilmente gli
archivi MDB. Sapere se esiste un'utility o qualcos'altro per riparare a
questo tipo di inconveniente ????
Grazie mille.

...

O da Access oppure da VB con il comando RepairDatabase
Saluti
Stefano Raspadori

 wrote in message
8rke02$hgq$1...@zamboni.dsnet.it...


 wrote in message
news:ulLkV#EMAH...@newsmst.mcis.galactica.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] utilizzo griglie

Salve a tutti,
vorrei gestire un'agenda (tipo Outlook) ma non so che controllo utilizzare.
Ho iniziato con un DataGrid ma non riesco a capire come popolare le colonne
e le celle sottostanti manualmente (senza collegarlo ad recordset).
Ringrazion in anticipo per l'auito.
PRG

 ha scritto nel messaggio
news:j9Qv9.95781$%M1.24...@twister2.libero.it...
 Ho iniziato con un DataGrid ma non riesco a capire come popolare le colonne
e le celle sottostanti manualmente (senza collegarlo ad recordset).
Forse perchè il datagrid può essere utilizzato solo collegandolo ad un
recordset....
Se hai bisogno di un semplice elenco in cui mettere gli elementi "a mano",
prova a guardare la listbox
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Urgente!!!!. uso di shell()

come si fa a far partire un0applicazione da dentro a Visual basic atendendo
che il programma lanciato finisca l'esecuzione?????
la funzione:     Shell(pathname[,windowstyle])
avvia il programma desiderato ma procede con l'esecuzione delle istruzioni
del programma chiamante.... :-((
Help me!
--
"La differenza tra il genio e la stupiditą č che il genio ha i suoi
limiti"
    Albert Einstein

Ciao !
Ti sembrerà strano, ma ti rimando al Sito Comune come fonte di dati per la
risposta alla tua domanda.
Nella sezione "Cerca" digita la parola "chiusura" e clicca sul pulsante
"Cerca".
Già i primi 2 risultati che ti vengono proposti rispondono alla tua
richiesta !
Alla prox ! :D
--
'''®foolbrain®'''
Visual Basic Programmer
Database Designer & Manager
ICQ 88912631

Newsgroup: it.comp.lang.visual-basic
Titolo: Copia\incolla su dbgrid

Salve,
Sapete come posso attivare la copiadi tutte le celle di una DbGrid ?
ctrl+c funziona solo sulle singole celle,
vorrei poterle incollare ad esempio in excel
Grazie in anticipo
Simone Graziosi

Non ho mai provato con dbgrid, ma' con il vecchio Grid ricordo di aver
effettuato
la copia dei dati negli appunti e da qui in excel.
Vedi oggetto clipboard (settext, gettext).
I singoli dati vanno separati da appositi separatori, purtroppo non
ricordo bene quali,
ma dovrebbero essere (;) per salto cella, e (enter o Tab) per salto
riga.
	Lore.

Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzare MySQL con visual basic

Salve a tutti.
Cercavo di trovare una soluzione per accedere e lavorare su un db mysql 
mediante un applicazione visual basic (sono ancora a 6.0 :))
Ho googlato... ma non ho trovato nulla di interessante.
Esiste una libreria adatta?
Qualcuno utilizza un'accoppiata del genere?
Grazie mille a tutti!!


Puoi usare la libreria:
libmysql.dll
Trovi tutto il necessario a questo indirizzo:
http://tinyurl.com/2hfhxw
--
Ciao Fede
By Chicco Production
http://www.webalice.it/bychicco/

 --
Io spero stiate scherzando!!!!!
Utilizzare una libreria e delle API per connettersi ad uno dei database più 
semplici da gestire che ci sono in giro????
Con tre righe di codice ti connetti ad un database mysql utilizzando 
tranquillamente ADO.
1) dim cn as adodb.connection
2) set cn=new adodb.connection
' se utilizzi un driver odbc...per le altre string di connessione vai a 
http://www.connectionstrings.com/?carrier=mysql
3) 
cn.open"Driver={mySQL};Server=myServerAddress;Port=3306;Option=131072;Stmt=; 
Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
Tre (3) righe e sei connesso...
E tramite ADO te lo gestisci completamente....
Ciao
IAK 


Pero', prima che gli vengano gli occhi storti, spiegagli almeno che
'Option=131072' e' l'equivalente di quello che otterresti smarcando i
vari checkbox nella finestra del pannello di controllo del direv
MyODBC, altrimenti non sa da dove viene fuori il "numero magico" ;-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Treeview e oledraganddrop in vb6

Ciao a tutti,
ho una treeview costituita da 9 nodi ed a ciascun nodo viene caricato un 
numero di child.
Per trascinamento, l'utente può prendere un elemento della treeview e 
portarlo su una textbox.
HO 2 domande:
1) C'è modo per capire se l'utente trascina un nodo o un child ?
    Mi serve distinguere le 2 situazioni perchè l'applicazione deve
    reagire in modo diverso.
2) Se voglio inserire il nodo che prendo dalla treeview in una parte
    selezionata della textbox come faccio ?
Spero di essere stato chiaro. Grazie e buon lavoro.


Utilizza le Proprietà:
     Text1.SelStart
     Text1.SelLength


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Data Report: Orientamento pagina

Ciao a tutti,
passo subito a descrivere il mio (spero) piccolo problema:
Ho creato nella mia applicazione un report con Data Report di VB6; Tutto
funziona correttamente ma... non riesco ad orientare la pagina in
orizzontale!!! Ho visto nell'MSDN ma non ho trovato nulla che mi potesse
essere di aiuto.
Ringrazio tutti
Nik

Hai dato un'occhiata al Sito Comune? :)
http://www.murialdo.it/it_lang_vb
--
Ciao a tutto il NewsGroup
Alex
alm...@tin.it



Ho seguito il tuo suggerimento, ma non ho trovato nulla che mi potesse
essere di aiuto. Grazie comunque...
Nik
Ci riprovo...

Newsgroup: it.comp.lang.visual-basic
Titolo: Problem with DCOM (SERVER) HELP!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

I have download and install an example DCOMDemoServer..... (on MSDN ... name
:COMCTLZP.exe)
When I configure all permission and all AppID, CLSID, INTERFACE etc... with
DCOMCNFG.exe following the readme.txt and permission.txt ...
But when i send the remote call The client follow the error :      "The
remote server machine does not exist or is unavailable"
But the name and the class is correct on the server and client....  equal
CLSID..........
What I do for correct functionally ??????????
mail 
man...@iname.com


It seem to be a network problem.
The two machines are in the same LAN ?
There is an NT domain ?
What network protocol is used ?
Ciao
Aldo

 wrote in message
news:956rth$g30t9$1...@ID-56381.news.dfncis.de...


 wrote in message
news:956rth$g30t9$1...@ID-56381.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Interbase in VB si può fare?

Si può utilizzare interbase in Vb
se si come?
Ciao Enzo
www.scozzaro.it

 Si puň utilizzare interbase in Vb
Io ho installato Firebird che e' IB opensource.
Il codice che ho usato per fare alcuni test e' il seguente:
Dim rs As Recordset
Set cn = New Connection
cn.Open "Provider=MSDASQL.1;Persist Security Info=False;User 
ID=SYSDBA;Data Source=fb", , "masterkey"
Set rs = New Recordset
rs.Open "SELECT * FROM CUSTOMER", cn
Debug.Print rs.Fields(1).Name, rs.Fields(2).Name
While Not rs.EOF
     Debug.Print rs.Fields(1).Value, rs.Fields(2).Value
     rs.MoveNext
Wend
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
Dal sito di firebird puoi scaricare tutto cio' che serve ...
ciao
		maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

Newsgroup: it.comp.lang.visual-basic
Titolo: Cercasi Programmatore per creazione CD di presentazione

Sto cercando programmatori creativi per creare un CD di presentazione della
mia societą, possibilmente creati in VB o programmi multipiattaforma
indipendenti.
Zona Brianza, a nord di Milano.
hhe...@tin.it

 Zona Brianza, a nord di Milano.
Bella zona ;-)
--
Roal Zanazzi
z...@iol.it

specializzati in prodotti multimediali.
Beh, qualcuno che ci sappia fare con Macromedia Director penso gli
servira'.....
...esiste un news a riguardo?
(semplice curiosita')

(semplice curiosita')
Esiste un newsgroup direttamente su un server Macromedia ma non mi ricordo
il nome.
Lo trovate comunque su 
www.macromedia.com
Come ho già scritto a Marco (ma non sembra interessato) la mia società si
occupa proprio di sviluppare questo tipo di prodotti
(un po di pubblicità non fa mai male)
ciao a tutti

 servira'.....
E lo chiami "programmare" :-) ??
--
Roal Zanazzi
z...@iol.it


Beh, "giocare" pareva poco professionale! =)
(ehm, spero di non aver offeso nessuno....)
=)

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

Ho creato un programma per la gestione di uno studio legale l'unica cosa che
però mi manca è un videoscrittura. Ho provato con il RichTextBox ma sì è
rivelato poco utile. Stò cercando una videoscrittura (anche se delle più
semplici) già fatta per poterla inserire nel mio programma.
Grazie mille a tutti.
Spero mi diate una mano !!!!
Mr.*D.j.* ICQ 19540125

 rivelato poco utile.
Che problemi hai avuto con il RichTextBox ? Io ci ho combattuto un
bel po', l'unica cosa che non sono ancora riuscito a fare è la giustifica
a blocchetto _con sillabazione_, per la giustifica normale avevo visto
una routine sul SC, ma non l'ho ancora guardata.
D'altra parte in uno studio legale devi rispettare i parametri di stampa
del formato "Uso Bollo", con margini e interlinee particolari, se le leggi
non sono cambiate ulimamente, almeno.
Quindi non so se un pacchetto commerciale ti dà la flessibilità giusta.
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: byte e bit

non capisco il seguente ragionamento :
data una word ( una word sono 2 byte , un byte č 8 bit ) per estrarre le sue
parti ( byte alto e byte basso) si fa cosě:
word\255  , e si ottengono il numero di 256 presenti al suo interno (
estraggo cioč il byte alto, cioč i bit da 8 a 15)
[e qui non capisco perchč divido per 255 e non per 256 ]
poi si fa  word AND 255 (estraggo il byte basso, cioč i bit  da 0 a 7 )
Ad es se word č 513  ottengo 2*256  e  1 *1.
Siccome in VISUAL BASIC gli interi vanno da -32768 a  +32767  mentre in
windows vanno da 0  a 65535 ,
le formule su esposte si correggono cosě :
x = word \255
if  x<0   allora   x= 65532+ x
idem per l'estrazione del byte basso dal word :
x = word  AND 255
if  x<0   allora   x= 65532+ x
Nel libro c'č scritto che si aggiunge 65532 per compensare ogni numero
superiore a 16387 ( ???) .
Questo non l'ho capito!
saluti e grazie

 superiore a 16387 ( ???) .
Non so perchè quando ti spiegano i numeri binari ed esadecimali fanno di
tutto per rendere impossibile la comprensione, quando invecie è di una
banalità disarmante.
Tanto per cominciare lavoriamo con gli esadecimali anzichè con i decimali
dato che viene più comodo (sembra strano eh?)
Gli esadecimali sono comodi perchè sono sempre 1 cifra fanno 4 bit, due
cifre che fanno un byte, 4 cifre per una word: da 0x0000 a 0xFFFF
per trovare i due byte di una word basta che
1) trovare il byte basso con una maschera di bit da 1 a 8, cioè 0xFF (255
decimale)
E questo è facile: word AND 0xFF: tutti i bit dei due byte superiori non
vengono mascherati e automaticamente si azzerano.
w1.w2
00.FF  (00000000.11111111)
-----
00.w2
2) trovare la parte rimanente del byte.
Questo è molto più complesso perchè richiede ben una divisione :)
Occorre scalare in giù la word di due "cifre esadecimali".
Come fai a scalere in giù un numero decimale? Basta dividerlo per 100, in
esadecimale è lo stesso:
w1.w2 \ 0x100 = w1
Nota che la divisione è quella tra numeri interi (non che al lato pratico
cambi molto) e 100 è 100 esadecimale, cioè 256 decimale (e non 255 come
dicevi).
Gli interi a 16 bit vanno sempre da 0 a 2^16, non solo in windows.
Se sono con segno è necessario usare il bit più alto per indicarlo, e per
convenzione li si fa partire da -((2^16) \ 2) fino, ovviamente, a ((2^16) \
2) - 1 (il bit di segno).
VB fino alla ver. 6 adotta una solo la seconda convenzione.
Quando parli di 16387 forse intendevi 16384, che è 2^15, cioè un intero a 15
bit, valore che ho visto solo in alcune vecchie schede video, i famosi 16k
di colori.
Comunque sia, per eliminare il segno devi aggiungere (2 ^ 16) \ 2 (0x8000,
cioè 0x7fff + 1) così da spostare il range da 0 a 2 ^ 16.
Chiaro adesso? :P
--
Qualunque mentecatto può scrivere codice che un computer possa capire.
I buoni programmatori scrivono codice che gli uomini possano capire.
[Martin Fowler]

grazie delle spiegazioni!
comunque ho riportato testualmente da pag 736 - vb6 manuale d'uso, Tecniche
nuove