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

Dico io è possibile che per suonare un file wave
bisogna scrivere 100 righe di codice ??
Sono stato al sito MURIALDO ma ci
sono delle cose assurde per suonare un file.
Non esiste un OCX free che uno lo mette
gli assegna il file e con una riga di codice
lo fa suonare ?
Alex incavolato.
--
Posted from 
net128-007.mclink.it
 [195.110.128.7]
via Mailgate.ORG Server - 
http://www.mailgate.org

 lo fa suonare ?
Microsoft Multimedia Control? Non ti piace?
dario...@iol.it

Alex incavolato.
Dalla guida:
The PlaySound function plays a sound specified by the given filename,
resource, or system event. (A system event may be associated with a sound in
the registry or in the WIN.INI file.)
BOOL PlaySound(
  LPCSTR pszSound,
  HMODULE hmod,
  DWORD fdwSound
);
:-)
Ciao
Lorenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Esecuzione di programmi VB-DOS in NT4 in finestra

Se lancio in Windows NT 4 Sp5 una applicazione creata in Visual Basic per
DOS, completa di form grafico, questa si rifiuta di partire in finestra:
semplicemente la finestra si chiude senza nessun errore.
Se invece la lancio a schermo intero, la stessa parte senza problemi, e ora
mi è anche possibile impostarla in finestra con ALT+INVIO.
Qualcuno sa se esiste qualche parametro per poterla aprire direttamente in
finestra?
Grazie e ciao
Maurizio
-- 
Posted from 
dns.nettuno.it
 [193.43.2.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Scusa, ma se ti apri una shell DOS dovrebbe andare...
Il 14 Mar 2001,
14:20, 
maurizi...@ceam.it
 ("Bonaga, Maurizio") ha scritto: 


--------------------------------
Inviato via 
http://usenet.iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Etichette da sito comune

Ciao a tutti,
ho visto sul sito comune l'Ocx del sig. Corona per la stampa
di etichette ma non riesco a scaricarlo (source compresi) , c'è qualche
problema sul sito ?
Grazie mille a tutti.
Ps : L'indirizzo è   www.it-
lang-vb.net
  giusto?
Ciao
Ronny
--------------------------------
Inviato via 
http://usenet.iol.it

 ha scritto nel messaggio
news:194Z130Z244Z66Y...@usenet.iol.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: E' possibile?

ciao a tutti, vi volevo chiedere se è possibile fare un prog. che forzi un 
altro prog. esterno a ridursi ad icona, x esempio, vorrei ridurre a icona 
un programma che è sempre in primo piano sul desktop,è possibile fare ciò? 
grazie in anticipo =)

 ha scritto nel messaggio
news:Xns917ACCD...@192.106.1.6...

Call SendMessage(lnghWnd, WM_SYSCOMMAND, SC_MINIMIZE, 0&)
lascio a te la scelta del metodo per recuperare lnghWnd (l'handle della
finestra che vuoi ridurre a icona)
:)
Faber

 
IO nn sono molto esperto =( , cosa intendi x HANDLE ?
please rispondi

 please rispondi
un'handle é semplicemente un numero unico di identificazione di un oggetto
di windows. Un form, un pulsante, una textbox hanno tutti un'handle (una
label NO!). Dunque conoscendo questo numero di identificazione, puoi
interagire con l'oggetto stesso attraverso dei metodi come quello suggerito
da Faber.
Informati dunque un pò sul soggetto. Un piccolo avvertimento : se chiudi e
poi riapri un programma, gli stessi oggetti cambieranno il loro numero di
HANDLE, ecco perché Faber parla di ricercare il modo di recuperare questa
identificazione. Se il programma lo fai partire da codice ci sono modi
abbastanza semplici di saperlo, però se é un programma già in memoria devi
passare attraverso dei metodi di ENUMERAZIONE.
Bye & good coding
Sal

 wrote in
news:RjJT7.22118$
8c2.1...@weber.videotron.net
: 

grazie x le risposte, finalmente dopo svariati tentativi sono riuscito a 
beccare l'handle del progz. ora ke ho l'handle dovrebbe funziare vero? se 
ho qualche problema ve l dico, tnx
Call SendMessage(NUMEROHANDLE, WM_SYSCOMMAND, SC_MINIMIZE, 0&) così 
dovrebbe andare bene? grazie ancora

 dovrebbe andare bene?
basta che NUMEROHANDLE contenga il valore corretto  :)
Faber

 basta che NUMEROHANDLE contenga il valore corretto  :)
cosi' per curiosita', qual e' l'handle di windows ? :)

 cosi' per curiosita', qual e' l'handle di windows ? :)
GetDesktopWindow() č la cosa che gli si avvicina di piů - credo  :)
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: [VBNET]+[WIN7] eliminazione file con shell32.dll

Buongiorno a tutti.
Sto facendo delle prove di eliminazione file di una cartella in rete 
con la shell32
Ho una classe che fa la cancellazione dei file:
Class FileOp
....
....
    Public Shared Function DeleteFiles(ByVal sSource As String) As 
Boolean
        Dim _ShFile1 As SHFILEOPSTRUCT = Nothing
        Try
            _ShFile1.wFunc = FO_Func.FO_DELETE
            _ShFile1.fFlags = FO_Func.FOF_NOCONFIRMATION
            _ShFile1.pFrom = sSource + "\" + String.Empty + 
String.Empty
            _ShFile1.pTo = String.Empty + String.Empty + String.Empty
            SHFileOperation(_ShFile1)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
            Return False
        End Try
        Return True
    End Function
I file di eliminare stanno in una treeview e li cancello, dopo averli 
selezionati, da un bottone cosï¿œ:
    Private Sub btn_delete_file_Click(ByVal sender As System.Object, 
ByVal e As System.EventArgs) Handles btn_delete_file.Click
        Try
            For Each item As ListViewItem In ListView.Items
                If item.Selected = True Then
                    'MessageBox.Show(item.Text)
                    FileOp.DeleteFiles(txtFilePath.Text + "\" + 
item.Text)
                    'ListView.Items.Remove(item)
                End If
            Next
            RefreshView()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub
