mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Scrivere su file all'inizio

se lo apri in modalità append si posiziona sull'ultimo o no?
Ciao


Dopo la open sono già posizionato sul primo record/byte che però è 1 e non 0
Ciao

Close fileNum
--
DoS :: 
dos...@hotmail.com
«Non la forza, ma la costanza
di un alto sentimento fa gli
uomini superiori», Nietzsche

Credo che ti basti usare SEEK e indicare la posizione in byte (credo) dove
vuoi iniziare a leggere/scrivere.
non lo ho mai usato, ma penso che basti qualcosa tipo
    open ...
    seek 0
    print#/write#
Ciao Massimiliano

    print#/write#



Quindi tu vuoi fare un insert all'inizio del file, l'unica cosa che puoi
fare (secondo me) è quella di creare un nuovo file scriverci quello che
vuoi, poi devi accodare il contenuto del file originale, ed infine
cancellare il file originale e rinominare quello nuovo con il nome del
vecchio.
Ciao VB

Newsgroup: it.comp.lang.visual-basic
Titolo: [Principiante] Convalida numeri

Premettendo che sono agli inizi vorrei sottoporre alla Vs attenzione
il seguente codice (è banale, lo so... ma siate buoni.....  : )
Esiste (domanda retorica) un metodo migliore che permette
l'inserimento di soli numeri e di una sola virgola?
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
   Case Is < 12
   Case 14 To 31
   Case 48 To 57
   Case 44
       If InStr(Text1.Text, ",") Then
       KeyAscii = 0
       Else
       KeyAscii = 44
       End If
   Case 46
       If InStr(Text1.Text, ",") Then
       KeyAscii = 0
       Else
       KeyAscii = 44 ' come nella calc. di windows
       End If
   Case Else
      KeyAscii = 0
End Select
End Sub

 ha scritto nel messaggio
news:9i7hgd$lk5$1...@usenet.inwind.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: URGENTE Crystal Report e Anteprima di Stampa

URGENTE Crystal Report e Anteprima di Stampa
Ho la necessità di realizzare un'anteprima di stampa (e quindi una stampa)
con immagini e testo e vorrei usare Crystal Report ma incontro un problema
che non riesco a risolvere cioè non riesco a mettere (e quindi a stabilire)
le immagini tramite codice da VB4.
Diversamente, non utilizzando Crystal Report, non riesco a far
corrispondere la dimensione del testo, scritto della stampante, con quella
del picture che utilizzo per la visualizzazione dell'anteprima.
Chi già ha realizzato anteprime di stampa con Crystal Report o senza (cioè
con VB4) lo pregherei di mettersi in contatto per dei chiarimenti.
Ringraziandolo fin da ora.
art...@edisons.it

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

Ciao a tutti,
     č da poco che programmo in VB ed uso la versione 6.0 Enterprise
Edition. Ho un problemino con i files: dopo che ho aperto una
CommonDialogBox, come faccio a controllare da programma che il file che
voglio salvare NON sia presente sulla directory in cui mi trovo? Per
capirsi, dovrei visualizzare un messaggio di conferma di sovrascrittura ...
grazie mille! Alessandro.

 ha scritto nel messaggio
news:8s773p$qke$1...@nslave2.tin.it...

Forse sbaglio ma il controllo č implicito nel Common Dialog a meno che tu
non imposti costanti differenti...
Ciao
Dari

if dir("c:\pippo.txt") = "" then
    msgbox "non esiste!",vbInformation,"CIAO!"
else
    msgbox "esiste!",vbInformation,"CIAO!"
endif


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] che controllo utilizzare??

ciao a tutti, devo fare un form dove caricare una griglia come segue
                            gen  feb mar apr. ...........................
....... dic    tot    progressivo
clienteA     Qta     nnn nnn
!         !            n
                    $      xxx xxx
clienteB      Qta     nnn nnn
|        !            !
                    $      xxx xxx
    |                |            !
|        !            !
    |                !            |
!        !            !
clienteB      Qta     nnn nnn
!        !            !
                    $      xxx xxx
|        !            !
però non so proprio che tipo di componente utilizzare.
voi cosa consigliereste??
grazie 1000
ciao

 ha scritto nel messaggio
news:OnRt6.148$bw6....@news.infostrada.it...



Innanzi tutto, usa un font a passo fisso quando disegni dei diagrammi in un messaggio :)
Se dici che devi disegnare una griglia, allora prendi una griglia ! Seleziona la Microsoft Flexigrid,
che e', come dice il suo nome, piuttosto flessibile e ti permette di fare quasi di tutto.
ciao, hal

in effetti non si capiva molto.
cmq grazie per il consiglio


 Report. Leggiti un po di MSDN è semplice.
la listview non mi piace per quello che voglio fare
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] E dopo Punto Informatico...

...ora mi pubblicano pure in Romania!!! :)
http://www.xtrempc.ro/revista.php
http://www.xtrempc.ro/revista.php?idrev=1109944028
(cerca "Sinapsi Antispam" nella lista dei programmi sul cd...)
Evvai! :)
bye
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.sinapsi-antispam.tk
http://www.nicolaottomano.it/sinapsi.htm
Ingrosso Orologi.
http://www.supertop.it
email spamtrap: 
spam...@nicolaottomano.it

 bye
Andrea


http://www.google.com/search?q=+%22Andrea+Raimondi%22&hl=en&lr=lang_ru&safe=off&as_qdr=all&filter=0
Dilettanti :)
http://www12.tok2.com/home2/DerutaOmega/gx%20kiroku1.html
termoPilucco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Sei sicure?
Io vedo solo caratteri incomprensibili :P
(P.S.: come si fa ad installare i font giapponesi con FF?) 

 >


Se vedi caratteri incomprensibili significa che li hai già istallati :P
comunque dovrebbe bastare: visualizza --> codifica caratteri -->
Giapponese (Shift_JIS)
termoPilucco&#12373;&#12435;


 
http://www12.tok2.com/home2/DerutaOmega/gx%20kiroku1.html
Rilancio :)
http://www.google.it/search?hl=it&q=%22Sinapsi+Antispam%22&btnG=Cerca+con+Google&meta=
392 siti in "Italiano, Portoghese, Inglese, Rumeno, Magiaro, Russo,
Giapponese"


 ...ora mi pubblicano pure in Romania!!! :)
principiante !!!
Cerca lo "svuotazaino" sulle comunity di Ultima Online :ppp
ghgh
-- 
[un Gigio2k che... non ha manco una pubblicazione in giro... grrrr ]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm


