mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini e Report ?

Ciao Ragazzi,
    scusate se vi disturbo ma volevo sottoporvi il mio problema:
devo scegliere un immagine da una directory
OK
in base al nome (codificato) devo leggere dei dati in un db MDB           OK
devo stampare i dati e l'immagine in un report
PANICO
come faccio a passare un immafine ad un report?
GRAZIE 1000
Luca

Luca wrote:

Mi sono trovato anche io davanti al problema di passare un'immagine ad un report
(crystal 4.5).
Ho presto spunto da un esempio che ho trovato sul sito comune.
Per quanto ne sappia, almeno con la versione del CR di cui sopra, l'unico modo
per far stamapare
un'immagine e' quella di avere la stessa immagine salvata all'interno del
database come oggetto OLE.
Nel caso pero' che tu gestisca l'anagrafica di un comune e volessi avere una
foto per ogni persona
salvata nel database, quest'ultimo diventerebbe enorme (calcola 50k ad immagine
se ti va bene!).
Io ho risolto nel seguente modo:
Mi salvo solo il nome della picture nel database..
Poi mi sono creato una tabella nella quale ho solo un record.. questo record
contiene un codice ed
un oggetto OLE (la foto appunto).
Per pero' salvare la foto come oggetto OLE nella tabella di cui sopra ho usato
un controllo picturebox
collegato ad un datacontrol.
Ogni volta che mi posiziono su un record differente devo preventivamente
cancellare la picture dal
database e quindi inserirgli quella relativa al record corrente.
Nel crystal report dovrai semplicemente aggiungere la tabelle contenente la foto
e legarla tramite codice
con il codice del record che vuoi stampare!
Il problema e' che Access nelle operazioni di cancellazione non ti libera
fisicamente lo spazio occupato
nel database e quindi.. ogni qual volta chiudo l'applicazione eseguo un Compact
del Database!
Se tutte queste parole ti hanno confuso solo le idee (mi so' confuso anche io
ehehe) ti consiglio di
visitare il sito 
www.murialdo.it/it_lang_vb
 dove troverai l'esempio imgdata.zip
che fa al caso tuo!
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: Blocco del record

Vorrei, poter gestire, il blocco del singolo record, in un database di
access97/2000.
So che con access2000 si puo fare, da vb6 come si fa ?....se si può, si può
fare qualcosa anche con un db in access97 (sempre da un'applicazione in vb6)
.
Ringrazio anticipatamente
Marcello
--
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/freevideo/

 ha scritto nel messaggio
news:8oh80j$118$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: BENEDETTO QUESTO NG!

Non vorrei essere OT ma vorrei solo ringraziare tutti gli amici
programmatori di questo NG!
Ogni volta che ho avuto un problema e che non riuscivo a risolvere,mi è
bastato mettere un messaggio di aiuto, che subito qualcuno mi ha risposto ed
aiutato.
Non pensavo che aveste cosi tanta pazienza anche verso i pivelli come me e
che fanno domande a volte banali.
Cerco comunque di non approfittare della vostra bontà,infatti ricorro a voi
solo quando (dopo aver letto tanti libri e fatti vari esperimenti anche per
giorni interi) non riesco a risolvere un problema.(...pure perchè
"scervellarsi" da solo per capire una cosa,seconde me è molto istruttivo)
Seguendo questo NG si impara e si cresce davvero molto,e non immaginate
quanto è prezioso il vostro aiuto per quelli come me!
Grazie
Angelo

 Non vorrei essere OT
    Sei OT!
    Hai scritto il subject tutto in maiuscolo!
    Non hai specificato [OT] nel subject!
    (Scusa... Faccio cosi' per non commuovermi...)
    :)))
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 ha scritto

grazie a te. un post cosi' spazza via un milione di quelli bui.
ciao, j.

quanto č prezioso il vostro aiuto per quelli come me!
Anche se hai scritto il subject in tutto maiuscolo (sgradito alla netiquette)
ci hai fatto crescere di due palmi: val piu' il tuo grazie che i post (o anche
mail personali) di insulti che ogni tanto si ricevono.
Grazie a te,
-- 
hal

 ha scritto nel messaggio
news:HglR8.55976$j65.1...@twister1.libero.it...

Concordo in PIENO ogni parola!!!!
Paolo

Angelo
Da uno che si chiama cosě non ci si poteva aspettare un titolo
differente! ;)
Ciao
Alessandro
PS: il titolo in maiuscolo non rispetta molto la netiquette ma questa
volta chiudo volentieri tutti e due gli occhi! ;)
-- 
Visita il sito comune del NG: 
http://www.it-lang-vb.net
Visit: 
http://www.hardwaretips.com

Newsgroup: it.comp.lang.visual-basic
Titolo: STAMPARE ETICHETTE

COME DIRE AD UN'ETICHETTATRICE DI STAMPARE UN CODICE A BARRE CON ALCUNI
DATI.
ESISTE UN CONTROLLO SPECIFICO?
AIUTATEMI!!!

 wrote in message
97eopq$upg$1...@lacerta.tiscalinet.it...


 wrote in message
97eopq$upg$1...@lacerta.tiscalinet.it...

Di che marca è la etichettatrice, che se per caso è una TEC, bhe, sei a
cavallo.
 /\/\/\/\/\/\/\/\/\/
| Una iniziativa a livello di questo NG:
| Partecipa alla stesura di progetti VB sviluppati in team, informati sul
Sito Comune
| sezione Leonardo.  Io partecipo al progetto Data Raptor, alleati con noi.
 \/\/\/\/\/\/\/\/\/\
Ciao
Ettore Maronese, il Mes
http://www.maronese.com/mes
Sito Comune di questo NG
http://www.murialdo.it/it_lang_vb

ho trovato tempo fa un font per i codici a barre, penso sul sito comune di
questo ng.
Era molto utile e semplice, si poteva usare qualsiasi controllo impostando
solo la proprietą font...se č cio' che cerchi.....anche con l'oggetto
Printer del VB.
si chiama    BARC39.ZIP
bye
deV
Newsgroup: it.comp.lang.visual-basic
Titolo: CODICI A BARRE