No riesco a capire perchï¿œ anche se seleziono tutti i file non me li 
cancella mai tutti .... me ne lascia sempre qualcuno che anche se 
seleziono successivamente non si cancellano.
Idee ?
Grazie, Alverman

 Idee ?
Come mai hai avuto bisogno di farti una classe che invoca codice unmanaged
(l'api di shell32 SHFileOperation) invece di usare la ben piï¿œ comoda classe
del framework System.IO.Directory?
Usa IO.Directory.Delete(Path), cosï¿œ se per caso fallisce ad es. perchï¿œ vi
sono file in sola lettura, bloccati etc etc... ti scatta un'exception, cosa
che con SHFileOperation non accade (in quel caso avresti dovuto controllare
il valore restituito, leggi qui
http://msdn.microsoft.com/en-us/library/bb762164.aspx
).
Bye
Raf 

 che con SHFileOperation non accade (in quel caso avresti dovuto 
controllare
L'ho provato e funziona perfettamente solo che trasferendo file di una 
certa dimensione non risco a vedere lo stato del trasferimento.
Come posso visualizzarlo?
Grazie, Alverman



Usando My.Computer.FileSystem.CopyFile: uno dei suoi overloads ha un 
apposito parametro showUI.
La stessa classe FileSystem ha anche opportuni metodi per 
spostare/cancellare file, directory etc etc...
Ciao
Raf 

Grazie 1000
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Fax ancora, nessuno mi aveva risposto...

nel subject Fax da visual basic avevo chiesto come far sapere a microsoft
fax il numero da faxare,
qualcuno ha idea?
grazie.
--
Marco Ceccarelli
Razional Informatica S.r.l.
Piazza Usilia, 24 - 53036 Poggibonsi (SI)
Tel 0577 936439
Fax 0577 936469

Veramente mi pareva di averti già risposto.
Comunque, prova a guardare l'help relativo al metodo SendFax dell'oggetto
Document di Word.
Ciao, Giorgio
Marco Ceccarelli <mc_razional@hotmail.***> wrote in message
8qaerj$km6$2...@nslave1.tin.it...


 ha scritto nel messaggio
news:zTmy5.8054$4v4.2...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: mezzo cerchio

Ciao a tutto il NG,
chi mi sa dire come faccio
ha visualizzare solo mezzo cerchio
o uno spicchio?
e inoltre se genero una linea con:
Form1.Line (x1,y1) - (x2,y2)
come faccio ha farla tratteggiata?
Ciao,
Grazie 1000
Valerio

 come faccio ha farla tratteggiata?
Nelle proprietą del Form1 dąi un'occhiata a DrawStyle...
-- 
Rivolterņ il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starą nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

 ha scritto nel
messaggio news:40a5...@x-privat.org...


 o uno spicchio?
Dall'help di VB:
object.Circle [Step] (x, y), radius, [color, start, end, aspect]
start, end:
Start ed End specificano (in radianti) l'inizio e la fine dell'arco.

 ha scritto nel messaggio
news:GH7pc.258967$rM4.10...@news4.tin.it...



ciao,
Valerio

 > Start ed End specificano (in radianti) l'inizio e la fine dell'arco.
Vuoi disegnare un arco di curva? (arco di cerchio o di ellisse)
Quelle proprieta' ti servono per definire dove inizia e finisce l'arco. In
parole semplici (anche perche' non sono ferrato in geometria), il cerchio
completo ha
Start = 0
End = 2 * pi greco
Se te disegni i quattro assi cartesiani, e nel centro dei quattro assi
disegni un cerchio, i due valori start/end indicano l'angolo formato dal
punto start/end con il centro rispetto all'asse Y positivo.
Per intenderci, se te dai come start pi greco/2, l'arco di cerchio inizia
sull'asse X positivo (sulle 3 dell'orologio)
Se gli dai end = 5/4 pi greco, l'arco finisce nel mezzo al quadrante -/-
(sulle 7 e mezzo dell'orologio).
Cmq, se provi da solo fai prima. Tranquillo che il PC non esplode...

 sull'asse X positivo (sulle 3 dell'orologio)
Non esattamente... Start=pigreco/2 significa far partire il semicerchio 
dal semiasse positivo delle ordinate (y).
Start = 0, End = PiGreco/2 fa un arco dalle ore 3 a lle ore 12 (un arco 
breve, non il giro lungo).
Start = 0, End = PiGreco fa un arco che va dalle ore 3 alle ore 9 
passando dalle 12.
Start = PiGreco, End = 2 * PiGreco fa un arco dalle ore 9 alle ore 3 
passando per le ore 6.
Si procede sempre in senso antiorario, qualunque sia l'angolo di 
partenza e qualunque sia quello di fine.
-- 
Rivolterò il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starà nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

 si procede in senso antiorario.
Thx, mai avuta molta dimestichezza con la geometria :-)

 ha scritto nel messaggio
news:q6mpc.191180$hc5.8...@news3.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Trattamento file di testo

Ciao a tutti,
io ho la necessita' di leggere la prima riga da un file di testo,
memorizzarla da qualche parte , e cancellarla.
Pensavo fosse piu' banale, qualcuno ha qualche suggerimento ?
Grazie mille a tutti.

 wrote in message
38f4e1c3...@news.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Seek su un mdb

Hi All !
Ho un problema con la Seek su una tabella mdb.
Quando non trovo un record mi esce un errore "no current record"
(codificato dall'help come error 524), però il classico on error resume
next non funge !  e quindi non mi permette di intercettarlo e gestirlo a
mio piacere invece che con quella finestra che blocca l'esecuzione.
Allego il codice  ... 
(Premessa: nella tabella Anagrafica il campo cognome ha il flag
indicizzato.)
   on error resume next
[...]
   Data1.DatabaseName = App.Path & "\agenda.mdb"
   Data1.RecordSource = "anagrafica"
   If Data1.Recordset.RecordCount > 0 Then
            Data1.Recordset.MoveFirst
            Data1.Recordset.Index = "Cognome"
            Data1.Recordset.Seek "=", "PLUTO"
            If Data1.Recordset.NoMatch Then MsgBox "NON TROVATO"
   Else
           MsgBox "TROVATO"
   End If
Donde sbaglio ? Come posso intercettare questo errore  che mi esce sulla
riga della seek ?
grazie bye
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 l'esecuzione.
Non devi usare on error resume next
ma
on error goto etichetta
.....
...
exit sub/exit function
etichetta:
    'Qua gestisci il tuo errore
MIk

    End If
Exit sub
Err:
    msgbox "Errore"
End sub

>    on error resume GOTO ERR 'orrore
A parte un propabile errore di sintassi perchè hai
scritto orrore??
MIk

 on error goto etichetta
[...]
Avevo provato anche questa soluzione, ma il problema è lo stesso.
L'errore viene generato sulla seek che mi apre qualle maledetta
finestrella con quel messaggio.
Il bello è che con il debug vedo che non lo intercetta proprio come
errore !
Non passa per "etichetta".
 :((
idee?
grazie


 Non passa per "etichetta".
Secondo me l'unica è provare a controllare l'etichetta,
se hai scritto tutto corrrettamente, mi sembra strano
che non lo intercetti....bohh!
MIk

 scritto orrore??
Mi spiace deludervi raga ... ma continua ad esserci il problema ...
la seek di un record non trovato apre la finestra .. e non viene
intercettato l'errore.
(Alias: in debug non passa dall'etichetta err) 
:((((


Raga .. ho trovato questo ! 
=========================================================
BUG: Data Control NoMatch Equals True Returns Error
The information in this article applies to:
Microsoft Visual Basic Enterprise Edition for Windows 5.0
Microsoft Visual Basic Enterprise Edition for Windows 6.0
This article was previously published under Q192143  SYMPTOMS
When the NoMatch method of the Data Control returns "True," the Seek
method will report a run-time error "No Current Record."
RESOLUTION
The user can work around this problem by trapping the Data Control's
error event and repositioning to an existing record after the seek
failure.
STATUS
Microsoft has confirmed this to be a bug in the Microsoft products
listed at the beginning of this article.
=========================================================
Il problema è intercettare quel maledetto errore quindi ! :(


[CUT]
Interessante...
MIk

 scritto orrore??
perche' prima avevo lasciato next e scritto orrore e poi ho modificato (
male ) lasciando la rem !

 modificato ( male ) lasciando la rem !
Ahhh Ecco...
MIk
Newsgroup: it.comp.lang.visual-basic
Titolo: cancellare un elemento da una listbox (per chi ha tempo da perdere)

occhio alla domanda idiota:
For x = 0 To list1.ListCount - 1 Step 1
          If list1.Selected(x) = True Then list1.RemoveItem x
    Next x
perchè non funziona??
e perchè
For T= 1 To 50
    List1.RemoveItem T
Next I
in una lista con 100 elementi mi rimuove  i 50 pari??
nell'help non c'è nulla...  :-((
(cercate di capirmi... da piccolo una listbox ha cercato di mordermi e da
allora ho paura...)
SOB!!
Francesco Mapelli (
mape...@tin.it
)
http://members.xoom.com/Francesco
Sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Non funziona perchè il metodo RemoveItem cambia (ovviamente) il numero
di item. Il limite del For rimane però al valore vecchio della proprietà
.ListCount
causando quindi (al minimo) errore appena si cerca di accedere all'ultimo
elemento
della ListBox.
Per spiegare perchè il secondo For dà quell'effetto,
guarda la tabella seguente:
---------------------------------> Cicli
   T=1   T=2   T=3
0   A     A     A     A
1   B     C     C     C
2   C     D     E     E
3   D     E     F     G
4   E     F     G     H
...
50  ZZZ    <non esiste>
La prima colonna è il numero dell'Item;
Le successive il contenuto della ListBox prima del .RemoveItem.
Non rimuove i 50 pari, ma i 50 dispari!
Spero di essere stato chiaro.
Maurizio


Newsgroup: it.comp.lang.visual-basic
Titolo: Manuale x studenti Visual Basic Express 2005

Vorrei chiedere se qualcuno può, in base alla propria esperienza, 
cortesemente consigliarmi un buon manuale per Visual Basic 2005 Express 
idoneo a studenti di scuola superiore (15/16 anni) o comunque adatto per chi 
deve iniziare "da zero" a programmare in questo ambiente.
Grazie.
Maurizio

Maurizio67 ha scritto:

Io ho trovato molto utili i manuali della collana "Imparare [Argomento] 
in 24 Ore" editi da Tecniche Nuove.
Dovrebbe esserci un libro sui 30 euro (ma forse ora anche a meno) che si 
chiama "Imparare Visual Basic 2005 in 24 Ore" che non significa che in 
un giorno impari a programmare, ma che ci sono 24 lezioni da leggere in 
un ora l'una circa.
Sono davvero molto semplici da leggere e capire e sono corredati da 
esempi pratici molto utili.
Il tutto in 350/400 pagine circa.
In alternativa ci sono i manuali di Balena (si trovano le versioni 
ridotte edite da Mondadori a 11 Euro), ma sono molto tecnici e, a mio 
avviso, non adatti a ragazzi di 15/16 anni.
Nicola

Grazie!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Colori diversi in una ListBox

Ciao a tutti!
Ho una ListBox dove carico i record(libri) di un DB Access..
Vorrei fare in modo che ogni riga della ListBox che corrisponde ad un libro
venduto sia rossa mentre le altre corrispondenti a libri non venduti siano
nere!
 Qualcuno saprebbe aiutsarmi..
list3.ForeColor = vbRed mi cambia il colore di tutta la LBox
Ciao e grazie anticipatamente

Per fare quello che vuoi, devi lavorare con delle chiamate api.
Se vai su 
planet-source-code.com
 trovi degli esempi belli e fatti.
Bast che tu metta come chiave di ricerca "colors listbox" senza
doppi apici.
-- 
Saluti
Andrea Moro
Newsgroup: it.comp.lang.visual-basic
Titolo: DirectX e OpenGL con vb6 ?!

Si possono utilizzare queste tecnologie con Visual Basic 6 ?
Se si, come ?!

 wrote in message
85ku5n$6iv$1...@nslave1.tin.it...


 wrote in message
10k61eq$a5t$1...@fe2.cs.interbusiness.it...


Davvero DX7 mi ha installato quella roba? Dove l'ha messa? Io ho solo la
libreria degli oggetti tra i riferimenti


 numeri......voglio studiarmi ben bene DirectSound3D.....uao!!!!
Sul CD ci sono le SDK?
Ciao
Lorenzo

Se prendete ioprogrammo di gennaio (quello uscito oggi 14/01) c'è una
piccola spiegazione su come usare le DirectX. E' la prima parte, perciò
spiega i rudimenti, però confido che continui sui prossimi
numeri......voglio studiarmi ben bene DirectSound3D.....uao!!!!
Good working!!
Damiani Igor
ico...@simcity.it



Newsgroup: it.comp.lang.visual-basic
Titolo: Access su Internet

Raga, purtroppo ho la necessità di usare db access su spazi internet.
Non chiedetemi di usare altro senò mi sparo, perchè io vorrei passare a 
MySQL o SQL Server, ma qui a lavoro sono fissati con Access e io ne ho 
le *#?&%$ piene.
Allora... se dovessi imparare qualche linguaggio come ASP o PHP, e 
pubblicare tutto su un server su internet, c'è la possibilità di 
interrogare database Access?
Thx a lot!
-- 
Quando noi ignoranti eravamo di più,
tutto era più bello...
(Adriano Celentano)

 interrogare database Access?
Asp usa la sintassi di VB, quindi c'è ben poco da imparare :-)
La risposta alla tua domanda è "si".
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 La risposta alla tua domanda è "si".
Quindi mi "tocca" imparare ASP?
Povero me...
Quanto + odio certe cose, tanto più ci devo lavorare...


 Quanto + odio certe cose, tanto piů ci devo lavorare...
molti esempi li puoi trovare su 
http://freeasp.html.it
Vi sono anche delle belle guide introduttive.


 Quanto + odio certe cose, tanto più ci devo lavorare...
Che vordì imparare asp???
che te credi che sia...
usi come linguaggio VBscript
e come tecnologia per accesso ai dati ADO
un domani se fai le cose "perbenino" per trasporate il sito da access a SQl
server o Mysql...basta cambiare la stringa di connessione.
(in genere io la metto in un file e poi un bel #include)
come "ASP" ci son poche cose da ricordare...e comunque per un programmatore
tutte molto "fattibili"....
-- 
Il Wodkino Nazionale è a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 New Entry nel bestiario!
:-)
---
Messaggio scannerizzato e certificato "Virus free" da AVG free edition.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.707 / Virus Database: 463 - Release Date: 15/06/2004

 Quanto + odio certe cose, tanto piů ci devo lavorare...
Meno si vuole che capiti qualcosa, piů capita...io per esempio 'non odio' il
php e non ci lavoro mai (eheheh)
Newsgroup: it.comp.lang.visual-basic
Titolo: Backup dei dati

Salve a tutti quelli che come me sono rimasti a lavorare in questi giorni di
Agosto.
Ecco il problema:
- dovrei creare una procedura di backup automatico (non necessariamente
automatico) che mi permetta di creare su dei dischetti la copia zippata del
database .mdb.
Come posso fare ???
Grazie e buona giornata.

 wrote in message news:8mpf35$pi2$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: icone per toolbar

Ciao ragazzi,
Sapete dove posso per caso trovare delle icone come quelle della toolbar di
office?
ho letto che l'oggetto toolbar ha bisogno di caricare un oggetto ImageList
per poter visualizzare le img al posto del caption.
Ciao

 ha scritto nel messaggio
news:5EHK9.33283$t_1.2...@tornado.fastwebnet.it...


 ha scritto

http://www.idev.ch/ic/index.htm

www.vbaccelerator.it
sezione Icons
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: togliere caratteri da una stringa

salve, il mio programma genera file di testo.... il nome di questi file
deriva da nominativi di un DB.
alcuni hanno caratteri vietati tipo / \ ? ecc...
qualcuno ha una funzione tipo
function parse_string (str as string) as string
che fa questo?
esempio:   str = "c/ia|o?"
                parse_string(str)= "ciao"
grazie mille
--
contatti alla seguente mail:
mortimer74 AT inwind DOT it

                 parse_string(str)= "ciao"
Replace$(Replace$(Replace$(Replace$(Replace$(Replace$(Replace$(Replace$(
Ciao
Alberto


Io farei cosě:
str="C/iao|"
str=replace(str,"/","")
str=replace(str,"|","")
e cosě via per ogni carattere non valido.
Ciao
Skysurfer

 ha scritto nel messaggio
news:UlJba.5997$Lr4.1...@twister2.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Upload directory

Salve a tutti,
 
Devo fare l'upload su un server remoto via FTP di una directory.
Utilizzo VB6 SP5 con WinXP.
Per inviare un singolo file uso il seguente codice:
    Private Sub cmdinvia_Click()
 
  Dim contatore As Integer
 
  nomeDirLocal = "cartella locale"
  nomeFile = Dir(nomeDirLocal & "\*.*", vbNormal)
  nomeDirRemote = "cartella remota"
 
   While nomeFile <> ""
 
         If MsgBox(nomeFile, vbOKCancel, "File selezionato") = vbOK
Then
 
     contatore = contatore + 1
 
     Inet1.URL = "mio ftp"
     Inet1.UserName = "login"
     Inet1.Password = "pass"
     Inet1.Execute Inet1.URL, "PUT " & " " & nomeDirLocal & "\" &
nomeFile & " " & nomeDirRemote & nomeFile
                Do Until Inet1.StillExecuting = False
                   DoEvents
                Loop
 
             Else
 
          End If
 
      nomeFile = Dir
 
   Wend
Come posso fare per inviare una cartella con tutto il suo contenuto?
Grazie a chiunque mi possa aiutare

> Come posso fare per inviare una cartella con tutto il suo contenuto?
Vedi "upload differenziale di cartelle" sul Sito Comune (
www.it-lang-vb.net
)
credo che possa esserti utile.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: vbsp3.exe dove posso trovarlo?

ciao ragazzi ho provato a scaricare questo file dal sito della Micro, ma e'
lento da impazzire, qualcuno sa dove altro posso scaricarlo?
grazie.
Antonio Arezzo
gradirei la risposta in E-mail perche' ho dei problemi con OutLook grazie.
TOGLIERE...@mbox.queen.it

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Lanciare .EXE da VB

Come è possibile lanciare un file .EXE da un'applicazione VB facendo in
modo che quest'ultima resti in attesa del completamento dell'EXE. In
alternativa: è possibile monitorare lo stato di un processo di cui si
conosce l'ID per vedere se è attivo o meno?
Grazie della preziosa collaborazione.
                        Massimo Bonanni

Come č possibile lanciare un file .EXE da un'applicazione VB facendo in
Io utilizzo qs funzioni per eseguire un programma da dos e aspettare
che abbia finito prima di proseguire.
da inserire nel modulo
Declare Function getmoduleusage% Lib "kernel" (ByVal hmodule%)
'Funzione per eseguire un comando DOS
da inserire nella form
    X% = Shell("xxx.bat")
    While getmoduleusage(X%) > 0
    z% = DoEvents()
    Wend
esegue la chiamata api e aspetta che abbia finito prima di proseguire.
Bye 
Daniele
+--------------------------------------+
 E-mail to:<ld...@NOSPAMtuttocitta.it>
        (togliere...NOSPAM)
     (please remove...NOSPAM)
+---------------------------------------+
Newsgroup: it.comp.lang.visual-basic
Titolo: piccolo aiuto

Salve, mi chiamo Giuseppe e sto studiando da pochi giorni in Visual Basic 
6.o
vorrei sapere se ci sono siti didattici in merito che comprendono esempi 
scaricabili ( ovviamente elementari ) o per lo meno facili da comprendere
Grazie infinite
Giuseppe Massa 

 6.o
Te lo diranno in 50, comunque, dato che hai appena iniziato, hai particolari 
necessità di iniziare con VB6 che sono anni che non è più in commercio e non 
è più supportato da Microsoft?
Se no prendi in considerazione la possibilità di partire da VB.net 2005.
Ciao 

Giuseppe Massa wrote:

Come ha già risposto giustamente Fabio, l'ideale sarebbe orientarsi sulla 
piattaforma .NET e, nello specifico, a VB 2005 Express (anche perchè è 
gratuito... mentre VB6, no)
In ogni caso, ti segnalo questi 2 siti:
Sito Comune del Newsgroup
http://www.it-lang-vb.net
Visual Basic Tip&tricks
http://www.visual-basic.it
Ne esistono molti altri: fai una ricerca con "Visual Basic" in google.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 ha scritto nel messaggio 
news:JQADg.20237$ZJ6....@tornado.fastwebnet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Strategia di comunicazione TreeView - DataBase

Ciao a tutti,
devo sviluppare un'applicazione che gestisca un struttura dati di tipo ad
albero (visualizzata tramite un controllo "TreeView" e delle TextBox
"collegate" ai nodi) e devo memorizzare la struttura dati immessa in un data
base Access relazionale.
Quale strategia mi consigliate:
1) Collegare le TexBox ed i nodi del TreeView ai record delle tabelle del
database, con aggiornamento delle tabelle attivato dagli eventi di creazione
nodo e modifica delle TextBox;
2) Memorizzare tutta la struttura dati in tipi di variabili VB create
appositamente (moooolto strutturate) e memorizzare tutti i dati solamente
alla fine, tramite un pulsante del tipo "Salva Dati";
Qualunque consiglio è benvenuto,
Grazie in anticipo,
The Pivot

Meglio il 2 utilizzando classi e insiemi, in cui potresti memorizzare i dati
subito dopo la lettura del db.
Un po' quello che sto facendo in questi giorni.
Ciao
Massimiliano
Newsgroup: it.comp.lang.visual-basic
Titolo: GetPrivateProfileString e win98

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias
"GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal
lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As
String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Dim Valore As String * 200
Ris = GetPrivateProfileString("ETICHETTE", "RIGHE", "12", Valore, 200,
"pippo.cfg")
QuanteRighePagina = Val(Left(Valore, Ris))
file pippo.cfg:
[ETICHETTE]
RIGHE=11 ; quante righe la stampante riesce a stampare per pagina
-------------
se lo eseguo su XP funziona perfettamente, se lo eseguo su win98 (non so se
second edition oppure no) mi ritorna il valore di default (12)
indipendentemente da cosa c'è nel file... come se non trovasse il file o la
chiave.
purtroppo sul win98 non posso installare VB, quindi non so neanche come
provare a capire come mai non va...
sapete darmi una mano?

 provare a capire come mai non va...
In realta' potresti scrivere un log su file, ma questa e' un'altra 
storia ;-)
ciao,
-- 
hal

 storia ;-)
chiaro
Grazie!

 prob?
Come ha gia detto hal non hai specificato alcun percorso, che sia App.path o 
altro, ma solo il nome del file... quando usi funzioni di I/O su disco, 
direi praticamente tutte se non diversamente indicato, non c'e' alcuna 
garanzia che venga considerata la cartella del tuo eseguibile come cartella 
corrente; probabilmente XP segue un ordine di verifica diverso, ma in 
generale ti conviene utilizzare sempre percorsi assoluti (ricostruendoli a 
runtime tramite App.path o simili) e vivere felice.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: Blocco del form e del programma

Ciao a tutti,
ho questo problema.
Progetto in VB6
Lavoro con ADO su MySQL
Con un piccolo programma gestisco alcuni backup del database sul quale gira 
il software.
Alcue operazioni sono parecchio lunghe, come è giusto che sia.
Vorrei che durante queste operazioni il form tramite il quale eseguo le 
operazioni sul
database non mi si inchiodasse appena provo o a spostarlo o a ridurlo ad 
icona. In più la barra di avanzamento mi si blocca per poi "sparire" fino a 
processo terminato.
Come devo fare per fare in modo che questo non accada???
In VB 2005 non mi succede mentre in VB6 si e non saprei come sgavagnarmela
Grazie per ogni eventuale consiglio
IAK

Ci provo, ma non fidarti troppo....
nel ciclo di lettura, se c'è, tipo while dbrs.eof = false
io metterei un 'DoEvents'.
Avevo un problema simile e così ho risolto.
spero di essee stato utile.



G R A Z I E !
-- 
Using Opera's revolutionary e-mail client: 
http://www.opera.com/mail/
Newsgroup: it.comp.lang.visual-basic
Titolo: radice quadrata in Visual Basic

Come si fa la radice quadrata in Visual Basic ?

 wrote in message 8gm1el$5gj$1...@diesel.cu.mi.it...


prima di buttarsi sul ng perchè diamo un'occhiata al gigabyte di guida
in linea?
dopo 3 secondi di ricerche:
Funzione Sqr
Restituisce un valore Double che specifica la radice quadrata di un
numero.
Sintassi
Sqr(numero)
L'argomento obbligatorio numero può essere un valoreDouble o
qualsiasiespressione numerica valida maggiore o uguale a zero.


... be esistono anche persone che non hanno msde ( vedi msg precedenti)!!!
.. ;-))))))))))))


wrote:


be.. se il cugino dell'amico del fratello di tuo zio ti presta il cd  senza
darti l'installazione di MSDE ( o meglio ancora ti masterizza una copia del
cd di installazione di  VB già STRA MEGA COPIATO  e durante i passaggi
precedenti qualcuno non ha eseguito le copie di msde  di vb )
sai come vanno le cose ...
ciaoooooooooooooooooooooooo !!!!!!!!! :-))))))))

 wrote in message
