mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: MSChart, sto' maledetto...

Salve a tutti. Devo imparare ad usare rapidissimamente l'MS Chart,
possibilmente entro domattina :-)
Mi sono messo a provarlo, ho scaricato dal sito l'esempio, e piu' o meno ci
sono. L'unica cosa che adesso mi manca e' spiegare a quel cavolo di
controllo come voglio che legga i dati...
Esempio pratico e diretto: ho una query che restituisce X record tre campi
ciascuno, il primo stringa e gli altri due numerici. Vorrei che il primo
campo funzionasse da etichetta per l'asse X, che il secondo campo generasse
un grafico a barre ed il terzo un'altro a barre ma che stia davanti
all'altro...
Con Access e' semplicissimo, ma con MS Chart proprio non mi riesce.
Help? :D


Non sono sicuro di aver capito bena ma a me funziona tutto in maniera
praticamente immediata, ti spiego cosa ho fatto
Ho generato una tabella in Access con 3 colonne la 1° testo  2°e3° val
numerico.
Ho inserito un Adodc e un Datagrid (anche se basta l'Adodc) che recuperano i
dati della tabella
Ho inserito MSChar ed ho impostato DataSource ad Adodc ho lanciato ed ho
alla base ho il valore del 1° campo del 1° record (se ai notato quando
inserisci il controllo ti indica R1, R2 ecc. alla base del grafico) che è
l'etichetta dell'asse per il grafico relativo ai valori del 1° record, alla
dx ho il valore del 1° campo del 2° record che è l'etichetta dell'asse per
il grafico relativo ai valori del 2° record e così via.
Posta con tranquillità sto lavorando anch'io stasera perciò ci facciamo
forza in 2 (sigh !!)
JKLJKL :-)

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

Chiunque sappia dove poter scaricare il manuale del VB 5.0 in Italiano, può
lasciarmi un messaggio?
					Grazie

Il manuale di Visual Basic 5.0 si trova sul CD stesso del programma nella
directory \tools\docs\pguide ed è in formato Word ma non è possibile
stamparlo correttamente se non si è in possesso di una stampante PostScript.
Con una stampante normale la stampa scende "sporcata".
Alex ha scritto nel messaggio <01bd26d8$83301600$1cae1fc3@vtmor>...



Cosa significa "sporcata"?
Io ho scaricato, via FTP, il manuale di VB5 e ho provato a stamparlo su un
stampante laser HP Laser 4L.  Effettivamente ha stampato tutto ma ha anche
inserito in ogni foglio in basso a sinistra una serie di scritte sovrapposte
una su l'altra. <---- Questo significa sporcata?!?!?
Micky!
Newsgroup: it.comp.lang.visual-basic
Titolo: [?OT?] Conversione da codice da Access 2000 a 97

E' possibile (ovviamente integrando nel progetto DAO 3.6) _DA CODICE VB_
convertire files MDB da formato Access 2000 (Jet 4.0/DAO 3.6) a formato
Access 97 (Jet 3.5/DAO 3.51)?
Ho provato con la CompactDatabase, ma consente solo di passare da Jet 3.5 a
Jet 4.0, non viceversa.
Non voglio fare come il gambero, ma, proprio perchè vorrei consentire la
migrazione da formato 97 a 2000, vorrei, se possibile (non tutti hanno
Access 2000, alcuni hanno Access 97), poter mettere a disposizione una
utility per "tornare indietro". Grazie a tutti.


Ciao
Normalmente esportare formati da una versione piů recente ad una piů vecchia
non č possibile e/o non affidabile
Io ti consiglierei di crearti una procedura di import/export tra i due
formati con VB (esporti i campi Acc2000 in VB poi popoli la corrispondente
tabella Acc97).
E' ovvio che la procedura č adatta a tabelle relativamente piccole
altrimenti ci passi la notte !!
JKLJKL :-)

 altrimenti ci passi la notte !!
Grazie, Jeccetera, ma questa ipotesi, perfettamente e immediatamente
fattibile, mi costringe a scrivere un tot di codice. Poco mi importerebbe
del tempo impiegato (non è che si fa una volta al giorno), ma speravo che
esistesse qualcosa del tipo dbVersion40_to_dbVersion30.

 esistesse qualcosa del tipo dbVersion40_to_dbVersion30.
con quello che gli hai detto dietro, se anche l'hanno messa (cosa cmq molto
improbabile: loro danno per scontato che tutti bramino la versione nuova:
che bisogno c'e' di convertire?) a te risulta senz'altro
    +hrs
:>

 ha scritto nel messaggio
news:a944vp$5554$1...@ID-51318.news.dfncis.de...

Già, Java, con molte probabilità io non vedrei quell'opzione nemmeno nel
glossario dei CD di 4 anni fa.
Ma dai, possibile che qualche programmatore (con eccesso di diligenza) non
l'abbia messo??? Non ci posso credere. Se poi, come mi pare di aver letto
proprio in qualche post, Access (l'applicativo) lo può fare, perchè non
pensaci? Vabbè, aspetterò un po' e poi mi rassegnerò a fare un tot di For
... Each (ovviamente col beneamato DAO).

 ... Each (ovviamente col beneamato DAO).
io farei un pensierino, almeno per valutarne la possibilita' e rapidita',
anche all'uso di sql, frammischiato al caro dao. alter, drop, ecc, magari
giocando su due strutture vuote create in precedenza nei due formati.
ciao, 
j.il.caro.dao.dev
'essere.proprio.una.cosa.da.cani(di)
Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET Stesso controllo in più posizioni della form

Devo gestire la stessa combobox in 2 tab di una form.
Per ora ho creato due combo con medesimo datasource.
E' forse meglio se mi creo dei panel come "bookmark" nei vari tabs per
posizionare poi io la combo, a seconda di dove sono?

Ciao Andrea [Work],

cosa cambierebbe?
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 cosa cambierebbe?
A me niente, mi chiedevo quale fosse la soluzione "meno peggio" :)

Ciao Andrea [Work],

una vale l'altra, l'unica cosa sensata sarebbe uno user control se 
dovessi fare composition ma non è il tuo caso.


 dovessi fare composition ma non è il tuo caso.