ahahaha
L'ho fatto anche io!!!
-- 
[...] all'inizio hai una sensazione di onnipotenza sull'azienda,
che si trasforma in fastidio fino a trasformarsi in dolore; allora ti
guardi dentro i boxer e ci trovi i clienti, la societą per cui lavori, i
consulenti, i programmatori, tutti aggrappati allo scroto con le loro
unghiette adunche. [Vincent Vega su It.lavoro.informatica]

Newsgroup: it.comp.lang.visual-basic
Titolo: gara di programmazione

qualcuno mi sa dire se ci sono ora e nei prossimi mesi gare di
programmazione in visual basic?

 gare di programmazione in visual basic
prego?
-> GbC
http://www.gbcweb.com

 prego?
se questo e' il commento del cerimonioso gbc,
temo un alpino growl...
non oso pensare se avessero detto
"gare di programmazione in html"
j.agon


Hai presente quelle cose tipo:
"scrivere un programma di grafica tridimensionale il cui sorgente stampato
sia a forma di paguro"?
Parlando seriamente, esiste ad esempio una sezione su Google
http://directory.google.com/Top/Computers/Programming/Contests/
ma a occhio non ho visto nulla relativo a VB.
Mi sembra che VBExplorer.com ne faccia ogni tanto...
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Esattamente ciň che intendevo...
-> GbC
http://www.gbcweb.com
Newsgroup: it.comp.lang.visual-basic
Titolo: listbox - selezione senza mouse

Ho il mio listbox che con l'evento DblClick mi seleziona correttamente
l'elemento scelto.
Non riesco ad ottenere lo stesso risultato senza l'uso del mouse (con le
frecce sù e giù e poi l'invio).
Con le frecce si sposta l'elemento evidenziato.
Qualcuno sà come selezionarlo con l'invio?
Grazie, Sauro

 ha scritto nel messaggio
news:fCR59.58685$n04.1...@twister2.libero.it...

Private Sub listbox_KeyPress(KeyAscii As Integer)
  Dim X As Integer
  If KeyAscii = 13 Then
        '13 corrisponde al codice ascii per il tasto
        'invio, altrimenti puoi usare la variabile
        'vbKeyReturn (magari più pratico)
    X = listbox.ListIndex
  End If
  MsgBox X     'controlla il valore selezionato
End Sub
ciao!
vb_kainos
Newsgroup: it.comp.lang.visual-basic
Titolo: Testare porte aperte conoscendo IP

Dovrei testare tutti i PC della mia rete per vedere che non siano aperte
certe porte a rischio di worm
Eseguo le seguente istruzioni:
Winsock1.Protocol = sckTCPProtocol
Winsock1.RemoteHost = IP$
Winsock1.RemotePort = NPorta$
Winsock1.Connect
... e poi mi metto in attesa dei seguenti eventi
Winsock1_Error    -> la porta non e' aperta
     oppure
Winsock1_Connect  -> la porta e' aperta
Il mio problema è che per testare la porta ci mette tantissimo e a volte
sembra non uscire piu'.
C'e' qualche soluzione piu' veloce per sapere solo quali sono le porte
aperte di un certo IP ?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
Della serie "Non reinventiamo la ruota"? ;-)
http://netcat.sourceforge.net/
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 
L'Hackeronzola! Si chiama Teresa ...
Secondo me se uno tenta di fare uno scanner in VB non e' un cattivo ...


Se avessi bisogno di fare hackeraggio andrei su altri siti e non
sicuramente su questo forum che ritengo serio.
La mia domanda era la possibilità di fare qualcosa di veloce con VB6.
Se non sei in grado di capire la domanda o fraintendi la questione
astieniti!
Degli scanner , comunque non me ne faccio niente perche' se trovo della
porte aperte devo crearmi un file di log
e poi devo mandare un messagiio via rete e personalizzare comunque la
risposta.
e anche per questo ... Case : B = 'Non ho capito la domanda perchè
dormivo'


risposta.
???
-- 
ciao, hal

 ha scritto nel messaggio
news:7a3eceaebcf3abc466b...@mygate.mailgate.org...

http://www.planetsourcecode.com/vb/default.asp?lngWId=1
prova ad andare su questo sito , URL di sopra, e a fare la ricerca di "scan"
ne ho visti un bel po' di esempi, uno era molto veloce, diceva lui, 13
minuti per 32000 porte
poi dipende da te il concetto di veloce/lento considerando il vb.
spero di esserti stato d'aiuto, baci e abbracci
Alfredo.

 aperte di un certo IP ?
    Ciao.

 risposta.
Allora usa Languard, gli fai fare il "lavoro sporco" (la scansione),
salvi il log e lo analizzi, mandando tutti i messaggi che vuoi.
Volendo puoi aggiungfere le porte che ti servono se non sono
già in lista, ma queste ci dovrebbero essere tutte, tranne la 389:
13,25,53,110,139,445,515,389,3389. ;-P
Meglio ancora, MBSA e/o HFNetChk:
http://www.microsoft.com/technet/security/tools/Tools/MBSAhome.asp
che su macchine W2K possono fare anche altro...
Reinventare l'acqua calda, non è solo inutile, è una perdita di
tempo, che potresti utilizzare meglio, per esempio, installando
le patch per Blaster, aggiornando gli antivirus e studiando i fratti
semplici . ;-P
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: OT: macro con Excel

scusate l'OT, ma non so dove trovare info in merito.
ho messo a punto un sistema per la creazione di qualsiasi tipo di
documento word/excel, ho qualche
fastidio con l'Excel.
Ho creato una macro che stampa il foglio attivo su file usando una
stampante postscript, il file
ps viene 'dato in pasto' a Ghost Script che crea il pdf.
tutto funziona alla perfezione, vorrei ridistribuire la macro su tutte
le macchine aziendali, e ho
scoperto che esiste un file chiamato personals.xls che è come il
normal.dot di word.
è sufficiente che apro qwesto file, gli salvo all'interno la macro e lo
ridistribuisco?
vorrei anche associare alla macro una barra degli strumenti
personalizzata che lancia la macro,
come si può ridistribuire?
scusate ancora ma non sapevo/so dove altro postare...mi rimetto alla
clemenza della corte
ciao a tutti
Mirko Parisi
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

si devi inserire nel personal.xls e ridistribuirlo.
attenzione pero a farlo partire all'inizio

 attenzione pero a farlo partire all'inizio