1c8tis4q0jqvtid6a...@4ax.com...


...:o))
pi = 3.14159265358979
Sempre da F1
Ciao

 ha scritto


Newsgroup: it.comp.lang.visual-basic
Titolo: Programma per misurare le risorse

Salve. Ho usato il Norton System Information per misurare lo spazio occupato
in RAM da una mia applicazione. Per diminuire quel valore dovrei diminuire
le variabili giusto? Ma sono solo le varibili che occupano la RAM o anche
altro? Se io dichiaro una variabile in un form che però non è attivo, quella
variabile in realtà non occupa nulla vero? Allo stesso modo, se una routine
non è avviata ed una variabile è dichiarata solo all'interno, non occupa
alcuno spazio vero? Spero che possiato un poco chiarirmi queste cose.
Grazie,
--
Ramses
http://evilzone.tsx.org
ICQto: 39860665
mailto: 
ram...@freemail.it
"God is just a statistic"

 wrote in message
97dv1a$jlg$2...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Scheda Audio e VB

Ciao,
avrei necessita' di generare due semplici note con la scheda audio in un
programma e devo partire da zero;
qualcuno sa indicarmi qualche DLL ( o altro) che fa al caso mio?
ciao
bye

 wrote in message
rBF48.11761$6e5.3...@twister2.libero.it...


 Emiliano.