No è una semplice maschera inserimento dati, ci sono due modalità di
inserimento che fanno la stessa cosa. Per ora lascio così allora :)
Newsgroup: it.comp.lang.visual-basic
Titolo: SIMBOLI?

Vorrei sapere da chi sa e vuole rispondermi,
Come si inserisce un simbolo o lettera dell'alfabeto greco (sigma, tau,
gamma, ecc.)
In un testo su form
in un testo di griglia
in una caption di controllo, ecc.
Grazie
Tommaso

Che io sappia... devi usare per forza un font tipo symbol che li ha
inclusi...
        Allanon
tommaso ha scritto nel messaggio ...


E' difficile trovare font che abbiano tutti i caratteri insieme da poter
scrivere di tutto.
ciao tommaso

Esiste forse anche un'altra possibilità... potresti usare un API per
stampare del testo sull'Handle dell' oggetto...
Se ti interessa fammi sapere che vado a cercarla...
            Ciao
                    Allanon
tommaso ha scritto nel messaggio ...


Vi faresti veramente un favore
grazie
Tommaso

 In un testo su form
per il testo sul form fai così: metti il seguente codice nel Form_Paint
Dim I As Long
For I = 0 To 255
   Print Chr(I);
   If I Mod 40 = 0 Then Print
Next I
quindi imposta la proprietà font su Arial, scrittura greco

Scusami ma questo argomento č passato tanto indietro che non mi sono accorto
del tuo messaggio.
E' stato ripreso con CHE CARATTERE
ciao
Tommaso

Newsgroup: it.comp.lang.visual-basic
Titolo: Al moderatore di questo NG

Ciao,
mi rivolgo al moderatore di questo NG per sapere se c'è qualche motivo per
cui non vedo visualizzati i miei interventi nel sito.
Ho scritto 3 volte e non ho ancora visto niente.
Ciao, Roberto
--------------------------------
Inviato via 
http://usenet.libero.it

 Inviato via 
http://usenet.libero.it
Non c'č moderatore.
Io vedo tutti e tre i tuoi messaggi.
Ciao,
Mattia

 Io vedo tutti e tre i tuoi messaggi.
Idem io.
Alex
°°° Posted from X-Privat Free NNTP server - 
www.x-privat.org
 °°°

 Idem io.
idem ankio!

 ha scritto nel messaggio
news:%Uj9b.318734$lK4.10...@twister1.libero.it...

Siamo in quattro.

Ho scritto 3 volte e non ho ancora visto niente.
  Il gruppo non e' moderato, in compenso il newsserver di
Wind/Infostrada/Libero/ecc. ha dato i numeri per tutto il week end per
cui solo una parte dei messaggi e' apparsa e con un ritardo di circa
mezza giornata.
  Questo pomeriggio pare che le cose siano tornate a posto.
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire "micio" con "mc"

  Questo pomeriggio pare che le cose siano tornate a posto.
  Contrordine, c'e' ancora un po' di ritardo nell'apparizione dei
messaggi e forse c'e' ancora qualche problema nella completezza del
feed.


 Siamo in quattro.
Ma se lui non li vede...riesce a leggere che noi lo leggiamo?
Alex...mah...


Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa DBGrid

Salve a tutti... chi mi da una mano?
Ho bisogno di stampare direttamente il contenuto di una Griglia dati
ottenuta con una query SQL.
E' Possibile?

...

Ci sono più possibilità: crearsi una routine ex novo che stampi i campi
della tua query; usare crystalreport, oppure provare l'ocx di Ettore
Maronese per la stampa di recordset e query ( funziona molto bene). Lo puoi
trovare all'indirizzo: 
http://ilmes.freeweb.org
 .
Ciao Marco
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Classifica dei post di Aprile: precisazione

Dimenticavo di dire una cosa.
La classifica completa la potete trovare come sempre su
http://digilander.iol.it/battarsa/classifiche/
--
Samuele Battarra
mail server: 
libero.it
account: battarsa

 
http://digilander.iol.it/battarsa/classifiche/
grazie, ma la prima cella, con a href =
http://digilander.iol.it/battarsa/classifiche/conOT042000.html
mi rimanda a
http://digilander.iol.it/_ppricerca/index.html
ciao, a.

 ha scritto

Perche' ti interessi di Aprile 2000? Ad un anno di distanza sei ancora interessato alle
vecchie statistiche? :)))))

 ha scritto

effetto link. appena ne vedo uno, clicco :)
in questo caso, la cella a1.



siamo in due....
^____^
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
---------------------------------------------------------------------------

 siamo in due....
eheheh
tre, se e' per questo :)
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

pal ha scritto:

grazie per la segnalazione, controllero'.


grazie per la segnalazione, controllero'.
sono quasi tutti i link piu' vecchi, non e' che digilander mette una data di scadenza sui file ?
ciao, hal

Azz! Controllo su Supereva... non vorrei far consumare ai miei visitatori
pagine scadute... :) ;)
CiaoZ
SebaMix

 
No, sono stato io che ho cambiato nome ai file e mi sono dimenticato di aggiornarli.


Newsgroup: it.comp.lang.visual-basic
Titolo: DB access 2000 multiutente

Salve a tutti,
è possibile aprire (e fare le comuni operazioni 
lettura/scrittura/cancellazione) un DB in access 2000 PROTETTO DA PASSWORD 
in modalità MULTIUTENTE?
grazie. Alberto 


Si, se sai la password
--
Greg

 ha scritto nel messaggio 
news:438342ba$0$27611$4faf...@reader1.news.tin.it...

Si certo che la so... (o meglio la devo ancora decidere :)  ).
Mi spiego meglio: ho un applicativo che gira in rete su acc 2000, volevo 
sapere a cosa vado in contro se decidessi di impostare la password del DB...
Alberto 

 password del DB... Alberto
Vai incontro al fatto che  nella stringa di connessione devi specificare
anche la pass del database.
Tutto qua
--
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema ListBox

Forse prima non mi sono spiegato ben.
Come posso fare per far si che quando seleziono  un elemento della ListBox,
premendo invio su di esso, mi corrisponde a premere doppio click del mouse?
Grazie tantissimo.

 Grazie tantissimo.
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Registratore di cassa.