intendi che devo fare attenzione a posizionarlo nella cartella corretta?
se sì è già ok, il mio problema é se posso distribuirlo semplicemente
copiando il file se un'altra macchina.
seconda cosa vorrei distribuire anche la toolbar personalizzata e il
pulsante associato alla macro che creo sulla mia macchina.
mi pare che per questo scopo personal.xls non sia sufficiente e ci sia
qualcosa come default8.xlb (o nome similare che varia di installazione
in installazione) che si occupa di questo.
non ho trovato nulla in merito e non so nemmeno dove andare a cercare,
mi affidavo a qualche esperienza già vissuta.
tnx
mirko parisi

Newsgroup: it.comp.lang.visual-basic
Titolo: stampare stringhe su vari puti di un foglio?

mi hanno chiesto di fare un prog. per stampare bolle. Richiede l'immissione
di stringhe da piazzare in varie punti/aree su un foglio preformattato da
una tipografia.
Avete suggerimenti? Le stampanti possono avanzare ritornare sui loro passi e
riprendere in un punto qualsiasi o bisogna creare ...qualcos'altro?Avete un
metodo che non sia dipendente dalla stampante?
ciao.grazie.
ciao
http://members.xoom.it/webbrowser/
fabi096...@hotmail.com

metodo che non sia dipendente dalla stampante?
Guardati le proprieta' e i metodi dell' oggetto Printer.
Quando posizioni testo e grafica sulla pagina puoi farlo nell' ordine che ritieni piu' opportuno,
perche' la pagina viene inviata alla stampante tutta in una volta sola con il metodo
EndDoc (e forse anche NewPage, ma non ho verificato).
ciao, hal

 ha scritto nel messaggio
news:9bueho$b4nc4$1...@ID-56381.news.dfncis.de...


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

Auguri di Buon Natale e Felice 2009 a tutto il Newsgroup ed un immenso 
grazie a tutti per l'aiuto che date.
Ciao Sandro 

 grazie a tutti per l'aiuto che date.
Mi accodo e auguro a tutti un 2009 ricco di lavoro.
ciao
Stefano

 Mi accodo e auguro a tutti un 2009 ricco di lavoro.
Auguri anche da parte mia :)

 Auguri anche da parte mia :)
e mia :) 

 e mia :)
...e mia!
-- 
Ciao Fede
By Chicco Production
http://bcp.freetools.it

auguri a tutti
http://www.sundaysw.com/tmp/xmas2008.jpg
ciao

 ciao
Auguri a tutti...
ringrazio anch'io per l'immenso aiuto che viene dato in questo
newsgroup
Ciao, Marco.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] record in DBgrid

Ho una DBGrid collegata ad un Data che, a sua volta, è collegato ad una
Tabella di un DB Access.
Come faccio a sapere quandi Record Visualizza la DBGrid?
In pratica la DBGrid è inserita in un form che permette di eliminare i
record della DBGrid stessa tramite la selezione e premendo il tasto Elimina.
Però quando non ci sono record nella DBGrid il pulsante Elimina deve essere
disabilitato! Avevo pensato per questo scopo:
if DBGrid.?proprieta? = 0 then
    Elimina.enabled=false
else
    Elimina.enabled=true
end if
Come Faccio?
Ciao e grazie
Andrea

Ciao
Usa la proprieta' datacontrol.recordset.recordcount.

Per l'abilitazione del tasto <Elimina> o <Modifica> o di qualsiasi altro
tasto che richiede che esista un record corrente ti consiglio di utilizzare
la proprieta' AbsolutePosition dell'oggetto Recordset associato al
DataControl
NB Usando la Prop. RecordCount non hai la garanzia che nel momento in cui
vuoi eseguire un operazione esista un record corrente , AbsolutePosition
invece vale  (-1) quando non e' puntato alcun record.......
PulsElimina.Enabled=(dataX.recordset.AbsolutePosition <> -1)
Saliuti
Newsgroup: it.comp.lang.visual-basic
Titolo: [!] Doppie dichiarazioni che si compilano

Mi sono sempre chiesto perchè a volte VB non si accorga che la stessa
funzione è dichiarata pubblica più volte nel progetto, ed oggi l'ho
finalmente capito:
Aprire un progetto e inserire 2 moduli nuovi, mantenendo i nomi di default
Modulo1 e Modulo2:
In Modulo1 inserire il seguente codice:
Public Sub Dichiarata2Volte()
   MsgBox "Modulo1"
End Sub
In Modulo2 inserire il seguente codice:
Public Sub Dichiarata2Volte()
   MsgBox "Modulo2"
End Sub
Provate a compilare e vedrete che VB non si lamenta per niente, neppure
creando l'EXE.
Ora in Modulo 1 inserire il seguente codice:
Public Sub EseguiNelModulo()
   Dichiarata2Volte
End Sub
e nella Form1 inserire il seguente codice:
Private Sub Form_Load()
   EseguiNelModulo
End Sub
Provate a compilare e vedrete che VB non si lamenta per niente, neppure
creando l'EXE. Se si manda in esecuzione, viene chiamata la funzione
presente nello stesso modulo in cui avviene la chiamata (Modulo1).
Ora provate a inserire nella Form 1 questo codice:
Sub GeneraErrore()
   Dichiarata2Volte
End Sub
A questo punto non si compila più e VB dice che è stato rilevato un nome non
univoco (Dichiarata2Volte).
Insomma. Se la funzione Dichiarata2Volte non viene chiamata, VB non si
preoccupa. Se viene chiamata all'interno di un modulo in cui è stata
dichiarata, VB usa quella presente in quel modulo, se invece viene chiamata
esternamente, VB non sa quale chiamare e si lamenta.
Non so voi, ma io fino a stamattina non lo sapevo.
Ciao
*Roby*


Si chiaro...
Non ci hai mai pensato? VB usa le regole di scoping per tutto, inclusi i
nomi delle funzioni; se hai due funzioni con lo stesso nome puoi
referenziarle premettendo il nome del modulo.
Questo fa si' che sia possibile e lecito dichiarare due funzioni con lo
stesso nome in due moduli diversi e referenziarne una dallo stesso modulo
senza specificare lo scope. Solo se la chiamata e' esterna si rende
necessario specificare il namespace...
Ciaotutti,
*

 Non so voi, ma io fino a stamattina non lo sapevo.
io nemmeno. e secondo me neanche vb :)
grazie, a.

Hai fatto bene a dirlo, ma non è una cosa tanto
strana, perchè le regole di scope sono conservate
e sempre rispettate.
Certo sarebbe meglio almeno avere un warning.
                    danilo

 scope (il modulo in cui sono dichiarate).