Ciao, sto cercando il modo di interfacciarmi con un lettore di codici a
barre, qualcuno ha mai sviluppato questo?
Grazie

 wrote in message
b1gtkd$2kjc$1...@newsreader1.mclink.it...


Ciao ragazzi, come faccio per interccettare il codice a barre letto? Avete
esempi! MAGARIII

esempi! MAGARIII
Emulazione tastiera?
Collegamento COM?
Collegamento OCIA?
Ciauz
Aran Banjo
<math> 2 + 2 = 5 for sufficiently large values of 2</math>

 esempi! MAGARIII
io ho risolto prendendo un lettore in emulazione tastiera, ovvero i codici
letti vengono inviati al pc come se fossero stati battuti da tastiera. In
genere sono i piů economici.
Essendo in emulazione di tastiera sorge il problema di capire se i dati che
arrivano sono inviati dal lettore o dalla tastiera vera e propria. Per fare
questo ci sono due tecniche, la prima consiste nel misurare la differenza di
tempo che intercorre fra un carattere e il successivo, ma questa tecnica
l'ho trovata fastidiosa specie in pc lenti..
La seconda tecnica consiste nel procurarsi un lettore che invii un carattere
iniziale a tua scelta, prima di inviare il codice letto.
Io ho adottato la seconda con ottimi risultati. Per ricever eil codice basta
che attivi il KeyPreview dei form, e nel momento in cui arriva il carattere
iniziale ti predisponi per l'input del codice a barre gestendo l'evento
Form_KeyPress componendo il codice.
Spero di esserti stato utile ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: NT4 e PlaySound

Salve a tutto l'NG
dopo aver letto dei messaggi del tipo:
W98= cesso buttalo
io di solito programmo in NT4 e provo con W98 etc. mi sono deciso ad
installare NT4 sul mio computer avendo la felice idea di non cancellare W98.
Lasciamo perdere le peripezie di installazione, tra SP1 SP3 e SP6.
Dopo aver installato Visual Studio il quale mi ha aggiornato il Service Pack
a 3 la prima cosa che ho fatto è stata quella di andare a caricare VB con il
mio sorgente. E qui sono nate le prima magagne.
Avevo la necessita di far emettere dalle casse una nota per brevissimo tempo
ad una determinata frequenza, quindi ho registrato questa nota per circa 3
secondi ed ho usato questa routine
If SchedaGeneral(4) Then
retval = PlaySound(Setting(6), 0, SND_FILENAME Or SND_ASYNC Or SND_NODEFAULT
Or SND_LOOP)
End If
Sleep Punto
retval = PlaySound("", 0, SND_PURGE Or SND_NODEFAULT)  ' stop playback
 dove schedagenerale(4) =0 o 1 se deve emettere la nota o meno
Setting(6) contiene la stringa completa di percorso
Punto contiene il valore in millisecondi di pausa
in W98 tutto questo funziona perfettamente in NT4 se faccio funzionare la
routine BY STEP ed entra nello stop playback non stoppa assolutamente niente
fino a quando non sono terminati i 3 secondi della lunghezza della nota.
Immaginate il casino che viene fuori dato che nella routine entra ed esce
circa 50 volte per emettere determinati suoni.
Credevo che fosse un problema di Service Pack e sono andato anche ad
Updatare al SP6.
L'unico dubbio che mi resta e che ho il settaggio per la scheda audio sound
blaster 16 mentre io sono in possesso di una sound blaster 64. Ma non credo
assolutamente dato che la scheda sonoro funziona perfettamente, forse
limitata, ma i CD li sento, daltro canto non ho i drivers per questa scheda
sotto NT4 ed il disco di installazione non prevede i driver per NT.
Non fatemi rimpiangere di aver installato NT ed evitatemi l'ennessima
formattazione dell?HD dato che negli ultimi tre giorni ho consumato
letteralmente le superfici dei dischi con tutte le formattazioni fatte.
Grazie a tutti

letteralmente le superfici dei dischi con tutte le formattazioni fatte.
hai provato a vedere sul sito del produttore della scheda audio
se ci sono i driver per NT ?
Ciao
Aldo

Per fermare l' esecuzione non va scritto
retval = PlaySound("", 0, SND_PURGE Or SND_NODEFAULT)  ' stop playback
bensi' :
retval = PlaySound(Setting(6), 0, SND_PURGE Or SND_NODEFAULT)  ' stop playback
(Provato con NT 4 server sp6, P200, sk audio creative awe64)
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: Uno script per nuove finestre Internet Explorer