Qualcuno sa darmi indicazioni su come operare per leggere i dati di un
registratore di cassa con VB5.
Grazie anticipatamente.
--
Posted from 
ro...@smpt.crtn.it
 [212.11.64.150] (may be forged)
via Mailgate.ORG Server - 
http://www.mailgate.org

Anche io sare interessato all'argomento : dovrei interfacciare un mio prg
VB con un registratore di cassa per effettuare delle operazioni.
Maurizi...@ITCCCRT0.crtn.it
 ha scritto:


...


...


VB con un registratore di cassa per effettuare delle operazioni.
Come ti hanno già risposto, dipende dalla marca e dal modello del
registratore di cassa. Io ho usato dei 2190 NCR e ci sono 2 strade: o ti
studi il protocollo e tramite seriale invii e ricevi i dati dalle casse, o
utilizzi il  driver fornito, che mette a disposizione primitive come Azzera,
ChiusuraFiscale ecc.
Naturalmente è impensabile interfacciarsi ad un POS senza avere la
documentazione relativa.
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.tin.it/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


Veramente io ho gestito un SAREMA usando solo MSCOMM.OCX
La documentazione tecnica è abbastanza chiara e tutta l'operazione è
abbastanza semplice.
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con Euro

Buongiorno a tutti,
Ho un database con molte maschere e tabelle...il mio problema è che adesso
devo convertire tutti i campi delle Maschere in Euro, e la cosa come potete
ben capire è abbastanza pallosa.....si può fare da codice??? considerate che
lavoro con WindowsNT e office97.
Grazie a tutti.
--
ma...@tiscalinet.it
MARGIOTTONE HOME PAGE:
http://web.tiscali.it/margiottone

 ha scritto nel messaggio
news:9pc484$q97$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: MSWORD8.OLB: Interfacciamento tra VB6 e MsWord

PROBLEMA BLOCCANTE
Ho sviluppato un programma VB6 che si interfaccia con MsWord per la
creazione di documenti
Effettuata l'installazione su alcuni PC con Office 97 l'applicativo non
funziona.
devo portarmi appresso anche i file .OLB di Word. Se sě, quali, in modo che
funzioni sia con Office 97, Office 2000, Office XP.
Grazie in anticipo

 modo che funzioni sia con Office 97, Office 2000, Office XP.
Anzichè distribuire gli olb, dimensiona gli oggetti come Object, crea le
istanze con CreateObject, e ti servirà solo il runtime di VB.
Ovviamente l'istanza di Word.Application va fatta sotto On Error, perchè se
Word non è proprio installato...
Teoricamente (ma Word non lo conosco come Excel), l'object model delle varie
versioni non è cambiato (a parte da 97 a 2000).
Ciao
Alberto

 funzioni sia con Office 97, Office 2000, Office XP.
    Togli:
        Library Word
            <...>\MSWORD9.OLB
            Microsoft Word 9.0 Object Library
dai riferimenti del progetto, modifica tutte le dichiarazioni di
variabili del tipo:
        Dim <variabile> As Word.<oggetto>
in:
        Dim <variabile> As Object
e consulta MSDN LIbrary Versione per Visual Studio 6.0 a proposito di:
        Function CreateObject(Class As String, [ServerName As String])
            Membro di VBA.Interaction
            Crea un oggetto ActiveX
        Function GetObject([PathName], [Class])
            Membro di VBA.Interaction
            Restituisce un riferimento a un oggetto ActiveX da un file
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Resize

Ciao a tutti,
poiché sul form ho dei controlli che cambiano di dimensione durante il
ridimensionamento
e poiché lo sfondo di alcuni controlli è molto complesso e il tutto si
traduce in
un rallentamento/sfarfallio fastidioso durante il ridimensionamento della
finestra,
mi chiedo se fosse possibile ridisegnare tutto il form a ridimensionamento
terminato,
cioé quando l'utente rilascia il tasto del mouse. Durante l'operazione
sarebbe
bello se venisse visualizzato solo un rettangolo. So che in Windows c'è
un'opzione
per evitare il ridisegnamento del form durante operazione di
sposta/ridimensiona,
ma vorrei avere questo effetto nella mia applicazione indipendentemente
dalla
impostazione di Windows.
Voi che dite, è possibile?

 terminato,
Prova a guardare se l'API LockWindowUpdate fa al caso tuo.
In alternativa, c'era un post molto interessante di Lokar:
http://groups.google.it/groups?&selm=bhJN8.117%24cl4.4498%40nreader2.kpnqwest.net
Ma accertati di leggere anche i suoi seguenti, c'erano delle modifiche.
Bye, G.

 Ma accertati di leggere anche i suoi seguenti, c'erano delle modifiche.
Non è proprio la soluzione che cercavo ma potrebbe andare. Io avrei
preferito che,
durante l'operazione di resize, cioé mentre l'utente muove il mouse tenendo
premuto
il tasto sinistro, la form rimanesse sempre la stessa ma venisse
visualizzato
un rettangolo che rappresenta la nuova posizione/dimensione della finestra.
Solo
quando l'utente rilascia il tasto del mouse, il rettangolo scompare e al suo
posto viene ridisegnata la finestra.

 posto viene ridisegnata la finestra.
Per quell'effetto potresti disegnare un rettangolo, XORando, direttamente
sul device context di tutto lo schermo. Non è il massimo della semplicità,
ma si può fare. C'è un esempio sul sito di SoftCircuits, FormDesign,
mi pare. In quel'esempio il movimento del mouse è stato ristretto
all'interno del form; questo tu non devi farlo, ovviamente.
E devi sempre subclassare il mouse, direi... o forse ti basta usare un
form non ridimensionabile, e controllare le coordinate nel mousedown.
Se sei vicino ad uno degli angoli, o dei bordi, fai una SetCapture (altrimenti
se il rilascio avviene al di fuori del tuo form non lo rilevi), inizi il
trascinamento del rettangolo, nel mousemove ridisegni il rettangolo,
e al rilascio fai una ReleaseCapture, cancelli il rettangolo e fai il resize.
Guardati quell'esempio, ti dovrebbe dare degli spunti.
Oh, sono solo delle idee, eh ? :-)))
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: Applicazione MDI e associazione file