Insomma,  a parte me e Java lo sapevate già tutti.
Mi pare di essere quello della pubblicità del caffè decaffeinato, dove tutti
lo sapevano e nessuno glielo ha detto . :-)
Ciao
*Roby*

 lo sapevano e nessuno glielo ha detto . :-)
dillo a me... hot java... java beans...
come vedi, il cane (quello vero: diffidare nelle numerose imitazioni) e' il
miglior amico del roby...
consolati: noi abbiamo imparato una cosa nuova, loro no :))
warm java

nome puoi referenziarle premettendo il nome del modulo.
Io lo sapeeevooo, io lo sapeeevooo... :P Come adoro ripetere io (non 
crescerò mai :P), le funzioni VB internamente sono dichiarate come:
stdcall void modulo::funzione(void)
Quindi il nome del modulo è parte dell'identificatore della funzione
Newsgroup: it.comp.lang.visual-basic
Titolo: prova autorun

Chi vuole dare un giudizio an un'autorun che sto creando e sarà presto
finito?
Lo posso inviare ad una sola persona, la prina...
L'autorun è fatto con una lista di programmi, una casella di testo per i
commenti e un riquadro delle immagini.
Questa versione beta 1 prende i file memorizzati in 4 dll su cui voi dovrete
scrivere 1. Lista programmi 2. Lista directory programmi 3.Commenti
programmi 4. directory immagine. Non è un gran che, ma può essere utile.

 wrote in message
lP4p5.125901$dF5.2...@news.infostrada.it...


 ugo
Volevo mandarlo su 
it.comp.hardwere.cd
, ma questo outlook express... Adesso
lo mando ad Artefix e poi se viene una cosa decente lo metto nel suo sito.

Newsgroup: it.comp.lang.visual-basic
Titolo: Dimensioni catra

tra le proprietā del metodo Printer (
vb.net
) esiste .papersize (dimensioni
carta)
esiste una leggenda che mi dica  (A4 , A4 Small, ecc..) a cosa corrisponde ?
ad esempio A4 a 29,7x21 (mi sembra). Dovrei usare un modulo continuo le cui
misure sono pių corte di un A4.Oppure esiste l'impostazione personalizzata ?
e come si imposta da codice ?Grazie

 e come si imposta da codice ?Grazie
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vb98/html/v
bproPaperSize.asp
Lascia stare quella della guida in italiano, dove son riusciti a tradurre i
pollici in cm...

">
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vb98/html/v
bproPaperSize.asp
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Cellulare GRATIS!!! Rispondi all'E-mail per sapere come.....

lRispondi a questa E-mail se vuoi avere notizie su questo nuovo
servizio...
Per ogni sms ricevuto sul tuo cellulare il tuo credito telefonico sarà
aumentato di 200 lire...

Ma forse stamattina o sbagliato NG?
Mi sembrava quello del VB ma vedo solo msg cellulari......
Penso che un po tutti hanno capito che si guadagna ricevendo msg
e allora basta invarli su questo Ng........
Newsgroup: it.comp.lang.visual-basic
Titolo: Contare il numero di record

Ciao a tutti,
in una sub ho inserito il codice qui sotto per calcolare il numero di
record presenti in un database,
  Dim RT As Integer
  Data1.Recordset.MoveLast    (*)
  RT = Data1.Recordset.RecordCount
  Label8.Caption = RT
ma quando mando in esecuzione il programma ricevo un errore 91 "Object
variable or With block variable not set" nella riga contrassegnata
dall'asterisco. Dove sbaglio?
  |\/\/\/|    Vincenzo Accardi - (Palermo - ITALY)
  |      |    
  |      |     E-Mail: 
vin...@iol.it
 
  | (.)(.)        Web: 
http://vicio.freeweb.org/
  C      _)   ICQ UIN: 20344085
  | ,___|
  |   /      Membro dello staff LIIF - [Sezione Contatti]
 /  U \      LIIF - Lega Italiana Fantasport su Internet
/______\     
http://www.geocities.com/Colosseum/Loge/4444/

Hai assegnato al controllo data anche le proprietą Databasename e
Recordsource?
Prima di eseguire il tuo codice controlla di non essere alla fine del tuo
recordset altrimenti ti puņ dare errore.
Ciao Marco
-- 
Remove xxx from E-mail.

...


dall'asterisco. Dove sbaglio?
Probabilmente hai messo questo codice nel Form_Load(), o nel initialize(),
prima che il DataControl si inizializzi.
Prova a fare cosi':
Dim RT As Integer
Data1.refresh
Data1.Recordset.MoveLast    (*)
RT = Data1.Recordset.RecordCount
Label8.Caption = RT
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Acqusizione immagini da scanner

Salve a tutti,
c'è qualcuno che sa come si fa da vb ad interfacciarsi con uno scanner?
Mi spiego meglio: dovrei sviluppare un programma che permette di acquisire
delle immagini da uno scanner, non posso agire sull'I/O della porta perché
devo prevedere anche un possibile scanner SCSI. Al limite potrei
accontentarmi anche di rilevare il programma installato che si usa per
axquisire le immagini dallo scanner e lanciarlo.
Se qualcuno mi può aiutare gliene sarei molto grato.
Lele

 wrote in message 3834f...@news.megasys.it...


 wrote in message
YUM35.234772$VM3.1...@news.infostrada.it...


Sinceramente non lo sò, credo che tutto ciò dipenda dai driver TWain, forse
puoi trovare delle informazioni su qualche file dato in dotazione con la
periferica. Non penso però che questo gioverebbe ad una applicazione
"distribuita" visto che diventerebbe troppo specifica per una periferica.
LP

 wrote in message
a7r45.251103$VM3.1...@news.infostrada.it...


 wrote in message


 wrote in message 8ivaic$283$1...@nslave2.tin.it...


     sPara č un oggetto tuo o del ocx?
sPara č una semplice CheckBox, nella mia form, quindi un mio oggetto.
Saluti
Lele

Ciao Lele, per il programma ho seguito i tuoi consigli e tutto Ok ma sono
andato dal cliente, ho fatto una prova di scannerizzazione e "Puft" Errore:
Impossibile visualizzare l'immagine", e non ha visualizzato nemmeno la
Finestra dell scanner
Come mai?
cosa è successo?
Poi ancora come si fa a cambiare il formato del file? Se mi facessi
un'esempio te ne sarei grado perchè la proprietà
Picture che ho nel DataReport non supporta il formato della scannerizzazione
anche se è BMP.
Per favore è urgentissimo
bye Roberto

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Personalizzare IDE