..Sinceramente non so, basta che riesca a produrre dei suoni....forse Wav e'
meglio.
provero'
ciao
Grazie

 programma e devo partire da zero;
per riprodurre un wave usa la funzione dell'API sndPlaySound(). le
DirectX mi sembrano decisamente eccessive per un compito cosě banale
Faber


Perfetto!
era una delle cose che cercavo!
sai mica per generare un suono come si fa?
ciao e grazie

 sai mica per generare un suono come si fa?
in che senso "generare un suono"? via MIDI, intendi?
Faber

 Faber
da alcune ricerche mi pare che possa usare la WINMM.DLL,
anche se mi sembra un po' complicata....
in pratica vorrei semplicemente generare una nota (es 1000 Hz) dalla scheda
audio (un Wav);
cercavo qualcosa di piu' semplice tipo "Sound(Hz)" da usare per la sk Audio
ma mi pare che non esiste
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Adox e riferimenti

Salve a tutti ragazzi.
Ho un problema con il mio programma. Poichè devo modificare la struttura del
database, ho aggiunto tra i riferimenti Adox.
Il problema è che quando lo vado a scegliere tra i riferimenti, come opzione
ho "Microsoft Ado Ext. 2.5 for DDL and Security".... una volta scelto, se
riapro i Riferimenti ho "Microsoft Ado Ext. 2.7 for DDL and Security".
Ho notato anche che il mio riferimento "Microsoft Data Binding Collection VB
6.0 (SP4)" a volte non "punta" più a C:\WINNT\system32\msbind.dll, ma a un
percorso relativo a dove ho installato .NET, più precisamente
c:\programmi\Microsoft visual studio .net\common7\controls\msbind.dll". Se
tolgo il riferimento a Adox, il Data Binding torna a puntare correttamente
alla DLL contenuta nella system.
Inoltre, e questa è la cosa più importante, se includo nei riferimenti Adox,
ho un errore nel mio codice:
Dim obj As Column
With grdMiaGriglia
    For Each obj in .Columns
        If obj.ColIndex = 1 Then Exit Sub
    Next obj