Scusate, spero sia il NG giusto al quale rivolgermi.
Ho trovato il seguente comando che mi par di capire dovrebbe massimizzare la 
grandezza delle nuove finestre che si aprono su I.E.
Mi servirebbe invece ottenere la dimensione minima possibile (magari 
posizionate in un angolino dello schermo, ma non e' indispensabile). 
Purtroppo ci capisco molto poco, cosa dovrei modificare? Riporto 
integralmente....
// Windows Script Host Script
// Mark L. Ferguson 2000  
mar...@msn.com
// free for non-commercial use
var vbOKCancel = 1;
var vbInformation = 64;
var vbCancel = 2;
var L_Welcome_MsgBox_Message_Text   = "This script puts a maximize item on 
the IE right click menu of a link.";
var L_Welcome_MsgBox_Title_Text     = "Link Max Size IE";
Welcome();
var WSHShell = WScript.CreateObject("WScript.Shell");
WSHShell.RegWrite("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet 
Explorer\\MenuExt\\Link Max Size IE\\", "file://c:\\MaxLink.htm");
WSHShell.RegWrite("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet 
Explorer\\MenuExt\\Link Max Size IE\\Contexts", 0x20, "REG_DWORD");
var fso = WScript.CreateObject("Scripting.FileSystemObject");
var f = fso.OpenTextFile("c:\\MaxLink.htm", 2, true);
f.WriteLine("<SCRIPT LANGUAGE='JScript' >");
f.WriteLine("var 
hWin=open('javascript:window.resizeTo(screen.width,screen.height);window.moveTo(0,0)');");
f.WriteLine("hWin.navigate(external.menuArguments.event.srcElement.href);");
f.WriteLine("</SCRIPT>");
f.Close();
function Welcome() {
    var WSHShell = WScript.CreateObject("WScript.Shell");
    var intDoIt;
    intDoIt =  WSHShell.Popup(L_Welcome_MsgBox_Message_Text,
                              0,
                              L_Welcome_MsgBox_Title_Text,
                              vbOKCancel + vbInformation );
    if (intDoIt == vbCancel) {
        WScript.Quit();
    }
}


hWin=open('javascript:window.resizeTo(screen.width,screen.height);window.mov
eTo(0,0)');");
Non ho idea di cosa sia 'sta roba, ma leggendo in inglese, "Resize To Screen
Width" mi suona di "ridimensiona alla larghezza dello schermo", e
altrettanto per l'altezza.
Forse, scrivendo come parametri dei valori più piccoli, magari anche 0,0,
chissà...
Alberto
--
"Non mi sembra più granda del Delfino..."
"A partir dal fat che la merda liquida
l'as drisa gnan a puntlarla,
còsta chì l'è piò granda, gnuranta."

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] gestire da codice l'accesso da parte di più utenti

Salve a tutti, ho chiesto come gestire l'accesso di più utenti ad un MDB ed
alcuni mi hanno risposto di utilizzare le Opzioni Avanzate di Access, però
altri mi hanno detto che è meglio utilizzare il  controllo "Ottimistico"
cioè gestire l'accesso da codice. Come posso fare a livello pratico??? Non
son molto ferrato con VB!!
Grazie a tutti.
Paolo :-))

 wrote in message
news:CrBa6.102023$eB2.7...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Forse OT

Ma in access 2000 perchè se faccio una query con il like % non ritorna un
cavolo di niente?
Eppure è sql
Grazie Andrea

 wrote in message
news:8sl7no$2cd$1...@nslave3.tin.it...


 
Proverò con l'asterisco ... lo sò che access è una chiavica di database ... ma non conosco altri database che lavorino su di un file solo.
Mi piacerebbe però sapere e poter trovare uno di quei database che ci costruiscono le applicazioni che si trovano in edicola ... quelle che utilizzano database che scrivono su 74 mila file ... sai per caso che database sono?
Ciao Andrea
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
laguna.tiscalinet.it
 [195.130.224.86] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:39eedf25...@laguna.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inviare mail con + allegati

E' possibile inviare una mail (tramite MAPI) con + allegati?
Con un allegato non ho problemi ma non riesco a ipostargli il secondo
allegato.
Grazie Massimo
Function InviaMail(sDiRecipAddress As String, sDiRecipDisplayName As String,
_
                   sDiMsgSubject As String, sDiMsgNoteText As String, _
                   aDiAllegati As Variant) As Boolean
On Error GoTo Error_Detect
  ' Verifico i dati per l'invio
  If Trim(sDiRecipAddress) = "" Then
    Err.Raise 999, "Indirizzio destinatario obbligatorio"
  End If
  If Trim(sDiRecipDisplayName) = "" Then
    sDiRecipDisplayName = sDiRecipAddress
  End If
  ' Invio la mail
  MAPISession1.DownLoadMail = False
  MAPISession1.SignOn
  With MAPIMessages1
    .SessionID = MAPISession1.SessionID
    .Compose
    .RecipAddress = sDiRecipAddress
    .RecipDisplayName = sDiRecipDisplayName
    .MsgSubject = sDiMsgSubject
    .MsgNoteText = sDiMsgNoteText
'MsgBox .AttachmentCount
    .AttachmentPosition = 0
'    Dim i As Integer
'      For i = 0 To UBound(aDiAllegati)
'        If Trim(aDiAllegati(i)) <> "" Then
'          .AttachmentIndex = 0
'          .AttachmentPathName =
'        End If
'      Next
    .AttachmentIndex = 0
    .AttachmentPathName = "d:\prova.txt d:\massimo.txt"
    .AttachmentName = "prova.txt"
CON UN ALLEGATO PARTE,  se inserisco il secondo va in errore su SEND
'MsgBox .AttachmentCount
  '  .AttachmentIndex = 1
  '  .AttachmentPathName = "d:\massimo.txt"
  '  .AttachmentName = "massimo.txt"
    .Send
  End With
  InviaMail = True
ExitFunction:
  MAPISession1.SignOff
  Exit Function
Error_Detect:
  InviaMail = False
  MsgBox Err.Description
  GoTo ExitFunction
End Function

prova a settare
.AttachmentCount = 2

 ha scritto nel messaggio
news:Xns93DE200390D2gi...@213.140.2.16...

Newsgroup: it.comp.lang.visual-basic
Titolo: Numero->lettere

Ciao,
mi sapreste dire come posso fare per trasformare un numero in lettere?
Mi spiego meglio con un esempio:
da 132,20 devo ottenere centotrentadue/20.
Devo utilizzare la routine in excel.
Ciao e grazie.
~~~~~~~~~~~~~~~~~~~~~~~
 Per rispondere in E-Mail togli AT

vai sul sito comune 
www.it-lang-vb.net
e cerca TraslitVb6.zip di Mak5s
"Stefano" <geos...@ATyahoo.it> ha scritto nel messaggio
news:oFVa8.59093$om6.1...@news1.tin.it...


 ha scritto nel messaggio
news:yiXa8.21243$tv6.6...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con Setup Wizard

Ho fatto il mio primo programma utilizzando ADO e non più DAO e
cominciano i problemi! Durante il setup vengo avvisato che "Per i file
elencati non sono disponibili informazioni sulle dipendenze." il
suddetto file è msado20.tlb. Proseguendo con l'installazione mi
segnala che praticamente per tutti gli .ocx e le .dll le informazioni
sulle dipendenze non sono aggiornate.
Se qualche anima buona capisce cosa succede e mi vuole aiutare,
grazie. Se no mi arrendo e lo rifaccio utilizzando DAO...

 suddetto file è msado20.tlb.
Intanto il fatto che il wizard ti inserisca un TLB ti dimostra che stai
facendo riferimento ad una versione di ADO più vecchia di quella che hai
sulla macchina di sviluppo.
Ti consiglio di fare riferimento alla libreria più recente che hai, e
soprattutto di studiarti bene la distribuzione dei componenti di accesso ai
dati Microsoft, il cosiddetto MDAC.
Ciao
Alberto
PS: non è colpa di Ado. Ti sarebbe successo anche con Dao, se tu avessi
utilizzato una libreria vecchia

Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare Data e Ora correnti

Un saluto al NG attraverso il quale stò imparando molte cose...
Volevo conoscere il modo di visualizzare, in una label o textbox, la
data e l'ora corrente di sistema anche con i secondi che passano.
Impostando la funzione Date, mi inserisce il valore attuale senza però
aggiornarsi alle ore 00.00. Dovrei chiudere e riaprire l'applicazione
per l'aggiornamento.
Sò che è sarà una cavolata però molte volte le informazioni più
semplici sono sempre quelle che non si trovano nei manuali e nei libri
Ciao e grazie

 per l'aggiornamento.
Studiati l'oggetto Timer!
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!
Newsgroup: it.comp.lang.visual-basic
Titolo: versione 4

ho la necessita di comprare la versione 4 di VB ma è mai possibile che non
riesca a trovarla da nessuna parte?
Avete qualche idea?

Avete qualche idea?
I canali pirati sono sempre stati piu' efficenti, poi ti regolarizzi
appena puoi !. 
(e non trovare scuse!)
Antonio Tanzillo  
a...@netgroup.it
Marigliano (NA)  
www.netgroup.it/atsoft

 Avete qualche idea?
In un negozio di software? potrebbe essere un'idea........
-- 
--
                    Ciao ANdrea!
--                 Adeo pauperes erant ut unum tantum equum aberent
communem
     __ o   
    _`\<,         Andrea 'Parsifal' De Previde Prato - 
andr...@tin.it
 __( )/( )__    home page 
http://space.tin.it/libri/adeprevi
 

Scusa è, ma perchè acquistare la versione 4 quando è uscita la 5, più
semplice da usare e migliorata?
Ciao,
-- 
Thunder
-------------
thu...@stealthmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto SAPI

Sto utilizzando per la prima volta il riconoscimento vocale SAPI , quindi
partendo dalla cosa piů semplice ho creato un Form nel quale ho inserito
come componente l'Attivex "Microsoft Voice Text" ,
quindi ho scritto questo nel form load:
Private Sub Form_Load()
TextToSpeech1.Speak "ciao"
End Sub
Il bello č che mi da un errore e non ne capisco la provenienza e cioč:
"Metodo 'Speak' dell'oggetto 'ITextToSpeech' non riuscito"
Sapreste aiutarmi??
Grazie mille a tutti.

 ha scritto nel messaggio
news:91aqp8$em1$1...@serv1.albacom.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione dopo aggiornamento

Salve, mi sono appena avvicinato a VB in quanto curioso di provarlo, di
scoprirlo.
In genere ho usato MSaccess per qualche applicazione.
Ho scaricato alcuni esempi da qualche sito comune, ma mi sto fermando
davanti a qualche cosa sicuramente banale ma differente da access, il dopo
aggiornamento.
Su access usavo un comando:
Private Sub Testo2_AfterUpdate()
bla bla bla
End Sub
Su VB come si fa ??
Premetto non sono un giovincello, e non studio più, non faccio questo per
lavoro.
Grazie comunque.

 Grazie comunque.
Ciao, prego

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

Salve a tutti,
vorrei sapere se e come si puo fare a determinare la banda uscente ed
enterante utilizzata in una connesione di rete LAN... Per intenderci: vorrei
una funzione BandaUscenteUsata() che mi restituisse il numero di Kb\s
attualmente utilizzati... Mi spiego?
GRAZIE
Antonio Mirarchi

Il 07/02/2004 13.37, Antonio Mirarchi scrisse:

Non e' proprio cio' che hai chiesto, ma un punto di inizio:
http://vbnet.mvps.org/index.html?code/network/gettcpstatistics.htm
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 
http://vbnet.mvps.org/index.html?code/network/gettcpstatistics.htm
Infatti non vedo come possa essermi d'aiuto...
Grazie Comunque
Antonio Mirarchi
Newsgroup: it.comp.lang.visual-basic
Titolo: deduzione

ciao a tutti....
domandina stupida! :)
che oggetto potrei usare, escludendo un semplice testo, per poter rendere in
modo piu' deduttivo il fatto che del codice articolo lungo 10 caratteri si è
arrivati alla pos. tot??? magari potrei tenere anke quello e specificare
qualche proprietà che non so,tipo far vedere l'underscore.....
grazie
Beba

maskedbox (se non devi fare cose particolari)

 ha scritto nel messaggio
news:fkjn7.164996$TS4.1...@news2.tin.it...

potresti usare 10 textbox definiti come array (proprieta index che va da 0 a
9)
ognuna delle quali  ha impostata la proprietà maxlenght = 1
quindi potresti mettere nell'evento keypress della text  il seguente codice
if index <9 then
    text1(index+1).setfocus
end if
controlla comunque tramite if o select che il tasto premuto non sia uno
spazio o un enter ecc...
per identificare la posizione potresti utilizzare una label che
si aggiorno con l'index della text utilizzata.
La label aggiornala nell'evento gotfocus della text.
magari gioca con i borderstyle delle 10 textbox in modo da visualizzare il
tutto come un uncio controllo.
Saluti, Francesco

 ha scritto nel messaggio
news:9nkg15$4u3$1...@fe1.cs.interbusiness.it...


c'è una maschera da settare, così ti visualizza 10 punti vuoti; l'utente
scrive e i punti si riempiono
Prova perché la ho testata un po' di tempo fa e non mi ricordo le proprietà
corrette.

 ha scritto nel messaggio
news:9nkn7q$i7f$1...@fe1.cs.interbusiness.it...


Prova a cercare "mask" nell'help...
per te dovrebbe andar bene mask="&&&&&&&&&&"

 ha scritto nel messaggio
news:9nkquo$ddg$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per principiante

      A        B     C
1     x         y      q
2     r         x
3     y        x
Vorrei realizzare una funzione: la funzione si deve accorgere che A1 e
B2 sono uguali e controllare se lo sono anche B1 e A2 siccome non lo
sono non deve fare niente
poi la funzione controlla A1 e B3, trova che sono uguali e controllare
se lo sono anche B1 e A3, poiché lo sono deve copiare C1 in C3
io l'ho scritta così:
Private Sub CommandButton1_Click()
    Dim wsFoglio1 As Worksheet
    Dim I As Integer, J As Integer
    Set wsFoglio1 = Worksheets("Foglio1")
    For I = 0 To 100
        For J = 0 To 100
            If wsFoglio1.Cells(I, 1) = wsFoglio1.Cells(J, 2) Then
                If wsFoglio1.Cells(J, 1) = wsFoglio1.Cells(I, 2) Then
                    wsFoglio1.Cells(J, 3) = wsFoglio1.Cells(I, 3)
                End If
            End If
        Next J
    Next I
End Sub
ma mi da errore sull' If...
Chi mi aiuta?
Grazie
Mjk

 Chi mi aiuta?
sapere l'errore ?
-- 
-Gigio@work-
G2k Blog : 
http://www.g2kweb.it/?3098
G2k Snip Url : 
http://www.g2kweb.it/?3015
G2k Free Gallery : 
http://www.g2kweb.it/?218

Vorrei realizzare una funzione: la funzione si deve accorgere che A1 e
B2 sono uguali e controllare se lo sono anche B1 e A2 siccome non lo
sono non deve fare niente
poi la funzione controlla A1 e B3, trova che sono uguali e controllare
se lo sono anche B1 e A3, poiché lo sono deve copiare C1 in C3
************************************************
Non capisco, scusa.
Ma siamo in Excel e nel suo vba?
Non ho controllato *cosa* fa il codice,
ma cosě sarebbe meglio.
Private Sub CommandButton1_Click()
    Dim i As Long
    Dim j As Long
    With Worksheets("Foglio1")
    For i = 1 To 100
        For j = 1 To 100
            If .Cells(i, 1) = .Cells(j, 2) Then
                If .Cells(j, 1) = .Cells(i, 2) Then
                    .Cells(j, 3) = .Cells(i, 3)
                End If
            End If
        Next j
    Next i
    End With
End Sub
Siamo in vb?
Supposto che tu abbia istanziato *anche* Excel,
secondo te, la riga 0 qual'č?
For i = 1 to 100
For j = 1 to 100
-- 
---------------------------
Mauro Gamberini 

emmm... grazie. L'errore era propio quello... la riga zero non esiste!
Sai l'abitudine degli array...
Ciao
Mjk
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP determinare se una applicazione è installata

Cari amici sviluppatori,
scusate la banalità della richiesta, ma pur provando a cercare in giro
non sono riuscito a trovare la semplice risposta; il problema è: come
faccio a capire se una applicazione è installata o no ?
A naso credo che sia necessario leggere il registro di configurazione
di windows e in tal senso ho trovato alcune routine che fanno uso
delle API di windows ma finora non sono riuscito ad utilizzarle
correttamente, qualcuno può darmi una dritta ?
Un neofita
Mauro Ferri
maf...@tin.it

...

----------
Ciao!
Sul mio sito Internet trovi un modulo, ampiamente commentato, che ti mostra
come leggere/scrivere/cancellare chiavi e valori nel Registro di
configurazione di Windows.
Spero che possa aiutarti.
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Barra di Avanzamento

Ciao a tutti.
Come posso realizzare una barra di avanzamento che segnali all'utente
lo stato di avanzamento dell'evento di Load e Init di una form?
L'intera fase dura circa un minuto, vengono caricati alcuni server
OLE, e vorrei rendere piu' amichevole l'interfaccia per l'utente.
Grazie per la vostra disponibilita'.
Ciao,
   Giovanni Buommino 
 
 
gbuo...@emails.com
 


Innanzitutto potresti mettere uno splash screen che .SHOW quando parte
il programma. O quando si sta caricando il form.
Se poi tra un server ole caricato e l'altro cambi il testo di una
label tipo "Caricamento in corso del componente n/n" o simili... messa
nello splash screen (ovviamente fai sempre REFRESH)...
La barra di avanzamento la potresti mettere nel form splash pero' hai
l'azione nel programma vb *TRA* un'istruzione e l'altra, quindi
mettiamo che usi CreateObject un oggetto ci mette di piu' di un altro
a caricarsi, non hai piu' la continuita' nell'accrescimento della
barra di stato.
Ciao, Stefano
Stefano - 53.6%
gl...@eponet.it
http://www.geocities.com/SiliconValley/Lakes/1218
(programmazione VB 32 bit)

Newsgroup: it.comp.lang.visual-basic
Titolo: I Pulsanti come li vuoi tu

Ciao è possibile creare dei command delle forme e del colore che vuoi tu e
che siano nello stesso tempo pulsanti 3d

Sě: dai un'occhiata sul Sito Comune di questo Newsgroup.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: MAPI questo sconosciuto (almeno per me!!!!)

Qualcuno di voi mi sa dire come posso fare per gestire la posta come negli
account di outlook?
Cioè fare in modo che la posta rimanga sul server anche dopo che la ho letta
e che venga cancellata a 7 giorni di distanza e quindi come leggere dalla
mailbox solo i messaggi che non ho già letto precedentemente.
Ciao e Grazie

 wrote in message
news:vG5z6.6796$5Y1.1...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Navigare Gratis attraverso un numero verde?ORA E' POSSIBILE!!!!!!!!!!!!!!!!!!!!!!!

Ciao
Volevo segnalarvi che KyberLandia ha attivato il proprio servizio di
Internet gratis con collegamento tramite numero verde.
Clicca qui :
http://www.kyberlandia.it/iscrizione/default.asp?utente=cirieh
iscriviti e potrai navigare attraverso un numero verde TOTALMENTE GRATIS!!!!

E la velocità quanto è ? 1 bit/s o ancora meno ?

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]-ADO e più utenti

Ho fatto il cattivo? Perchè non rispondete ai messaggi?
Ho una connessione ad un DB sul Pc1 da altri due Pc come faccio a
controllare il blocco dei record o meglio se arrivano insieme a gestirli?
bye Roberto

 wrote in message 8alrob$1an$1...@nslave1.tin.it...


Ciao e grazie
Io uso MS Access VB6 e i recordsets.
il Provider č MS JET.
Se sai qualcosa in piů su questi argomenti fammi sapere se ci possiamo
sentire piů velocemente in e-mail
bye Roberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllare se un Task è attivo

Salve a tutti,
avrei la necessità di scrivere un'applicazione in Vb che a tempo mi
controlli se tutte le applicazioni che devono girare su questo PC siano
attive e se non lo sono le deve tirare su.
C'e' qualcuno che può aiutarmi, grazie
Loy

 wrote in message
news:QY1D8.42958$US3.9...@twister1.libero.it...

la cosa più semplice da fare è far tirare su al tuo applicativo VB le varie
applicazioni, ad esempio utilizzando una chiamata alla funzione API
CreateProcess si può lanciare una qualsiasi applicazione windows, e
controllare tramite il valore di ritorno che tale applicazione non sia
terminata (utilizzando una chiamata alla API WaitForSingleObject);
se l'applicazione termina, ci penserà il tuo programma VB a rimetterla in
piedi ;))
ovviamente, se l'applicazione che lanci a sua volta lancia altre
applicazioni, non puoi avere alcun controllo su di esse, almeno utilizzando
questo metodo;
fai attenzione ad eventuali situazioni di "deadlock" in fase di logoff
dell'utente o di riavvio del sistema (della serie: windows chiude le tue
applicazioni, ma tu le rilanci, e via di seguito...)
ciao

 applicazioni, ma tu le rilanci, e via di seguito...)
per controllare lo stato attivo potresti gestire gli handle o i titoli
delle varie finestre di applicazione , il metodo + semplice e' :
On Error GoTo Lancia
  AppActivate "Titolo della finestra della tua applicazione"
  Exit Sub
Lancia:
 'codice per ritirare su' l'applicazione in quanto se genera errore e'
disattivata
Puoi perfezionarlo con la gestione + performante sugli errori, cmq come
metodo regge tipo :
....
On Error GoTo Lancia
  AppActivate "Solitario"
  Msgbox "Chiudi il Solitario e mettiti a lavorare"
  Exit Sub
Lancia:
 msgbox "Ok prenditi una pausa e lancia il solitario"
 ' lanci sol.exe
.....

 delle varie finestre di applicazione
purtroppo è una soluzione un po approssimativa; come minimo ci sarebbe lo
svantaggio di vedermi attivare le applicazioni da controllare  (e se devo
monitorare di continuo lo stato di queste applicazioni può risultare scomodo
vedersele portare in primo piano da qualche "misteriosa entità");
e poi se l'applicazione da controllare risiede nella traybar, o se non ha
una finestra, o se magari ne ha più di una (es. delphi o vb in modalità
SDI), o se non si conosce la caption della applicazione da controllare, la
cosa potrebbe risultare un attimino scomoda;
ciao

 cosa potrebbe risultare un attimino scomoda;
a be' io ho scritto solo il metodo + veloce gh gh ^_^
bhe allora se cerchi di gestire tutte le possibilita' ti devi buttare sui
"processi" , leggerli e all'assenza di un tuo processo lo ritiri su come ti
pare , mi pare ci fosse addirittura un ocx a forma di listbox ... ma i
ricordi a quest'ora si offuscano..
Newsgroup: it.comp.lang.visual-basic
Titolo: Duplicazione Command

Salute a tutti,
Come posso fare per duplicare un oggetto Command all'interno di un
Data Environment ?
Meglio ancora, vorrei poter riutilizzare lo stesso Command per due
oggetti Data Report diversi, identici nel tipo di informazioni da
esporre, ma con qualche differenza nel SQL di selezione del Recordset.
Grazie.   Loris

 esporre, ma con qualche differenza nel SQL di selezione del Recordset.
Non me ne intendo molto, ma forse puoi fare così:
Dim strSQLString As String
strSQLString = "Select * From Tabella"
DataEnvironment1.Commands("Command1").CommandText = strSQLString
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

DataEnvironment1.Commands("Command1").CommandText = strSQLString
Grazie. E' proprio quello che mi serviva, anche se, per chi non lo
sapesse, nel caso di Command di tipo gerarchico (ADO) è necessario
utilizzare la sintassi SHAPE, altrimenti non vengono riconosciuti i
DataField che si trovano ai livelli inferiori al primo.
Loris.

Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini ANIMATE?

Ciao a tutti....sono Alex
Volevo sapere se è possibile utilizzare un'immagine animata GIF (creata in
precedenza con Animation Shop)....oltre alla possibilita' di "scomporre"
tute le immagini e fargliele prendere con un array e alla possibilita' di
utilizzare un ocx.
In sistesi: vorrei sapere se  è possibile in qualche modo far supportare
delle immagini animate al vb (ho VB 5.0 con Service Pack 3.0 installato)
o se non è possible mi sapreste indicare dove poter prendere l'ocx che mi
da' la possibilita'? Grazie mille a tutti quanti
Ciao!

 precedenza con Animation Shop)....oltre alla possibilita' di "scomporre"
Per inserire le Gif animate in VB serve la gif89a.dll, che se non sbaglio è
reperibile sul sito comune.

Newsgroup: it.comp.lang.visual-basic
Titolo: Durata di un MP3

Ciao a tutti...
  Volevo chiedere se qualcuno ha idea di come ricavare Bitrate (se fisso) e
durata di un MP3 (magari senza usare pesanti controlli aggiuntivi)...
   Grazie!



Ho pronto un esempietto che volevo mettere sul SC e sul mio sito che ti da tutte le info sul file,
ma siccome ho qualche piccolo problema con i VBR (ovvero funziona ma mi è stato detto che esiste un
metodo migliore), appena lo risolvo lo invio al WM e lo pubblico sul mio sito.
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
---------------------------------------------------------------------------


Mi inserisco nel discorso perche' mi interessa parecchio:
Attendo con ansia il sucitato esempio, ma come la mettiamo con gli Mp3 a
bitrate variabile?? Da messaggi precedenti e da quanto letto sul sito comune
mi sembra che non sia possibile calcolarne la durata esatta, tuttavia
programmi come winamp o xing ti danno subito (appena popolano la playlist)
una durata anche per tali file e mi sembra che ci azzecchino (vabbe': ho
fatto solo un paio, di verifiche), come cavolo fanno!!???
ciao e grazie
Alex

Newsgroup: it.comp.lang.visual-basic
Titolo: creare il file d'installazione

ciao a tutti,
per creare il file d'insatallazione usate tutti il Package& deployment
wizzard?
lo chiedo perchè mi sembra metta dentro un sacco di roba lib condivise ecc
creando per un piccolo programmino un file grossissimo .
ho cercato della documentazione in italiano per capire come usare il tool
che fa i pacchetti, ma non ho trovato nulla mi sapete dire qualche cosa su
questo,o indicarmi dove posso trovare doc?
ciao e grz
lobax

 lo chiedo perchč mi sembra metta dentro un sacco di roba lib condivise ecc

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca Toolbar

Salve ,sapete consigliarmi  un controllo toolbar  diverso da quello che si
trova su  visual basic 6.0!! magari se ce qualcosa stile xp , sapete dirmi
dove posso trovarlo ??grazie in anticipo per le risposte ciao .

 ha scritto nel messaggio
news:F9bb9.116294$lu5.3...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Inserimento immagine

Ho un controllo image e cliccando su di esso dovrei inserire
un'immagine che ogni volta cambia.
Suggerimenti?

 Suggerimenti?
Immagini in sequenza:
Un array che contiene i nomi dei file immagine da visualizzare, una
variabile si tipo Integer pubblica (o meglio una statica), la funzione
LoadPicture() e un incremento della variabile.
Immagini a caso:
Un array che contiene i nomi dei file immagine da visualizzare, la funzione
Rnd() e la funzione LoadPicture().
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

Puoi fare un esempio con codice gentilmente....
Tutti i neofiti del newgroup come me ne saranno sicuramenti lieti


 >Rnd() e la funzione LoadPicture().
Dim strListaImmagini(4) As String
strListaImmagini(0) = "immagine1.jpg"
strListaImmagini(1) = "immagine2.jpg"
strListaImmagini(2) = "immagine3.jpg"
strListaImmagini(3) = "immagine4.jpg"
strListaImmagini(4) = "immagine5.jpg"
Private Sub Image1_Click()
    Dim intImmagineCorrente As Integer
    intImmagineCorrente = Int(UBound(strListaImmagini) * Rnd)
    Image1.Picture = LoadPicture(strListaImmagini(intImmagineCorrente))
End Sub
Ho buttato giù il codice così alla veloce. Non dovrebbere esserci molti
errori.


[MegaCUT]
Che poi, se le immagini hanno veramente il nome del tipo immagine1,
immagine2, immagine3, ecc., allora puoi fare a meno dell'array e scrivere:
Per le immagini in successione:
Private Sub Image1_Click()
    Static intImmagineCorrente As Integer
    Image1.Picture = LoadPicture("immagine" & cstr(intImmagineCorrente) &
".jpg")
    intImmagineCorrente = intImmagineCorrente + 1
    if intImmagineCorrente > UBound(strListaImmagini) Then
        intImmagineCorrente = 0
    End If
End Sub


Newsgroup: it.comp.lang.visual-basic
Titolo: contare tabelle in dataset

Ciao,
ma se faccio:
...
...
Dim dsDatabase as New DataSet
Dim count As Integer = dsDataBase.Tables.Count
count non dovrebbe contenere il numero delle tabelle nel dataset? invece
perchè mi restituisce sempre zero anche se nel dataset c'e' una tabella???

"pollom" <NOs...@Nospam.NO> ha scritto nel messaggio 
news:pan.2006.01.26....@Nospam.NO...

prova a riempiere una tabella ed aggiungerla al dataset, o con il 
dataAdapter riempire il dataset,
e poi verifica il numero di tabelle presenti nel dataset.
Ave
giuseppeD
---
CCR 

 Dim count As Integer = dsDataBase.Tables.Count
Se fai cosě, il dataset č chiaramente vuoto.
Se fai in altro modo, posta il codice che utilizzi davvero.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
Se i tempi non chiedono la tua parte migliore, inventa altri tempi. 
(Baolian, libro II, vv. 16-17)
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: cosa fate quando...

improvvisamente ricompilando un eseguibile vi trovate con quest'ultimo che
non funziona sul computer di un cliente causa librerie vecchie?
Mi è capitato di avere ricompilato un progetto che fa largo uso dei
datareport e purtroppo ora ogni volta che cerco di caricarne uno ottengo
'Network or disk Error', naturalmente non sul mio computer...
Ho guardato su msdn e lì parla di problemi legati a WinNT, ai db, ecc.
Ma non è il mio caso, la compilazione precedente, che risale a non più di
due mesi fa funziona perfettamente, la nuova ed ogni altra che faccio ora
non va...
Quindi probabilmente il problema è che le librerie sul mio vb sono
aggiornate, ma non so come, non avendo aggiornato vb e nemmeno windows coi
service pack.
La soluzione più semplice è quella di reinstallare il tutto (sperando bene)
ma come evitare problemi di questo genere?
Lorenzo

ma come evitare problemi di questo genere?
Ricrea un setup temporaneo e confronta il nuovo LST con quello vecchio,
dovresti vedere le differenze di versione tra i files usati, poi se scopri
la dll aggiornata provi a riprenderla da un client e ti riallinei.
Fabio

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

salve.
devo creare un programma che cerchi un file mdb nella sua directory e
se non c'e' accenda un common dialog per cercarlo da qualche altra
parte.
niente di complicato.  il problema pero' e' che se uso curdir essa mi
torna sembre la dir di installazione di vb e non la dir in cui
risiedono i sorgenti su cui sto lavorando, dir che poi dovrebbe essere
la stessa in cui per default il programma dovra' essere installato.
c'aggi'affa' per avere la dir in cui si trovano i sorgenti?
======================================================
my opinions do not necessarily have to be true.
======================================================
per rispondermi rimuovere NOSPAM. dall'indirizzo email
to answer me remove NOSPAM. from email address
======================================================

Ciao
prova con 'App.Path' che ritorna la directory del progetto o dell'eseguibile
Kiano
Newsgroup: it.comp.lang.visual-basic
Titolo: Get the key names for a given section in an ini file.

I would like to get the names of all the keys in a given section of an
ini file. For example this is part of the ini file;
[AUTO]
Make = Ford
Model = Thunderbird
Year = 1995
[HOME]
SQFT = 1500
Stories = 2
I can get the key values but what I want to do is build an array of
the keys themselves without knowing in advance what the key names are.
I.e. "Make,Model,Year"

Richard ha scritto:

Dim result As String
Dim channel As Integer
Dim row As String
Dim separator_pos As Integer
result=""
channel=Freefile
Open ini_file for Input Shared As #channel
Do
    If EOF(channel) Then Exit Do
    Line Input #channel, row
    separator_pos=Instr(row,"=")
    If separator_pos Then
        result=result & Trim(Left(row,separator_pos-1)) & ","
    End If
Loop
Close channel
Debug.Print result

 ini file. 
From Api-guide (
www.allapi.net
)
The GetPrivateProfileSection function retrieves all the keys and values
for the specified section of an initialization file.
Windows 95/98/Me: The specified profile section must not exceed 32K.
Windows NT/2000 or later: The specified profile section has no size
limit.
Note  This function is provided only for compatibility with 16-bit
applications written for Windows. Applications should store
initialization information in the registry.
Example:
'Example by Robin (
rbnw...@edsamail.com.ph
)
'Visit his site at 
http://members.fortunecity.com/rbnwares1
Private Declare Function WritePrivateProfileSection Lib "kernel32" Alias
"WritePrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpString
As String, ByVal lpFileName As String) As Long
Private Declare Function GetPrivateProfileSection Lib "kernel32" Alias
"GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal
lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As
String) As Long
Private Sub Form_Load()
    ' We will create a new section in the INI-file
    ' It's output will be:
    '
    ' [SectionName]
    ' Key=Value
    '
    ' Note that used this ONLY if you are creating a new
    ' section on the INI file, unless you wanted to erase
    ' its existing keys.
    Call WritePrivateProfileSection("SectionName", "Key=Value" & Chr(0)
& "hello=you", App.Path & "\sample.ini")
    Dim szBuf As String
    szBuf = Space(255)
    Dim resultArray() As String
    Dim retChars As Long
    retChars = GetPrivateProfileSection("SectionName", szBuf, 255,
App.Path & "\sample.ini")
    'the pair key=values are separated by a chr(0)
    szBuf = Left(szBuf, retChars - 1)
    resultArray = Split(szBuf, Chr(0))
    Dim intCounter As Integer
 
    For intCounter = 0 To UBound(resultArray)
      MsgBox resultArray(intCounter)
    Next
 
End Sub
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.visual-basic
Titolo: Inserimento di una chiave ner registro agni minuto

Ho una routine che mi inserisce una chiave nel registro di
configurazione di windows all'ingresso e all'uscita del programma.
Vorrei eseguire questa routine ogni minuto esatto.
Come posso risolvere?
grazie

 ha scritto nel messaggio
news:96sic0lugr778stqi...@4ax.com...

Mettendo un oggetto Timer correttamente impostato a 1 minuto
Ciao, Vincenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: TextBox:Come elimino lo spazio a sinistra?

Come da oggetto, Un piccolo aiuto.....Sto creando una macro in Excel. e i
dati che mi appaiono nella mia TextBox, hanno un fastidioso spazio a
sinistra..
Ciao e grazie...

Non mi sono mai cimentato con excel e vb..però la funzione in vb per eliminare spazi è TRIM(stringa) !
Prova ad usare questa! Esistono anche quelle per eliminare solo lo spazio destro o quello sinistro!
LTrim(stringa)
RTrim(stringa)
Ciao SIMO
--
__________________
www.sasim.cjb.net


 Ciao SIMO
Se lavori con le stringhe ti consiglio
si utilizzare le varianti '$' di queste
funzioni, ovvero Trim$(), LTrim$
e RTrim$(). Mentre le altre lavorano
su variabili di tipo Variant, queste
elaborano e restituiscono solo stringhe,
in teoria dovrebbero essere più veloci
di quelle senza $.
Tra l'altro questo rende il codice più
pulito... (vero Fibia? ;-) )
ciao, Assa

 Tra l'altro questo rende il codice piů


 pulito... (vero Fibia? ;-) )
da quand'è che ti interessa la pulizia del codice? <grin>
:pp
--
Fibia "Better without any sign" FBI
Newsgroup: it.comp.lang.visual-basic
Titolo: OT: tecnologia a badge

Salve a tutto il NG.
So di essere completamente OT, ma avrei bisogno di un chiarimento magari da 
chi ha già avuto esperienza con queste tecnologia: i badge magnetici.
Mi è stato detto che esistono delle tessere che hanno 3 tracce e che su 
queste tracce c'è un limite a quanto posso scrivere in termini di numero di 
caratteri.
dove posso verificare questa notizia (ossia: avete 1 link ad un sito che mi 
spieghi per filo e per segno come funzionano i badge magnetici)?
Per quanto riguarda invece visual basic avrei bisogno di chiarmi un dubbio: 
per leggere i badge contavo di utilizzare un controllo mscomm e (spero) di 
non avere grossi problemi, ma mi è sorto un dubbio: quando passo la tessera 
dal badge, quale delle tre tracce il lettore andrà a leggere? Ossia, cosa 
arriverà nell'evento On_comm?
Grazie a tutti 

 andrà a leggere? Ossia, cosa arriverà nell'evento On_comm?
Personalmente preferisco operare tramite le API, una volta che hai
"costruito" una interfaccia vai tranquillo anche con protocolli diversi.
In ogni caso la stringa che ti viene restituita dal lettore via seriale
puo' contenere un ID di traccia letta, oppure sei tu che definisci
la traccia sulla quale leggere. Tieni presente che saranno le caratteristiche
del lettore a dettar legge e quindi a definire le modalità di protocollo.
In piu' qualche produttore rende disponibili delle Librerie e OCX per
l'interfacciamento.
Se ti puo' aiutare.
Ciao
--
Lorenzo

 mi spieghi per filo e per segno come funzionano i badge magnetici)?
Non per fare pubblicità al prodotto ma...
http://www.makinterface.de/index_e.php3
Qui ti spiega come funzionano le tracce e ne vedi degli esempi...
-- 
Giovanni