Wuando mi modifico la toolbar dell'IDE di VB6 (spostando, aggiungendo
comandi, ecc), dove vengono salvate queste impostazioni? Ed a seguito
di che evento (salvataggio del progetto, conferma delle modifiche, o
altro)?
Bye by SixaM 8-]


Nel registro di Windows, HKCU\Software\Microsoft\VisualStudio\6.0\UI.
Quando si chiude l'IDE viene aggiornato il registry (ovviamente, non a 
seguito di crash).
Bye
Raf

Forse un po' OT
Vorrei eliminare tutte quelle parole ricercate nella guida di VB6 che 
rimangono salvate nella ComboBox della guida, dove si salvano l'elenco delle 
parole ? Nel Registro?


Nel file HH.DAT che trovi in \Documents and Settings\%username%\Dati 
applicazioni\Microsoft\HTML Help.
Basta cancellare il file, verr� ricreato dalla guida di windows 
automaticamente.
http://www.help-info.de/en/xml/maml_faq.xml#HTMLHelp
Bye
Raf 

"Rafunk" <rafun...@NOTHANKSlibero.it> ha scritto nel messaggio 
news:gtrl1l$abq$1...@alix.livenet.it...

Grazie mille !!!
Newsgroup: it.comp.lang.visual-basic
Titolo: Differenze tra RichText e TextBox

ciao a tutti (questa volta ho seguito il consiglio mettendo il subject
giusto!!!) 
ho fatto un clone del notepad di windows con altre aggiunte
personalizzate poi in
seguito ho dovuto cambiare la textbox con una richtext e qui si e'
incasinato tutto nel senso che non capisco come mai e spero che qualcuno
mi possa aiutare!!!
avevo messo un comendo per invertire il colore di sfondo in questo modo:
If mnuNegativo.Checked = True Then
   txtEdit.ForeColor = &HFFFFFF
   txtEdit.BackColor = &H0&
   mnuNegativo.Checked = False
Else
   txtEdit.ForeColor = &H0
   txtEdit.BackColor = &HFFFFFF
   mnuNegativo.Checked = True
End If
con il textbox funzionava perfettamente... come mai con la richtext non
funziona!!! 
altro problema dei font avevo messo questo controllo ma ancora una volta
con la richtext non funziona come mai???
Select Case index
Case 10
    txtEdit.FontName = "FixedSys"
    txtEdit.FontSize = "9"
Case 11
    txtEdit.FontName = "Arial"
    txtEdit.FontSize = "10"
Case 12
    txtEdit.FontName = "Courier New"
    txtEdit.FontSize = "10"
Case 13
    txtEdit.FontName = "Times New Roman"
    txtEdit.FontSize = "10"
End Select
grazie a tutti per l'attenzione
Antoino.

End If
Perchč la textbox lavora con l'intero testo contenuto, quindi basta cambiare
il colore o il font e il cambiamento č riflettuto su tutto il testo.
Il RichTextBox lavora (quasi) come il Write (non come il Notepad che usa una
TextBox normale), quindi il cambiamento di colore/font si applica solo alla
parte selezionata.
Inoltre (non ricordo se il limite era stato superato) le textbox possono
contenere 64k di testo (mai chiesto perchč se apri un file di testo troppo
grande win ti dice "file troppo grande per notepad... provare con Write"?).
Fai cosě: seleziona tutto il testo e poi applicagli lo stile, poi riporti il
cursore alla vecchia .SelStart.
Oppure lascialo lavorare come dovrebbe, quindi lasci selezionare
all'operatore il testo che vuole modificare e applichi le modifiche.
Ciao

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

Salve sono agli inizi e sto creando un visualizzatore di immagini!
Voglio che cliccando su un file mettiamo .jpg mi si apra in Picure1.!
Cosa devo fare?
Grazie
Private Sub drvDrive_Change()
 drvDrive.Drive = drvDrive.List(drvDrive.ListIndex)
 dirlist.Path = drvDrive.Drive
End Sub
Private Sub dirlist_Change()
 filList.FileName = dirlist.Path
End Sub
Private Sub filList_Click()
End Sub
Private Sub Picture1_xxx()
End Sub

 ha scritto nel messaggio
news:8tuebj$1sb$1...@news.mch.sbs.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Santi e & Santità

Ciao a tutti,
sto costruendo per un applicazione un calendario.
Il lavoro si è fatto serio e volevo inserire nel giorno anche il santo
e tra le ToDo del giorno il ricordarsi di fare gli auguri a : nome.
Ho spulciato parecchio la rete e it.comp.lang.visual-basic, ma non ho
trovato niente di utile. (in un vecchio 3d si diceva che qc aveva sto
database... ma non lo trovo...).
Chi è a conoscenza di questa misteriosa opera mi può rendere
partecipe.
Grazie di tutto
MrBinding

 ha scritto nel messaggio 
news:1129715113....@o13g2000cwo.googlegroups.com...

Ho combattuto una volta con un calendario simile.
Ricordo che avevano abolito una festività, mi sembra la befana, poi 
reintrodotta.
Forse conviene inserirli in un file di testo, ini, xml, database, leggerli e 
formattare il giorno di conseguenza.
Per la Pasqua puoi utilizzare
http://www.it-lang-vb.net/archivio.asp?subMenu=Tutte&FullText=on&TypeRic=AND&keyword=Calcolo+del+giorno+di+Pasqua+&x=9&y=7
Ave
giuseppeD
---
CCR

 Grazie di tutto
E' un lavoro che se trovi già fatto ok, altrimenti in una mezz'oretta, con
uno che ti detta da un calendario (ti consiglio Frate Indovino perchè
riporta anche 2-3 ricorrenze per signolo giorno) ti sei realizzato la tua
tabella dei Santi, ed eventualmente poi metterla anche sul sito comune.
Ciao e buon lavoro
--
Greg


Dovrebbe stare sul sito comune; qua se ne parlava
http://groups.google.it/group/it.comp.lang.visual-basic/browse_thread/thread
/c405a1ed67844ae4/375e73c6cd947851?lnk=st&q=%22tabella+dei+santi%22&rnum=3&h
l=it#375e73c6cd947851
--
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: libri vb .net