End with
L'errore che ottengo è "impossibile trovare il metodo o il membro dei dati",
relativo alla linea di codice "If obj.ColIndex = 1 Then Exit Sub". Infatti
non riconosce ColIndex come proprietà valida dell'oggetto obj, dichiarato
come column.
Inoltre, quando dichiaro la variabile, dopo aver scritto As, come al solito
l'intellisense mi mostra la lista dei tipi... e la cosa strana è che alcuni
tipi, come Column, Columns, DataObjects, DataObjectFiles ed altri, sono
ripetuti 2 o 3 volte.
Quando poi scrivo il punto dopo obj, la lista di metodi e proprietà è
diversa da quella che ho di solito. Tutto questo se includo Adox nei
riferimenti.
Spero di essermi spiegato.
Vi è mai capitata una cosa del genere?
Vi ringrazio.
Saluti,
Guido.

Ok credo di aver capito cosa possa essere.
Anche Adox ha un oggetto Column, che sembra vada a "sovrascrivere" quello
del DataGrid.
Il fatto è che nemmeno specificando Dim obj As DataGrid.Column risolvo, in
quanto mi dà subito errore nella dichiarazione.
L'unico modo è dichiarare obj As Object.
Qualche suggerimento?

Risolto, ho dichiarato la variabile in questo modo:
Dim obj As MsDataGridLib.Column
e così non ho errori nemmeno se aggiungo nei riferimenti Adox.
Credevo che Column "discendesse" da DataGrid, invece la classe padre è
MsDataGridLib.
Newsgroup: it.comp.lang.visual-basic
Titolo: Reperire lista di file e directories