Sto progettando un mini editor XML, con struttura MDI (in cui l'utente
puo' editare piu' file contemporaneamente). Se associo l'applicazione
con i file .XML, doppio click su un file e mi lancia l'appl, e dentro
ci faccio aprire il file selezionato. Ma se mi fanno dblclick su un
altro file, mentre l'applicazione e' gia' aperta, come faccio a fargli
'aprire' anche questo nuovo file? App.PrevInstance, credo, mi dice
solo se c'e' un'altra istanza dell'appl in esecuzione...
Grazie!
Bye by SixaM 8-]

solo se c'e' un'altra istanza dell'appl in esecuzione...
Esatto: devi comunicare all'istanza preesistente che deve aprire il
file che hai ricevuto come parametro.
E' spiegato molto bene qua:
http://www.vbaccelerator.com/home/VB/Code/Libraries/Shell_Projects/Registering_File_Associations/article.asp
-- 
ciao, un hal di passaggio


Grazie per le informazioni, quando avro' ottenuto qualcosa di decente 
postero' il prg al SC.
-- 
SixaM 8-]

Newsgroup: it.comp.lang.visual-basic
Titolo: Datagrid: Click e Ordinare

C'è la possibilità di ordinare le colonne del datagrid con un click
sull'intestazione colonna ?
..e passare il testo contenuto in una cella in una variabile, dopo aver
cliccato sulla cella stessa ?
(Grazie Valter...il filtro funziona!! :)
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 (Grazie Valter...il filtro funziona!! :)
Ok.. la prossima volta diamo un'occhiata al carburatore.. ;-)
Ciao
 Valter

Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso ad un file di testo

Premetto che sono un principiante.
Ho un file di testo con dei dati non formattati. Il mio intento è quello di
aprire il file e scrivere in sequenza (dopo un certo numero di caratteri)
dei valori esedecimali.
Per esempio il file è cosi composto:
a b c d e f g h i l m n o p q r s t u v z
al posto della f e della g devo mettere, in esadecimale, 0C 0A
Come posso fare?
Grazie dell'aiuto,
Marco

 Marco
MIk

 > Come posso fare?
Dovrebbe esserci in giro un HEX per trasformare in esadecimale...
Ciao
Mik

 ha scritto nel messaggio
news:b9q65t$lqlej$1...@ID-165476.news.dfncis.de...

Grazie mille :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: ciclo sui controlli

si può fare un ciclo sui controlli di una form
e cambiare il backcolor a tutte se sono textbox?
grazie

 grazie
prego
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
caso mai ti chiedessi come si fa....
http://makeashorterlink.com/?W2A432028
si parla di button, ma il concetto è lo stesso


    For Each Control In Form1
        If TypeName(Control) = "TextBox" Then
             Control.BackColor = vbRed
        End If
    Next Control
Ciao, Vincenzo

     For Each Control In Form1
	  If TypeOf Control IS TextBox Then

Newsgroup: it.comp.lang.visual-basic
Titolo: [MANIFESTO] Ri-votazione modifica 5

 it.binari.visual-basic.
--- Modifica N°5: ---
eliminare il secondo paragrafo.
Motivazione: il newsgroup it.binari.visual-basic è stato chiuso.
--- Modifica N°5/bis: ---
Anzichè eliminare il paragrafo, modificarlo in:
"lo scambio di files binari può essere effettuato utilizzato il gruppo
it.binari.file, e notificandolo su it.comp.lang.visual-basic con prefisso
[!] (v. Articolo 10)."
Motivazione: così è comunque possibile scambiarsi file utilizzando NG pubblici anziché mail private
--- Modifica N°5/ter: ---
Aggiunta alla 5/bis: "[lo scambio di files binari può essere effettuato utilizzato il gruppo
it.binari.file, e notificandolo su it.comp.lang.visual-basic con prefisso
[!] (v. Articolo 10)] riportando il Message-ID del messaggio"
Motivazione: per facilitare il reperimento del post nel ng it.binari.file
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Questo messaggio è solo un esempio di come votare: non è valido ai fini dello scrutinio poiché ho
già votato.
5:	NO
5/bis	SI
5/ter	NO


5:	NO
5/bis	NO
5/ter	SI
Ciao
Aldo

















Ciao,


Questo messaggio è solo un esempio di come votare: non è valido ai fini dello scrutinio poiché ho
già votato.
5:	NO
5/bis	SI
5/ter	NO
Ciao,


che non è possibile votare più di una volta.
Non ci capisco piu' niente. :-(
In soldoni, il voto accodato al messaggio analogo a questo di due settimane va e' buono o no ?
Ciao
Aldo



Forse mi sono espresso male: intendevo "in un post con subject diverso": questo thread è quello
"ufficiale"...







Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Relationship in SQL4

Scusate l'OT, ma non ho trovato ng di SQL in italiano e io con l'inglese me la
cavo poco...
E poi so che in questo ng c'è gente che la sa lunga (sviolinata)...
Ho sperimentato di recente le Relationship di Access e mi pento di non averle
scoperte prima.
Utilizzo anche banche dati SQL (sia Microsoft SQL4 che Microsoft SQL7) e su SQL7
ho trovato il modo per creare le relazioni tra tabelle.
Qualcuno sa dirmi come creare le relazioni anche su Microsoft SQL4?
Grazie a tutti!
--
Esteban
Hosted by 
www.seber.it

 cavo poco...
[...]

 Alfonso