Ciao a tutti ho scritto per alcuni consigli e fino a adesso mi siete
stati molto di aiuto!!! (((Thank you everybody)))
Passo alla domanda per vb . net mi avete consigliato il libro di
Balena (quello di 1100 pagine mi sembra) e invece come "libro base" e
con CD dei tutorial cosa posso acquistare qualche edizione di quelle
"for dummies", ma già il nome tradotto nn
mi sembra convincente..... o quale?
ciao a utti di nuovo e grazie!!!


Newsgroup: it.comp.lang.visual-basic
Titolo: Stampante predefinita

Ciao a tutti,
all'interno del mio codice uso un ciclo di questo tipo per conoscere il
nome di tutte le stampanti installate sul PC ove l'applicazione gira:
Dim stampante As Printer
 
 For Each stampante In Printers
    cmbStampanti.AddItem stampante.DeviceName
 Next
cmbStampanti è una combo che viene caricata con tutti i nomi.
Il mio problema, però, è quello di conoscere il nome della stampante
predefinita. Qualcuno può aiutarmi?
Ciao e grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ciao e grazie
All'inizio del programma l'oggetto Printer è associato alla stampante di 
default (occhio al caso in cui non ci sia installata nessuna stampante 
sul computer).
Ciao
    Michele

Ciao e grazie per la risposta. Il problema che continuo ad avere, però,
è che non riesco a fare riferimento al nome della stampante.
Se scrivo una cosa del tipo:
Dim s as string
s = stampante.DeviceName 
mi da errore
Come mai?


 Come mai?
Cosa è "stampante"?
Prova a fare all'avvio del programma questa cosa:
MsgBox Printer.DeviceName

Ok. Ho capito.
Ora funziona!!! Grazie! :-)


Newsgroup: it.comp.lang.visual-basic
Titolo: compilazione pacchetti

Come fare in 
vb.net
 2003 per creare il programma di installazione del
progetto?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 progetto?
File --> Nuovo --> Progetto --> Progetti di installazione e 
distribuzione.
Christian
Newsgroup: it.comp.lang.visual-basic
Titolo: Stack pieno

Ciao , ho un programmino che lancia dei video con oggetti mediaplayer, ed un
timer che ogni 30 ms controlla il joypad, per vedere quale mediaplayer
mandare in play.
Sembra funzionare tutto perfettamente, ma dopo un po si blocca tutto e non
si muove neanche il mouse. Ho provato  col debug, ma non ci sono errori di
loop o altro.
Allora mi e' venuto il dubbio che col timer a 30 ms non lascio spazio al
sistema operativo per fare tutte le sue cosette e quindi lo stack si riempie
fino a mandare tutto in crash.
Se qualcuno ha un idea per risolvere il problema gli faccio un monumento...
Ciao Grazie


wrote:

Svuti eventuali buffer utilizzati dal programma?
Ciao
Aran

 fino a mandare tutto in crash.
30 ms sono davvero pochini (credo anche al limite di quanto il timer possa
realisticamente "rispettare") e, per questo, è molto probabile che le
istruzioni comprese nell'evento Timer1_Timer non siano ancora concluse
quando si scatena il successivo evento (dopo 30 ms)
Prova così:
Nell'evento Form_Load:
Timer1.Enabled=False
Poi, quando vuoi, abiliti il tuo Timer con Timer.Enabled=True
Nell'evento Timer1_Timer:
Private Sub Timer1_Timer
    Timer1.Enabled=False
    ...Istruzioni del tuo timer, quante ne vuoi
    Timer1.Enabled=True
End Sub
In questo modo, anche se le istruzioni all'interno dell'evento Timer durano
più di 30 ms, sarai certo che non c'è ricorsività, ovvero l'evento non verrà
richiamato (il Timer viene disabilitato) fintanto che le istruzioni in corso
non sono state completamente eseguite (il Timer viene riabilitato).

 (il Timer viene riabilitato).
povero ! di cosa l'avevano ingiustamente accusato ?
j.mamma.che.caldo.

 j.mamma.che.caldo.
A Cremona, stasera ha fatto temporalone, vento, pioggia e grandine.
Nessun danno, si è rinfrescato un po'. Stanotte si dorme decentemente.

Newsgroup: it.comp.lang.visual-basic
Titolo: Ruotare l'area di stampa

Ciao a tutti e grazie inanzitutto a tutti coloro che mi hanno aiutato a
risolvere il problema di come ruotare una label.
Adesso ho un altro quesito da porvi sempre inerente alla rotazione di
testi e (possibilmente) anche di immagini.
E' possibile stampare un testo oppure un immagine ruotata in visual
basic 6? Mi spiego meglio: se voglio stampare su carta un testo in
verticale fino ad oggi cambiavo l'orientamento della stampante
impostando la seguente riga di codice:
Printer.Orientation = 2
però questo mi stampa il testo dal basso verso l'alto...vorrei poter
fare una stampa del testo dal basso verso l'alto e da destra verso
sinistra con il testo capovolto. Inoltre se fosse possibile vorrei
ottenere lo stesso effetto con le immagini
Grazie a tutti coloro che vorranno rispondermi
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Grazie a tutti coloro che vorranno rispondermi
--
ciao
  Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: RAS Funzione: RasSetEntryDialParams

Sto cercando di utilizzare RASAPI32.DLL da Visual Basic per cercare di
impostare una Conessione Remota personalizzata. Non trovo esempi funzionanti
che illustrino come creare una Phone-Entry sia in Win 95/98, che Win Nt 4.0.
Bisogna effettuare una chiamata a RasSetEntryDialParams, ma io ottengo
sempre come return-code l'errore (RAS):623. Utilizzo Win Nt Workstation 4.0
e Visual Basic 6.0.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [quasi OT] PostGres e VB/ASP

Chi di voi usa PostGres con VB e/o asp?
--
RedFoxy
A fox around web
Power at fox for a yiffing world!

 Chi di voi usa PostGres con VB e/o asp?
Pg e Vb perche'?
beppe
Newsgroup: it.comp.lang.visual-basic
Titolo: Non mi uccidete...

Sè che oramai gli argomenti della quale vi chiederò lumi sono triti e ritriti,
ma non ce l' ho fatta a trovare informazioni precise e siete la mia ultima
speranza.
Ecco i miei quesiti :
-Come far girare un programma in Visual Basic on un DB in Access 2000 usando
oggetti di tipo rdo ???
-In access 2000 sapete se sono supportate le istruzioni SQL, di nome NVL,
TO_DATE, REPLACE, ecc ????
Un grazie anticipato per la vostra immansa pazienza.
Leonardo.
P.S. ma di FIBIA FBI si sà nulla ????
-- 
Posted from  [159.213.57.130] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
| P.S. ma di FIBIA FBI si sà nulla ????
http://www.geocities.com/fibiafbi/
E' tutto quello che so... :)))))

 Un grazie anticipato per la vostra immansa pazienza.