Innanzitutto grazie a chi mi ha risposto al quesito precedente... ho risolto
il problema :)
Per realizzare un programma di backup avrei bisogno che VB individuasse la
lista di directory su root o sub-directory, ne individui la lista dei files
contenuti per poi lavorare su ognuno di questi files.
Esiste una qualche funzione, anche api?
Grazie per l'attenzione
--
Luca Paganelli
bio...@XXXalinet.it
Togli XXX

Esiste una qualche funzione, anche api?
[...]
Hai già provato ad adattare l'esempio WINSEEK fornito con VB5 ?
Se vuoi usare le API  invece studiati il codice del programma "treewiev in
stile explorer" che trovi sul sito comune.
Ciao
---
--
-
MIX (VB5SP3)
170 links a siti VB
http://www.tempolibero.com/user/mix/
http://space.tin.it/computer/gaais/
-
--
---

Newsgroup: it.comp.lang.visual-basic
Titolo: gestione controlli su foglio Excel

ciao a tutti!
Innanzitutto chiedo scusa nel caso in cui sbagliassi NG, ma non ne ho
trovato uno specifico su excel (almeno non in italiano);
sto impazzendo su una cosa che sto realizzando in Excel!
su un foglio di lavoro ho creato una serie di controlli di tipo checkbox,
ma non riesco a capire come riferirmi ad essi da VBA: sono un oggetto di
Worksheets?
Grazie a tutti per l'attenzione 
rick
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Worksheets?
Bè direi che i Checkbox appartengono al foglio su cui si trovano quindi
li puoi chiamare direttamente con il loro nome (es. Checkbox1.Proprietà,
Checkbox2.Proprietà, ecc). Da altri fogli, da Form, da Sub o Funzioni in
Moduli, ecc. ,
li puoi chiamare con NomeFoglio.NomeCheckbox.Proprietà .
Per l'NG di Excel:
microsoft.public.it.office.excel
Ciao ciao
Mauro