Bene, pensavo di saperne abbastanza di SQL, visto che è 6 anni che ci lavoro
(non ho mai fatto corsi: sono un autodidatta) ma ho capito di non saperne
abbastanza, anzi, non ho proprio capito cosa hai detto... :-(
Ciao e grazie comunque: non mi resta che andare alla ricerca nell'help e fare
delle prove e vedere di capire come funzionano 'sti trigger e 'ste constrains...
Esteban
Hosted by 
www.seber.it

 ha scritto nel messaggio
news:yWLR6.5050$ZZ.1...@news.infostrada.it...


 Alfonso
Direi che sei stato eccezzionale!
Ciao e grazie!
Esteban
Hosted by 
www.seber.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Scanner

Salve a tutti,
esiste un modo (oltre al controllo Kodak che mi pare non lo permetta) per
impostare le proprietà di acquisizione di uno scanner (contrasto,
luminosità, etc.)
grazie...

A parte la risoluzione, le impostazioni dei parametri 'ottici' di
scansione si devono effettuare dall'interfaccia TWAIN dello scanner,
perché possono variare molto tra diversi modelli di scanner, sia in
termini di funzioni che di funzionalità interne dell'hardware...
ImgScan consente di aprire la finestra dei parametri di scansione TWAIN,
dove puoi effettuare le impostazioni che vuoi e magari memorizzare i
parametri che ti servono.
-> GbC
http://www.gbcweb.com
#
# Questa domanda non rispetta il manifesto
# di questo newsgroup.
#
# Ogni NG ha delle regole; servono a rendere
# possibile l'utilizzo di tale strumento.
#
# Le istruzioni sull'uso del NG le trovi in
# 
http://www.it-lang-vb.net/docs/Manifesto.txt
#
# Tutto il materiale di interesse comune è in
# 
http://www.it-lang-vb.net
#
# I vecchi messaggi puoi cercarli in
# 
http://groups.google.com/advanced_group_search
#

Grazie.
Mi scuso per l'OT.

Newsgroup: it.comp.lang.visual-basic
Titolo: VB3: caso disperato

ciao a tutti,
devo trasferire un'applicazione scritta in VB3 su un altro PC. Tuttavia chi
ha scritto l'applicazione che gestisce un database non ha previsto di
poterla reinstallare. Io quindi mi trovo sprovvisto del supporto per
accedere al database (MDB e DBF). Inolte devo apportare delle modifiche ai
sorgenti ma mi manca il compilatore.
1. Quali file e dove li posso reperire per il supporto per il DB?
2. Dove posso trovare una copia di VB3 (lo so che non č molto legale questa
domanda)?
Grazie per le eventuali risposte (meglio se a 
ses...@tin.it
)


Complimenti....premio "Dinosauro d'oro!"
La vedo dura !
supporto MDB lo trovi in access (presumo che con vb3 ci vorrà office 95)
dove trovare tutto?...dal vecchio programmatore che ha scritto
l'applicazione...è la strada migliore...perchè non lo consulti???ù
Saprà lui dove mettere le mani no?

 domanda)?
Perchè non è molto legale, non sono sicuro,
ma avendo la licenza
di vb6 penso che tu possa usare vb3.
                                danilo

Ma non puoi provare a farlo ricompilare in VB5 o VB6, magari con le dovute
modifiche necessarie per i controlli cambiati?
Non credo ci dovrebbero essere grossi problemi!
Giorgio

domanda)?
A giro per la rete, in qualche sito di abadonware, probabilmente si trova.
Oppure contatta la M$, anche se, dal 99, VB3 è ufficialmente morto assieme
a VBDos.
Come già detto, la licenza di una qualsiasi versione superiore ti dovrebbe
garantire l'utilizzo di una inferiore di pari caratteristiche (ergo con una
6.0 standard non puoi utilizzare una 5.0 enterprise) senza sorprese.
--
Regards LaZ
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸
Mi riservo, con fermezza, il diritto di contraddirmi. (Paul Claudel) 
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸
Newsgroup: it.comp.lang.visual-basic
Titolo: A.A.A. Cercasi Api

... ho perso il mio bellissimo help delle API... sapete per caso dove posso
trovarne uno ... su internet ???
Grazie 1000
Jack

...


...

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione di Oggetti grafici (era Ereditarietà FORM)

Eccomi ancora quì a stressarvi l'anima con i miei assurdi quesiti...
Tutto questo, sempre per il mio progetto di un semplice gioco di
strategia...
In primis ho bisogno di uno "sfondo" dove far girare il tutto, ok?
Il form di VB non mi sembrava molto ospitale, ed avevo intenzione di
utilizzare una sorta di Form fai-da-me, ma non potendone ereditare le
proprietà (per gentile spiegazione di Luca Dormio), ho dovuto rinunciare.
BENE!
Mi accontento del form di vb.
Però ho almeno la possibilità di fargli disegnare i personaggi direttamente
dalla classe dello stesso (con ad esempio un metodo "Disegnati"), e di
conseguenza farglieli spostare, senza dovermi affidare alle noiose
picturebox?
Si lo so, sono domande al limite dell'assurdo, ma la mia curiosità non ha
limiti... (o forse la mia stupidità?...) :)

 picturebox?
l'oggetto Form ha un metodo PaintPicture che fa piu' o meno quello che
chiedi, per cose piu' spinte ci sono le funzioni dell'API GDI (tipo BitBlt e
soci)
Trovi tutto a riguardo su MSDN
Ciao

 affidare alle noiose picturebox?