Cosa vuol dire in Access2000?
Se usi ADO ed hai
rst.Open strSQL
strsql può contenere tutti i comandi vb di questo mondo alla faccia di sql
standard,
ma questo non dipende dal database ma da i driver
esempio di select
sqlnews = "select newsuser.id_news, newsuser.flag as check, news.oggetto,
news.data, news.testo " & _
              "from newsuser, news where newsuser.id_news=news.id_n and
format(news.scadenza,'yyyymmdd')>" & Format(Date, "yyyymmdd")  and
newsuser.id_user='" & id_User & "' order by 4 DESC"
Come vedi uso il comando format, e allo stesso modo uso le funzioni di
conversioni.
Spero di esser stato chiaro
                                                    danilo

Newsgroup: it.comp.lang.visual-basic
Titolo: Ad esperti di manutenzione db sql 7.0......

Se io creo un file di scripts .sql,
modifico una tabella, poi carico tramite Sql server profiler il mio
bel scripts, mi dovrebbe far ritornare il database a prima della
modifica,giusto?
Ma ciò non avviene.
Io vorrei solo sapere se il file di scripts ti crea delle tabelle oppure te
le modifica anche.
Tutto lì, poi se uno mi vuole anche spiegare come fare, ben accetto,
altrimenti smanetto io,
visto che sono in fase di pre-pre-progettazione.
Un grazie a tutti.
Ciao
Oz
--
Carè Walter SIA SOFTWORK S.R.L.
Via Zanardelli, 13/A - 25062 Concesio (BS) Italy
Tel. 0039-30-2008135/0039-30-2091057  Fax. 0039-30-2004911
Web: 
http://www.siasoftwork.it
 - E.mai:- 
ca...@siasoftwork.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Come spostare il focus in una matrice?

Salve.
Ho una matrice di controlli che e' stata creata per l'immissione di dati in
un DB: txtfields(0), txtfields(1), txtfields(2), ecc.... Il "fuoco" mi si
sposta progressivamente da: txtfields(0) a txtfields(1) a txtfields(2), e
cosi via.
Ora vorrei introdurre tra due txtfields due caselle di input che mi servono
per immettere due fattori della moltiplicazione il cui risultato sara'
riportato nel txtfields(n).text (che sara puoi il valore del campo (n) che
devo immettere).
Come posso fare "passare" il cursore in queste 2 inputbox prima di finire di
compliare la matrice?
GRAZIE  
--
Posted from 
velthur.krenet.it
 [194.143.128.45]
via Mailgate.ORG Server - 
http://www.mailgate.org

per immettere due fattori della moltiplicazione il cui risultato sara'
usa la prop tabindex dei controlli
Ciao stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: problemi su dbgrid

Ciao a tutti.
Sono nuovo con vb e ho un problema con il popolamento di una dbgrid.
Dopo parecchie ore di ricerca mi sono deciso di scrivere
Ho questo codice:
Dim db As Database
Dim rs As Recordset
'il file mdb contiene questi campi: lastname,firstname e address,
Set db = OpenDatabase("c:\documenti\rubrica.mdb")
Set rs = db.OpenRecordset...
Per  popolare una dbgrid che mi visualizza solamente
tutti i cognomi e nomi con indirizzo,  x es. di  rossi ,
quale codice devo mettere?
Ciao e Grazie1000

 ha scritto nel messaggio
news:jZUM5.16612$fx4.5...@news.infostrada.it...



Qual e' l' istruzione sql usata per aprire il recordset ?
La risposta e' li'.
SELECT campo1, campo2, ..., campoN
FROM tabella1
WHERE Cognome = "Rossi"
Ciao
Aldo

Grazie x avermi risposto.
Credo però che non mi sono spiegato.
Come si fa la stringa di sql lo sapevo, però non so
come si inserisce dati ,che la stringa sql mi tira fuori,
in una dbgrid cioè come si popola la dbgrid.
Con la listbox ci sono riuscito in questo modo
Private Sub Form_Load()
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase("c:\rubrica.mdb")
Set rs = db.OpenRecordset("SELECT nome,cognome FROM censimento order by
nome,cognome ")
MsgBox "the databse " & db.Name & " is now open"
 rs.MoveFirst
    Do Until rs.EOF
       List1.AddItem rs!nome
               rs.MoveNext
    Loop
    rs.Close
    db.Close
List1.ListIndex = 0
End Sub
Io volevo mettere al posto di list1 una dbgrid ma non so come si fa.
Spero di essermi spiegato.
Comunque grazie1000
Ciao

 in una dbgrid cioè come si popola la dbgrid.
Se apri il recordset usando ADO allora puoi usare la DataGrid, impostandone
il recordset come DataSource.
Ciao
Aldo


 wrote in message
8u2e39$jl9c$1...@ID-56381.news.dfncis.de...


 ha scritto nel messaggio
news:8u38c9$1kh$1...@nslave2.tin.it...




Newsgroup: it.comp.lang.visual-basic
Titolo: html parser

Devo fare un parser html e non vorrei farlo da zero.
Ho provato con HTMLDocument, ma..
Con questo codice 
---
Private Sub Command2_Click()
    Dim tDoc1 As New HTMLDocument
    Dim tstr As String
    tDoc1.createDocumentFromUrl "file://......miofile.html", ""
    Do While True
        tstr = tstr + "doc1=" + tDoc1.readyState + vbCrLf
        If (tDoc1.readyState = "complete") Then
            Exit Do     ' >>>
        End If
        DoEvents        ' ***
    Loop
    Me.Text1.Text = tDoc1.documentElement.outerHTML
    Me.Text3.Text = tstr
    Set tDoc1 = Nothing
End Sub
---
il documento contiente solo 
<HTML><HEAD></HEAD><BODY><P>&nbsp;</P></BODY></HTML>
Con questo codice 
---
Private Sub Command1_Click()
    Dim tDoc1 As HTMLDocument
    Dim tDoc2 As HTMLDocument
    Dim tstr As String
    Set tDoc1 = New HTMLDocument
    Set tDoc2 = tDoc1.createDocumentFromUrl("file://.....miofile.html", "")
    Do While True
        tstr = tstr + "doc1=" + tDoc1.readyState + ", doc2=" +
tDoc2.readyState + vbCrLf
        If ((tDoc1.readyState = "complete") And (tDoc2.readyState =
"complete")) Then
            Exit Do     ' >>>
        End If
        DoEvents        ' ***
    Loop
    Me.Text1.Text = tDoc1.documentElement.outerHTML
    Me.Text2.Text = tDoc2.documentElement.outerHTML
    Me.Text3.Text = tstr
    Set tDoc1 = Nothing
    Set tDoc2 = Nothing
End Sub
---
il documento Doc1 ha lo stesso contenuto del primo codice, mentre Doc2 appare
completo.
Insomma non riesco a caricare tutto usando un solo documento, e non riesco a
darmi una spiegazione del perche'.
Inoltre mi restano due problemi ancora:
1) Vorrei caricare HTMLDocument da stringa e non da file.
2) Vorrei che il secondo codice non si collegasse da solo a internet, non
eseguisse gli script e non risolvesse i riferimenti esterni.
Si potra'?
Ci sono altre soluzioni?
Grazie. Ciao.
zuppo
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 zuppo
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCP
http://mvp.support.microsoft.com
http://blogs.ugidotnet.org/topics
whynot [ at ] topics [ dot ] it
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb.net] email