Newsgroup: it.comp.lang.visual-basic
Titolo: @CopyProgress????

Come posso fare a vedere lo stato di copiatura di un file?
Con l'istruzione filecopy si rischia di tenere l'utente davanti al monitor
senza capire che cosa sta succedendo... non può essere l'unico modo,
vero????
Per favore ultimamente non riesco a stare molto dietro ai news... quindi
mandate rispondetemi anche per e-mail... grazie!
mcan...@tin.it

 
mcan...@tin.it
Beh, siamo sotto Natale, per stavolta ti faccio anche una mail...  ;-)))
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com




...


 promoMARKETING SOFTWARE ha scritto nel messaggio

Newsgroup: it.comp.lang.visual-basic
Titolo: Il mio addio a Lupo

Soltanto adesso, in questo preciso momento, leggendo i post
ho appreso della scomparsa di una persona straordinaria. Ho faticato a
comprendere che si trattasse di un fatto reale e non di uno scherzo di 
pessimo gusto,
poichč non ero a conoscenza della gravitą della sua malattia.
Sentivo il bisogno di scrivergli che ho avuto il piacere di conoscere una 
persona
in gamba, disponibile,che č riuscita ad insegnarmi tanto attraverso ogni sua 
singola
parola.
Desideravo essere vicino a tutti coloro che soffrono per la sua scomparsa,
manifestando stima e immenso dispiacere.
Ovunque tu sia, caro Lupo, ti ricorderemo a lungo.
Sossio. 


Leggo adesso questo post e mi aggiungo al tuo saluto.
-- 
Massimiliano G.
www.myplast.com

 Leggo adesso questo post e mi aggiungo al tuo saluto.
ciao lupo
--
Greg

 ha scritto nel messaggio
news:Exqbd.33585$b5.17...@news3.tin.it...
Leggo saltuariamente il ng, ma mi unisco al dolore di tutti i partecipanti
per la perdita di Lupo.
Purtroppo non lo ho conosciuto se non leggendo i suoi post che,
fortunatamente, resteranno sempre a testimoniare la persona splendida che
era.
Ciao Lupo,
Massimo
-- 
web: 
www.piubelli.net
Ciò che oggi è facoltativo domani sarà necessario.
Perchè non prepararci per tempo al futuro?
Vuoi il mio indirizzo? Togli _cut_ per rispondermi

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic6 e visual studio .net 2005

Ciao atutti
sto studiano visual basic 6, ma ho vistual studio .net 2005 , e quando 
selezoine appicazione windows, trovo qualche metodo e proprioeta' 
cambiata...
sono io che non sono buono , o e' di fatto cosi? :-)

 ha scritto

sta' tranquillo, sei buono :)
sono proprio due cose un bel po' diverse. se cerchi un po' nei post qui via
google newsgroup
http://groups.google.it/advanced_group_search?hl=it
tipo "visual basic net libri"
troverai un po' di segnalazioni di libri ecc. per 
vs.net
. io al momento mi
ricordo solo quello di balena. dalla via che ce l'hai, forse ti conviene
lasciar da parte vb6 e concentrarti su net.
buon lavoro e ciao, j.

 sono io che non sono buono , o e' di fatto cosi? :-)
Un buon libro sui fondamenti del .net framework non sarebbe male.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: DLL di C++ e Declares Funcion di VB

E' possibile creare una DLL in C++(sfruttandone la 'perfezione') e poi
utilizzarla con VB senza problemi?
Grazie
  Ric

 scritto nell'articolo
<01bcaf26$205b3e80$14af1fc3@riccardo>...


   Ric
   Se proprio la vuoi fare in C++ ti conviene crearti un OCX.
Newsgroup: it.comp.lang.visual-basic
Titolo: ? Problema invio dati

Ciao ho un problema che non riesco a risolvere....... sicuramente sapete la
soluzione.
Devo trovare il modo di lanciare la stampa da un secondo form ma devo
prendere parte di dati anche dal primo, provo a spiegarmi meglio.
Io ho 2 form nel primo devo riempire dei campi con combo box, text box, ed
altro e sono dati che sono di carattere generale, poi con degli option
button devo selezionare un secondo form che fa al caso mio( in totale ho tre
opzioni) e fin cui nessun problema ma quando lancio la stampa dal secondo
form selezionato non mi stampa i dati del primo ma solo quelli del secondo.
Di seguito riporto la prima parte del listato.
Private Sub cmdstampa_Click()
   Set Printer = Printers(0)
   Printer.ScaleMode = vbCentimeters
   Printer.FontSize = 10
   Printer.CurrentX = 4.5
    Printer.CurrentY = 5.2
    Printer.Print cbo1; ""     'cbo1 fa parte del primo form
    Printer.EndDoc