umm umm hai pensato alle directX ? in pratica alla fine vai a sfruttare le
sue classi e magari delle tue , dirigendo l'uotput che per comodita' puo'
essere uan textbox
Tutte le info con DirectDraw se poi vuoi ammazzarti col 3d ... Direct3d
(naturalmente scaricandoti l'Sdk 8,1 delle DirectX )
So che sono andato ancora un po + ot, ma ho visto giochini fatti in con le
Dx e me ne sono innamorato , studiandolo superficialmente ho visto che non
e' nemmeno tanto difficile gestirle !
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/
Newsgroup: it.comp.lang.visual-basic
Titolo: Ado: IMHOP

Vorrei esprimere una opinione sul dibattito Ado-SI Ado-No che tra messaggio
e messaggio comincia a trapelare sul NG.
Ado non è "un" oggetto di accesso ai dati Jet.
Ado è una tecnologia e come tale va trattato.
L'idea di fondo è quella di costruire uno strato comune ad oggetti a
"qualunque" tecnologia di accesso a "qualunque" fonte di dati.
E' chiaro perciò che il modo di trattare una specifica fonte dati varia a
seconda della specificità di quella fonte dati.
Altro è leggere un foglio di Excel, altro una mail di Exchange, altro le
informazioni di una Active Directory e altro infine un database relazionale.
Ma addirittura, altro è agire su un database SqlServer, un database Oracle,
un database Jet.
Sarebbe come pretendere, per similitudine, che l'accesso via Odbc a Oracle e
a dbf usasse le stesse query! Certo, le similitudini sono molte, ma le
differenze possono essere sostanziali.
Diventa quindi fondamentale capire cosa si sta facendo attraverso lo
specifico Provider dati Oledb che stiamo utilizzando, cosa può fare e cosa
NON può fare. E soprattutto come lo può fare.
In questo senso ritengo siano molto carenti in casa Ms: la documentazione
relativa alle specificità dei Provider Oledb standard (intendo quelli
forniti a corredo di Ado) è praticamente inesistente!!!!
Occorre purtroppo una approfondita conoscenza delle specificità del sigolo
fornitore dati per muoversi senza intoppi.
Premesso ciò, tuttavia, credo che l'idea sia senz'altro vincente.
Si tratta di una strutturazione ad oggetti pulita, priva di eccessive
stratificazioni (vedi in proposito il modello oggetti di Dao) e
potenzialmente universale.
Lo dimostra d'altra parte l'attenzione crescente che altri produttori
riservano alla tecnologia, vedi Borland o Seagate 
p.es
., attenzione che mi
sembra inferiore solo a quella riservata a suo tempo alla rivoluzione
introdotta dalle specifiche Odbc.
ciao
ugo

Esatto.
Sottoscrivo le tue precisazioni, in toto.
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Cancellare un file ....

qualcuno ha un esempio per cancellare un file in una directory conoscendo il
nome ....
grazie fabrizio

 ha scritto nel messaggio
news:aarq0r$6dj8$1...@stargate1.inet.it...


 ha scritto nel messaggio
news:aarq0r$6dj8$1...@stargate1.inet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [NET]Aggiornare DB

Ho copiato queste righe da internet
 
Private ds As New DataSet
Private da As New OleDbDataAdapter
Private bs As New BindingSource
Private cb As OleDbCommandBuilder
 
objConn e sempre aperta
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sDbArchivi & 
";;Persist Security Info=True;Jet OLEDB:Database Password=" & PWDCONNECT
 
Dim SQLQuery As String = "Select Azienda.* From Azienda"
ds = New DataSet("Azienda")
da = New OleDbDataAdapter(SQLQuery, objConn)
da.Fill(ds, "Azienda") 'Fill aggiunge le righe al DataSet perch 
corrispondano a quelle presenti nell'origine dati
bs = New BindingSource
bs.DataSource = ds 'origine dati del BindingSource
bs.DataMember = "Azienda" 'indica da quale tabella preleviamo i record 
(utile quando abbiamo pi tabelle nel DataSet
cb = New OleDbCommandBuilder(da)
 
'associo ad ogni controllo i campi della tabella gli argomenti del metodo 
Add: <proprietControllo>,<DataSource>,<campo>
txtDenom.DataBindings.Add("Text", bs, "Denominazione")
txtRagSoc.DataBindings.Add("Text", bs, "RagioneSociale")
txtIndir.DataBindings.Add("Text", bs, "Indirizzo")
 
If ds.Tables("Azienda").Rows.Count = 0 Then
bs.AddNew()
Else
bs.MoveFirst()
End If
 
Private Sub Registra()
If Trim(txtDenom.Text) = "" Then
MessageBox.Show("Denominazione azienda non indicata.", 
Application.ProductName.ToString(), MessageBoxButtons.OK, 
MessageBoxIcon.Warning)
bCancel = True
Exit Sub
End If
Try
bs.EndEdit() 'salvo le modifiche
da.Update(ds, "Azienda") 'aggiorno il DataSet
ds.AcceptChanges()
bCancel = False
bEditRecord = False
LeggiDatiAzienda()
Catch ex As Exception
MessageBox.Show(ex.Message, "Errore", MessageBoxButtons.OK, 
MessageBoxIcon.Error)
End Try
End Sub
 
Se la tabella è vuota mi inserisce un nuovo record regolarmente
Se vado a modificare un record o inserire uno nuovo mi da errore
 
dov'è l'errore
 
Carmelo
 
 
 

> Se vado a modificare un record o inserire uno nuovo mi da errore
 
testo dell'errore? 
 
 

 testo dell'errore?
 
Facendo delle ricerche ho scoperto che chiedeva l'id tabella.
La tabella in oggetto non aveva la chiave primaria ho messo un ID nella 
tabella e funziona.
Ma è possibile una cosa del genere?
 
Carmelo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] problema con ocx

Ciao a tutti, ho un problemino con un ocx:
Apro un progetto non fatto da me, mi dice che vuole l'ocx msoutl32.ocx, che
non esiste sulla mia macchina. Lo trovo su di un altro PC, copio il file ocx
ed il punto oca sul mio pc, registro l'ocx con regsvr32, ed il progetto si
apre tranquillamente.
Quando però vado ad aprire la form che contiente quel componente, o cerca di
metterne un altro in un altra form, ottengo l'errore:
Non sono disponibili informazioni sui diritti di licenza per questo
componente.
L'errore è il 429.
Ora, sul mio computer e su quello da cui l'ho copiato ci sono lo stesso
sistema operativo (win2k prof), stesso visualstudio (6), stesso service
pack(5), più o meno le stesse cose. sul pc da cui l'ho copiato funziona
tutto egregiamente.
Cosa può essere? Può essere che lui abbia qualche programma che
installandosi gli abbia registrato quell'ocx in maniera diversa? Sapete
darmi una dritta?
Grazie
Puzz

 ed il punto oca sul mio pc, registro l'ocx con regsvr32, ed il progetto si
[...cut...]
Hai provato a cancellare o rinomainare l'oca?
aloHa
elefante

 Hai provato a cancellare o rinomainare l'oca?
L'oca?
iclvb.zoo
--
Salutoni
Sergio


Si, all'inizio avevo copiato solo il .ocx, l'oca l'aveva creato lui. Altre
idee?
Grazie comunque.
Puzz
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB] Connessione remota a MySQL con ODBC