Salve a tutti!
La mia domanda č: Come faccio a fare un programma (molto semplice) che
legga e spedisca le email? col vb5 mi ricordo che usavo il winsock, ma
col 
vb.net
 come faccio? avete esempi e/o consigli?
Grazie. Ciau
Gianluca

O utilizzi le classi di System.Net.Winsock e utilizzi la stessa modalita'
della tua vecchia applicazione oppure dai un occhio a System.Web.Mail (anche
se quest'ultima e' spesso legata al server di posta e configurazione della
macchina (usa CDOSYS)
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/blog.aspx?MemberID=710

Son Riuscito a farlo con System.Web.Mail
Vi riporto il codice magari può essere utile anche ad altri.
-------------------------------------------------------------
'NB dovete caricare il riferimento system.web.dll
    Sub sendemail() 
        Dim SMTPMail As System.Web.Mail.SmtpMail
        Dim MailMsg As System.Web.Mail.MailMessage
        MailMsg = New System.Web.Mail.MailMessage()
        MailMsg.BodyFormat = Web.Mail.MailFormat.Text
        MailMsg.Priority = Web.Mail.MailPriority.Normal
        MailMsg.From = "
pi...@libero.it
"        'DA... (propria email)
        MailMsg.To = "
pi...@aliceposta.it
"      'A.... (email del
destinatario)
        MailMsg.Subject = "Test email"
        MailMsg.Body = "Messaggio email di prova"
        SMTPMail.SmtpServer = "
mail.libero.it
"   'Server Smtp
        SMTPMail.Send(MailMsg)  'Invia L'email
        MailMsg = Nothing
        SMTPMail = Nothing
    End Sub
-------------------------------------------------------------
Gianluca

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] SOUND da altoparlantino?

con VBdos facevo:
SOUND 1000, 1
SOUND 1500, 1
SOUND 2000, 1
SOUND 2500, 1
SOUND 3000, 1
SOUND 3500, 1
per avere un classico trillo dall'altoparlante del pc... con VB6 è ancora
possibile sfruttare qualche cosa del genere non dalla sb?

Ciao
Credo che si possa usare beep, ma non so se proviene dall'altoparlante
o se dalle casse acustiche...... fai delle prove......
ByeZ!
Alkondor

Newsgroup: it.comp.lang.visual-basic
Titolo: conversione VB2005 > VB2008

Ciao
Sto studiandomi un po' di open source VB
per usare il VB2008 express.......
Ho notato una cosa molto fastidiosa, un programma
fatto su VB2005 e importato su VB2008 mediante
conversione, molte volte fa apparire numerosi errori.
Errori che su vb2005 non ci sono appaiono su vb2008
Succede anche a voi o mi manca qualche componente
da aggiungere alla Express ?


Mah... il codice dovrebbe restare lo stesso.
Secondo me i problemi sono sui riferimenti
ciao

 ha scritto nel messaggio 
news:6ea9c12b-3261-4710...@n33g2000pri.googlegroups.com...

Per esempio sul progr. dell'hotel manager
fa casino solo sui msgbox .....
Altri per esempio Accountmanager converte e da
degli errori assurdi che non capisco
e l'help non aiuta piu di tanto.....
Select Case (lstDateRange.SelectedItem)
_dateRange = TransactionReport.DateRange.AllDates
Case "Current Month"
_dateRange = TransactionReport.DateRange.CurrentMonth
Case "Current Year"
_dateRange = TransactionReport.DateRange.CurrentYear
Case "All Transactions"
Mi da questo errore su tutti i CASE
Errore 17 Option Strict On non ammette operandi di tipo Object per 
l'operatore '='. Utilizzare l'operatore 'Is' per verificare l'identità 
dell'oggetto. C:\Documents and Settings\cannone 
d'oro\Desktop\AcctManager\AcctManager\ReportDialog.vb 188 18 AcctManager
Saro' scemo io ma non riesco a risolvere !

 d'oro\Desktop\AcctManager\AcctManager\ReportDialog.vb 188 18 AcctManager
Se hai abilitato l'opzione Option Strict On (cosa consigliabilissima), 
questa non permette di effettuare conversioni implicite. Devi usare 
esplicitamente le apposite funzioni di conversione, come ad esempio 
CType().
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Scarica "OpenOffice.org 3, I suppose", molto di più di semplici FAQ!
http://it.openoffice.org/doc/manuali/

 fa casino solo sui msgbox .....
Cerca di definire un po' meglio la locuzione "fa casino"...



Mi da errori ...... cioè mi dice che il msgbox inverte le parti tra ( ) 


L'Option strict On   dall'IDE è OFF .
Dalla ricerca testo non risultano istruzioni Option strict.....
Please che devo fare ?

 ha scritto nel messaggio 
news:48fc901a$0$40312$4faf...@reader5.news.tin.it...

E' solo un'idea ma, se _dateRange è una variabile, mi chiedo se sia una 
buona cosa usare l'underscore all'inizio del nome delle variabili.
eSQueL

 ha scritto nel messaggio

E' una convenzione come un'altra, non ha controindicazioni.
In altri linguaggi (C) viene usata per designare i campi privati che
fanno da supporto a property pubbliche
Piuttosto,  _dateRange come è dichiarata?