potete essermi d'aiuto? Grazie

Prova cosi':
Printer.Print NomePrimoForm.cbo1; ""     'cbo1 fa parte del primo form
Dove NomePrimoForm è il nome del primo form !!!
Questo perche' devi far riferimento ad un controllo esistente sul primo form
... quindi devi specificare a vb dove trova cbo1 !!!
--
Ciaps
Stracca (
http://www.stracca.net
)
--------------------------------------------------
  Sito Comune: 
http://www.murialdo.it/it_lang_vb
 Supporta il Sito Comune e il progetto Leonardo 2
--------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: New e CreateObject

Che differenza c'e' tra New e CreateObject
meglio
set c = new <nomeclasse>
o
set c = createobject("<nomeclasse>")
Grazie

Che differenza c'e' tra New e CreateObject
Utilizzando "New" si ha quella che si dice "associazione anticipata", ovvero io stabilisco a priori
che tipo di oggetto vado ad istanziare:
Dim aaa as Excel.Application
Set aaa = New Excel.Application
Utilizzando "CreateObject", invece, si ha la cosiddetta "associazione tardiva", ovvero io determino
il tipo di oggetto solo quando lo vado ad istanziare:
Dim aaa As Object
Set aaa=CReateObject("Excel.Application")
Quindi in questo caso alla variabile aaa si può successivamente associare un tipo di oggetto
diverso.
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
---------------------------------------------------------------------------

Aggiungo solo:
quando puoi usa l'associazione anticipata, sia per ragioni di efficienza,
sia per pulizia di codice.
ciao
ugo

 Quindi in questo caso alla variabile aaa si puň successivamente associare


Newsgroup: it.comp.lang.visual-basic
Titolo: Inserire un option button dal codice durante l'esecuzione

Mentre il mio programma è in esecuzione cliccando su un pulsante mi crei
nuovi option button nella form qual è la riga di comando? Aiutatemi
perfavore è urgente Grazie
--------------------------------
Inviato via 
http://usenet.libero.it

 perfavore è urgente Grazie
http://groups.google.com/groups?q=creare+controlli+esecuzione+group:it.comp.lang.visual-basic&hl=en&lr=&ie=UTF-8&sa=G
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 Aiutatemi perfavore è urgente Grazie
due urgenze in due giorni... lavori in un pronto soccorso?
Puoi lavorare sulla collezione controls della form, oppure gestire la cosa
tramite un array di controlli. più facile la seconda.
--
Salutoni
Sergio

 10 per la battuta. Quasi ogni pochino il prof mi aggiungere cose sempre
più pallose e io devo finire questo cazzo di programma entro maggio. Ora ha
tirato fuori gli sms.


 Ora ha tirato fuori gli sms.
come ha velatamente suggerito emmexx, impara a cercare le cose su google.
a parte il fatto che a qualcuno scoccia vedere le stesse domande ripetute più
volte in poco tempo, se impari a cercare puoi risolvere i tuoi dubbi in molto
meno tempo.
--
Salutoni
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: datagrid e valuta

Ho già postato su dotnet.vb ma non avendo ricevuto risposta provo qui.
Ho un datagrid e per la 3° colonna ho settato la formattazione
di valuta. Il problema è che se digito un punto(al posto della
virgola) questo viene non considerato quindi:
12,34->12,34
12.34->1234,00
Come posso risolvere?
Grazie


In VB io intercetto il tasto premuto e faccio
if KeyAscii = vbPunto Then KeyAscii = vbVirgola
Ciao, Fabrizio 

Fabrizio ha scritto:

Ciao Fabrizio, anch'io volevo adottare questa soluzione ma non trovo
l'evento adatto.
Con l'evento cellParsing il mio codice viene eseguito dopo la
formattazione automatica quindi non ottengo risultati.
12.34->1234,00->1234,00

12.34->1234,00->1234,00
Non utilizzo nč vbnet nč il datagrid.
Nel mio caso l'evento che utilizzo č il KeyPress del DbGrid
Ciao, Fabrizio

Newsgroup: it.comp.lang.visual-basic
Titolo: ### Buttons alla MONEY

Avrei la necessità di realizzare di bottoni alla Money 2000, flat, ma VB
sembra non volersi proprio separare dal bordino 3D, come fare?

 wrote in message
8tbn0c$m0m99$1...@ID-52601.news.dfncis.de...


Non vorrei utilizzare OCX, magari uno spezzone di codice si.
Comunque la proprietà Apperance a che cavolo serve?


 ha scritto nel messaggio
news:8tbn0c$m0m99$1...@ID-52601.news.dfncis.de...


Ciao Marco,
Ti ringrazio, ci avevo già pensato. Ma quello che volevo sapere è se si può
eliminare l'effetto 3d dai buttons.

 Ti ringrazio, ci avevo giŕ pensato. Ma quello che volevo sapere č se si
puň


eliminare l'effetto 3d dai buttons.
No non si può.
Però questo è il codice per gestire l'OnEnter e l'OnLeave del mouse:
Private Sub picButton_MouseMove(Index As Integer, Button As Integer, Shift
As Integer, x As Single, y As Single)
    If (GetCapture <> picButton(Index).hwnd) Then
        SetCapture picButton(Index).hwnd   ' catturo il mouse
        'RaiseEvent MouseEnter
        Call DrawBorder(picButton(Index), True)
    Else
        If ((x < 0 Or x > picButton(Index).ScaleWidth) Or (y < 0 Or y >
picButton(Index).ScaleHeight)) Then
            ' se mi trovo al di fuori del controllo
            ReleaseCapture
            Call DrawBorder(picButton(Index), False)
        End If
    End If
    picButton(Index).Refresh
End Sub
PicButton è un array di PictureBox
SetCapture() e ReleaseCapture() sono API
DrawBorder() è una mia funzione che disegna il bordo a seconda se sto
entrando o uscendo dalla picture con il mouse.
Eventualmente puoi usare la DrawEdge() o la DrawFrame() (api)
Ciao