Acusate se insisto ma non e' possibile che non riesco a cannettermi ad
un database che si trova su un altro PC che e' in rete con il mio,
oppure non e possibile che non mi connetto al mio tramite DSN e ODBC.
Ho Visual Studio .NET,
ho un Database MySQL,
ho incluso nel progetto il Namespace "Microsoft.Data.Odbc",
ho installato i driver MyODBC nel mio PC e nel PC dove mi dovrei
connettere,
ho creato un DSN nel mio PC e uno nel PC dove mi dovrei connettere,
ho fatto la stringa di connesione ODBC,
e ho creato la seguente connessione...............
[code]
        Dim MyConString As String = "DSN=_My_SystemDSN_;" & _
                                    "Uid=_My_User_;" & _
                                    "Pwd=_My_Pass_"
        Dim MyConnection As New OdbcConnection(MyConString)
        MyConnection.Open()
        MyConnection.Close()
[/code]
poi ho creato delle connessioni sensa
DSN-------------------------------------------------------------
Connessione al Database nel mio PC...........
[code]
        Dim MyConString As String = "Driver={mySQL};" & _
                                    "Server=_My_IP_;" & _
                                    "Option=16834;" & _
                                    "Database=_My_Database_"
        Dim MyConnection As New OdbcConnection(MyConString)
        MyConnection.Open()
        MyConnection.Close()
[/code]
Connessione Database al PC remoto in rete con il mio........
[code]
        Dim MyConString As String = "Driver={mySQL};" & _
                                    "Server=_My_IP_;" & _
                                    "Port=3306;" & _
                                    "Option=131072;" & _
                                    "Stmt=;" & _
                                    "Database=_My_Database_;" & _
                                    "Uid=_My_User_;" & _
                                    "Pwd=_My_Pass_"
        Dim MyConnection As New OdbcConnection(MyConString)
        MyConnection.Open()
        MyConnection.Close()
[/code]
ma in tutti e due i modi mi da un errore di eccezione su Form1 e mi
evidenzia il "Public Class Form1" che e' il form che ospita il codice,
messaggio "Eccezione non gestita di tipo
"System.IO.FileNotFoundException" in system.windows.forms.dll".
Ma e' possibile che non ci si riesca a connettere in remoto???.....con
DSN o sensa......!!!!

 DSN o sensa......!!!!
Io .NET non lo utilizzo... ti chiederò un'ovvietà... hai impostato la
tabella degli utenti in modo che il server mysql accetti la connessione
dell'utente da remoto?

ciao
anche io ho risolto il problema impostando solo la tabella degli
utenti che hanno accesso al db
Newsgroup: it.comp.lang.visual-basic
Titolo: Help per creare file di help!!!

Salve a tutti sono un neo appassionato di VB e vorrei sapere dove
trovare un programmino che permetta di creare i file .hlp per le miei
applicazioni.Inoltre se qualcuno mi indicasse dove trovare informazioni
sulle API di windows gli sarei molto grato!!!
Grazie.
--
Posted from 
bologna.nettuno.it
 [193.43.2.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

Qui trovi un programmino per i file .hlp
http://members.xoom.com/GreenEclipse/
Una serie di macro interessante è Helpy che trovi nella sezione
programmazione di Windows95.com
Per i nuovi file HtmlHelp sul sito Microsoft c'è il nuovo Help Workshop
Ciao.


...


via Mailgate.ORG Server - 
http://www.mailgate.org
Per trovare informazioni sulle API di Windows, prova a visitare il mio sito
Internet 
http://www.armaditaggia.com/marco
.
Ciao
Marco Minerva

Per i nuovi file HtmlHelp sul sito Microsoft c'è il nuovo Help Workshop
Si, ma dove? E' un vero e proprio labirinto!!! Mi sai dire l'indirizzo preciso?
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~
Gabriele Bertolucci - NT4WKSITA+SP3 - VB5PROITA+SP3
pbe...@vi.ats.it
pbe...@freemail.it
 (alias)
pbe...@bigfoot.com
 (alias)
http://members.spree.com/sip/pberto/
http://userspace.ats.it/free/pberto/
 (alias)
http://www.fortunecity.com/skyscraper/spiff/523/
 (alias)
http://www.bigfoot.com/~pberto/
 (alias)
ICQ #: 9732192
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~

Si, ma dove? E' un vero e proprio labirinto!!! Mi sai dire l'indirizzo
preciso?
Dal sito M$ il download č una cosa drammatica (ed ho una linea ISDN
collegata al provider dall'altro lato  della strada!),
lo puoi scaricare invece qui
http://www.worldcity.nl/~marcoko/files/htmlhelp.exe
e mi sembra anche qui
http://www.optionsunlimited.com/myfiles/htmlhelp.EXE
Ciao
P.S. a differenza del vecchio sistema bisogna distribuire, insieme all' html
compilato, un file di runtime ed un OCX (per chi non avesse installato IE4).
--
-
MIX (VB5SP3)
post...@yahoo.com
80 links ai siti VB
http://space.tin.it/computer/gaais
http://www.tempolibero.com/user/mix/
 (alternativo)
-
Newsgroup: it.comp.lang.visual-basic
Titolo: Contenuto di una directory

Salve ragazzi,
ho la necessità di realizzare un programma che mi crei un file testo del
contenuto di un percorso completo ad es.del percorso c:\pippo
c:\pippo\pluto
name    dimension     modified    time
a                12          15/03/03    14.00
c:\pippo
name    dimension     modified    time
b                125         14/03/03    17.00
e questo per tutte le sottocartelle contenute nella principale (pippo).
Ho provato a realizzare qualcosa ma non so come farlo.
Potreste darmi qualche delucidazione o link.
Grazie
MaxD

 MaxD
Via semplice:
1) includi riferimento a Micrisift Scripting Runtime
2) aggiungi questo codice al progetto
Sub stampatutto()
    Dim Fs As New Scripting.FileSystemObject
    Dim sf As Scripting.Folder
    Set sf = Fs.GetFolder("C:\WINDOWS\SYSTEM\")
    stampa sf
End Sub
Sub stampa(sf As Scripting.Folder)
Dim fl As Scripting.File
Dim fd As Scripting.Folder
For Each fl In sf.Files
    ' stampa dati dei file
    Debug.Print "sono un file e mi chiamo " & fl.Name
Next
For Each fd In sf.SubFolders
    ' stampa dati del folder
    Debug.Print "sono un folder e mi chiamo " & fd.Name
    ' poi richiama ricorsivamente
    stampa fd
Next
End Sub
3) lancia stampatutto
4) personalizza per le tue esigenze
Ciao,
termoPilucco

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

Qualcuno di voi conosce un buon algoritmo ed una altrettanta buona
implementazione dello stesso per assegnare codici hash e per ritrovare gli
elementi in tabella?
Ho creato una classe per una semplice gestione delle hashtable ma le
prestazioni sono ancora troppo simili a quelle di una collection standard.
Ciao e grazie.

 wrote in message 8dcpje$8g7$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: comando per chiudere la connessione ad internet

quale comando o chiamata di sistema devo usare per chiudere la connessione
ad internet?
grazie
--
             ,,,,,
           \ e e\
            C  _\/    |\\,
            )\_)    \_ /
          _/|/_     _//
        ,'\ ~ /'-,_/  \
       /   \_/    /   /
      ,  |     \_._,-"
     (  <     _'
     |   \     \
     ', -',-~.-'
     _/  )     |
      |//   |  '
        '   )  |
        |   |  |
     ._.,   -  |.,_ //
  _\-'  )___|__|_    '-._
seco...@iname.com
con...@contra-it.com
ICQ UIN 7014440
----------------------------------------------------------------------------
----

ad internet?
MSVBSite o Sito Comune
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:8kj6lt0b62q3061jk...@4ax.com...


'*****************************************************************************
'DA mettere in GENERALE
Private Declare Function RasEnumConnections Lib "RasApi32.DLL" Alias "RasEnumConnectionsA" (lprasconn As Any, lpcb As Long,
lpcConnections As Long) As Long
Private Declare Function RasHangUp Lib "RasApi32.DLL" Alias "RasHangUpA" (ByVal hRasConn As Long) As Long
Private Const RAS_MAXDEVICENAME = 128
Private Const RAS_MAXDEVICETYPE = 16
Private Const RAS_MAXENTRYNAME = 256
Private Const SUCCESS = 0&
Private Const RAS_RASCONNSIZE As Integer = 412
Private Type RasConn
    dwSize As Long
    hRasConn As Long
    szEntryName(RAS_MAXENTRYNAME) As Byte
    szDeviceType(RAS_MAXDEVICETYPE) As Byte
    szDeviceName(RAS_MAXDEVICENAME) As Byte
End Type
'*****************************************************************************
Sub spegniAccessoRemoto()
Dim RasConn_SizeBuffer As Long, HandleConn As Long, Restituito As Byte, ConnessioniAttive As Long
ReDim RasConType(255) As RasConn
RasConType(0).dwSize = RAS_RASCONNSIZE
RasConn_SizeBuffer = RAS_MAXENTRYNAME * RasConType(0).dwSize
ConnessioniAttive = 0
Restituito = RasEnumConnections(RasConType(0), RasConn_SizeBuffer, ConnessioniAttive)
If Restituito = SUCCESS Then
    For i = 0 To ConnessioniAttive - 1
        HandleConn = RasConType(i).hRasConn
    Next
    Restituito = RasHangUp(ByVal HandleConn)
    End
End If
End Sub
'*****************************************************************************
Ciao SIMO
--
__________________
www.sasim.cjb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione Mod di VB 6

Ciao, sto realizzando un programma, ma ho un problema con la funzione mod di
VB 6:
---Passando un numero troppo grande (un double per intenderci) (19^13) da'
errore di overflow...
Ho cercato di risolvere creando questa funzione :
Private Function modamodmio(N1 As Double, N2 As Long) As Integer
Dim nnn As Double
Dim xxx As Double
    nnn = N1 / N2
    xxx = N2 * Int(nnn)
    modamodmio = N1 - xxx
End Function
Il problema che ho è sul risultato: esempio   N1=19^13   ,   N2 = 85     :
Risultato ottenuto :  48   al   posto di 49  ( calcolato con la calcolatrice
di Win).
Ma la calcolatrice non si può linkare come riferimento???

 Ma la calcolatrice non si può linkare come riferimento???
No.
Ciao
--
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: Datagrid

Ciao a tutti :-))
Mi sapete dire se con il metodo printer.print è possibile stampare un
Datagrid
con tutto il suo contenuto (ovviamente) ???
Come sempre un grazie anticipato per le Vs. risposte

 wrote in message
8oed03$6p1$1...@nslave1.tin.it...

con printer.print stampi tutto quello che vuoi. nel caso della dbgrid puoi
fare un doppio ciclo uno per scorrere i record e annidato un altro per
scorrere le colonne (o i campi)
Ciao stefano

 ha scritto nel messaggio
news:8og6hq$p2g$2...@pegasus.tiscalinet.it...


 Dove sbaglio???
non devi stampare l'oggetto datagrid ma devi passare il contenuto del
datagrid campo per campo e record per record
Dim rec As Integer
Dim altezzastampa As Integer
rs.MoveLast
rs.MoveFirst
' ciclo dei record
For rec = 1 To rs.recordcount
    'definisco l 'altezza di stampa e la incremento per ogni record
    altezzastampa = altezzastampa + 300 ' twips
    ' ciclo delle colonne e dei campi
    For campo = 1 To DataGrid.Columns.Count
        ' definisco posizione di stampa in twips per ogni campo del record
        Printer.CurrentY = altezzastampa
         ' definisco la posizione di stampa currentx di ogni campo in base
alla posizione left della colonna
        Printer.CurrentX = DataGrid.Columns(campo - 1).Left
        Printer.Print DataGrid.Columns(campo - 1)
    Next
    rs.MoveNext
Next
printer.enddoc
per fare questo ho usato un DBGrid ma il datagrid  6 dovrebbe avere la
stessa sintassi naturalmente la cosa non e limitata al mio esempio
devi tener conto del salto pagina se la variabile altezzastampa supera un
certo valore
puoi usare la prop caption del datagrid per stampare le intestazioni di
colonna su ogni pagina
ciao stefano
usando le prop textwidth puopi testare le la stringa instampa supera
l'ampiezza della colonna e troncarla per evitare di sovrascrivere le colonne
ecc.
con la prop captio
, con opportuni accorgimenti puoi stampare all'