mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Azzerare tutte le variabili con 1 riga

E' possibile secondo voi azzerare tutte le variabili in poche istruzioni,
senza farlo una ad una?
Ciao e grazie

senza farlo una ad una?
End
 :-))
Che poi sarebbe meglio non usarlo...
A parte gli scherzi... dipende dallo scope delle variabili: se queste vengono dichiarate a livello
di modulo di form ed inizializzate in fase di caricamento od inizializzazione della stessa, potresti
invocare tale evento; se queste vengono dichiarate a livello di modulo standard, potresti crearti
una funzione che le riinizializza; se queste hanno validità all'interno di una routine, a meno che
non siano Static vengono riinizializzate ad ogni esecuzione della routine.
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 wrote in message
m15gmt02upp0gk09c...@4ax.com...


grazie ciao
domanda che esula un po' dal discorso... guardando la faccenda a monte: ti servono davvero tutte
quelle variabili globali? Non riuscivi a limitarne l'uso implementando magari funzioni pubbliche o
proerty delle form?



è quello che ho detto anche io quando ho divuto mettere le mani su questo
programma....
Ciao PAO



 :-)


 Moreno
potresti adottare la soluzione di usare un modulo di classe al posto di un
semplice modulo....per azzerare tutte le variabili basta che ricarichi il
modulo
(per inizializzarlo)
dim Tmp as new TuoModulo
(per reinizializzarlo)
set Tmp as new TuoModulo
penso sia una soluzione fattibile anche se non mi sono mai trovato in questa
situazione
ciao
Sandro

Newsgroup: it.comp.lang.visual-basic
Titolo: è possibile ?

Salve ,
mi chiedevo e chiedo gentilmente
a tutti voi se è possibile scegliere
casualmente un numero compreso
in un certo intervallo ( min - Max)
senza utilizzare la funzione RND
(tipo chessò ... un algoritmo da implementare...)
Grazie in anticipo a tutti coloro che riusciranno a
chiarirmi il dilemma
bye

 
certo, esistono una marea di implementazioni di generatori di numeri 
casuali, basta che cerchi un po' in giro:  "numerical recipes" o 
"netlib" tanto per cominciare.

Gianni ci ha detto :

Puoi fare un MOD del Timer (moltiplicato per un valore sufficiente a 
elevare a intero l'ultimo decimale significativo), per il valore 
dell'ampiezza del range.
Poi sommi l'offset.
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di protezione generale ed immagini inedite dallo Stack

 Giorgio

 chiusura del mio prg in VB esce la schermata ironica di Windows


Ciao,
credo che le tue perplessita' siano condivise dalla maggior parte degli
sviluppatori in vb, in quanto sia l'immagine di memoria che i registri sono
per questa piattaforma assolutamente trasparenti e non danno nessuna
indicazione del problema.
Inoltre, da quanto ho potuto constatare, il crash di programma o di sistema
e' generalmente provocato da problemi nell'allocazione della memoria nelle
dll, in molti casi fatti generare da programmi residenti quali antivirus
ect.
Piu' in generale direi che il messaggio che compare e' una maniera elegante
di M$ per scaricare i problemi del suo SO sulle spalle di terzi (noi)!!! ;o)
beppe
------------------------------------------------------------
Visita il sito del WWF Alto Ferrarese
http://www.comune.cento.fe.it/wwfaf
------------------------------------------------------------

 beppe
Ma perchè devo fare sempre il difensore della Microsoft?
Cacchio qualcuno penserà che Bill mi paghi una percentuale
per la pubblicità.. Mah..
Anche in Linux avviene una cosa del genere, quando un processo
va in crash viene generato un dump core che contiene l'immagine della
memoria e lo stato della CPU (si chiama PSW mi sembra processor
status word). In Windows viene visualizzato lo stato dello stack e
i contenuti dei registri fondamentali della CPU al momento del crash.
Chi ha programmato il S.O. in teoria può analizzando questi dati capire
il perchè e magari capire se è un baco del S.O.
Solo che bisogna sapere sia un bel po' di Assembler sia conoscere
i valori che dovevano trovarsi in quel momento.
Io un po' di Assembler lo conosco, ma ovviamente quei dati non mi servono
a un beneamato ca...     .
Non conosco XP, ma quando un processo va in crash adesso invece di
visualizzare
lo stato dello stack il S.O. propone di inviare alla Microsoft dei dati da
cui
loro dovrebbero capire il problema e magari risolverlo.
Per rispondere alla domanda di Giorgio:
Quei dati a te non servono a nulla.
Non diamo sempre la colpa alla Microsoft, non è detto che un programma
vada in crash per errori del sistema operativo, se qualcuno ha un po' di
esperienza
di programmazione Unix o almeno quella che ho io con i processi eseguiti a
vari
livelli di priorità, può capitare che a volte sia necessario avvicinarsi di
molto al Kernel,
e avvicinarsi al kernel vuol dire evitare automatismi del S.O. che
proteggono aree di
memoria protette.
La stabilità di un S.O. si nota al massimo nell'isolare il processo andato
in Crash e nel
liberarne le risorse allocate in modo da non dover resettare la macchina, ma
questa
è un'altra storia.
        Chiedo scusa per il post un po' lunghetto
danilo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Le date in VB

Buongiorno, volevo chiedervi come fate a gestire le date in VB. Se io ho:
miadata = #29/3/2000#
me la interpreta correttamente come 29 Marzo.
Se io ho:
miadata = #2/30/2000#
me la interpreta correttamente come 30 Febbraio.
Ma se io scrivessi:
miadata = #2/8/2000#
come fa a sapere se mi riferisco al 8 Febbraio oppure al 2 Agosto?
Voi come usate le date, anche per non avere problemi nelle Query SQL?
Grazie a tutti voi e scusatemi, ma sono un neofita.
Luca  :-)

 come fa a sapere se mi riferisco al 8 Febbraio oppure al 2 Agosto?
Semplice: basta attenersi alla guida in linea :) fonte primaria di tutto il
sapere e di verità :PPP
le date quando usi ## devono essere espresse nel formato americano e così
vengono univocamente interpretate: #mm/dd/yyyy#.
VB fa una brutta cosa, pensando di fare un piacere, quando tu indichi ad es.
#30/10/2002#: anzichè dirti "ma sei un cretino! i mesi sono solo 12!" lui
gira i mesi con i giorni poichè pensa che era quello che intendevi.
Così tu dici: "che bello, funziona".
Poi consegni il programma il 05/12/2002 e non funziona una cippa :)
In SQL è lo stesso: #mm/dd/yyyy# oppure formato ISO (ancora meglio)
#yyyy/mm/dd#.
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"

 me la interpreta correttamente come 30 Febbraio.
heeeee??? lo hai fatto apposta?
volevi vedere se stavamo attenti vero?
;-)
bye
R

 volevi vedere se stavamo attenti vero?
Bravo!
Zanna era troppo attento a risolvere il quesito e non se ne è accorto...
:-))

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Cd Visual Basic

Un saluto a tutto il NG
A chi interessa un cd con 670  Mb di sorgente VB può trovarlo qui
http://cadaveria.hypermart.com/berkabvb.htm
Ciao
)||Berka||(

 wrote in message 8c4l4v$781$1...@fe1.cs.interbusiness.it...



http://cadaveria.hypermart.net/berkabvb.htm
Chiedo umilmente perdono ;) l'url giusto è questo
Ciao
)||BerKa||(

 )||BerKa||(
Tra i due indirizzi non vedo nessuna differenza.
--
Ciao da Luci@noM.
ICQ 13556170
Newsgroup: it.comp.lang.visual-basic
Titolo: VBA set + annulla: variabile "appesa"

Saluti a tutti il NG
Il problema sorge con il VBA di Access, ma spero non faccia molta 
differenza.
La seguente istruzione
Set foto= objRootItem.GetItemsFromUI(SingleImage, BestPreview)
apre la finestra della webcam tramite cui l'utente scatta una foto, 
seleziona una (o più) delle foto e le trasferisce all'applicazione.
Le istruzioni successive si occupano della gestione della foto scattata.
Il problema sorge nel caso in cui l'utente faccia clic su "annulla" nella 
finestra della webcam: le istruzioni successive che fanno riferimento alla 
variabile foto generano un errore in quanto la variabile si trova in uno 
stato...che non sono riuscito a capire, e non ha le proprietà e i metodi che 
ci si aspetta
In effetti ho provato ad inizializzare la varibile (che non è associata ad 
un tipo) con foto=0 prima del set,  inserendo le istruzioni successive in un 
IF foto <>0 che avrebbe dovuto prevenirne l'esecuzione nel caso in cui il 
SET non ne modificasse il valore.
Purtroppo anche se l'utente clicca su annulla l'istruzione SET istanzia 
comunque qualcosa che però non ha un valore, né metodi né proprietà e lo 
stesso IF foto<>0 genera un errore.
Come se ne esce? Come faccio a prevenire l'accesso a queste varibili che 
restano nel limbo?
Grazie a tutti
yanez 


foto è una variabile Variant. Dopo l'istruzione Set contiene però un object,
pertanto per testare la sua "non-nullità" devi confrontarla con Nothing.
Set foto = objRootItem.Get...
If foto Is Nothing Then...
    ' L'utente ha annullato
Else
    ...
End If
Idem per rilasciarla al termine
Set foto = Nothing
Consigliabile dichiararla As Object e non "senza tipo" (cioè Variant).
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 Raf
scusate se rispondo solo oggi, ma problemi di salute mi hanno tenuto lontano 
dal
pc...
nella mia ignoranza provavo  con if foto = nothing e non con la funzione is
nothing ricevendo un errore di compilazione..che pivello :-(
grazie a Raf e a tutti il NG
yanez
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Salvataggio di una BMP

Salve avrei un problemino da sottoporvi
- Come posso salvare un'immagine di un controllo picture in un campo di un
database
Vi ringrazio anticipatamente
Carlo Alberto

 wrote in message
news:piD27.41718$q77.2...@news2.tin.it...


> aprilo in binario, mettilo in una stringa, salvalo in un campo memo
Grazie Ricc
Ma il mio problema è un po' piu complesso (credo),
scusami se prima non sono stato preciso, cerchero di essere più chiaro ora:
Attualmente ho un  database con un campo OLE, da Access viene inserito
manualmente un oggetto ole di tipo Immagine Bitmap, tale database viene
utilizzato da un programma Vb , che usa un controllo OLE di classe
paint.picture per visualizzare l'immagine.
Ora devo sempre da vb cercare di automatizzare la procedura di inserimento
dell'immagine BMP,
che trovo in una cartella e sono già pronte ad essere inserite.
Ho provato con
rs!immg=loadpicture("c:\immagine\img1.bmp") ma poi il programma non la
visualizza.
Naturalmente non  vorrei utilizzare un controllo OLE.
Spero di essere stato chiaro
Grazie
Carlo Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Ruotare un'immagine

Ciao a tutti, qualcuno sa dirmi come poter ruotare un'immagine all'interno
di una picture?
Ho trovato molti esempi qua e la su tanti siti, ma nessuno che supportasse
immagini grandi (1280 o 1024 pixel) che è quello che servirebbe a me.
Grazie

 wrote in message
news:9mdcop$1e7$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come cancellare una directory

Come da subject....
Grazie.
Ciao,
Lucky
e-mail: 
pi...@iranet.it
--------------------------------------------------
Nuova coppia al conservatorio:
Lei suona il flauto...
Lui la tromba!
--------------------------------------------------

...


Usa il metodo Kill
Ciao Marco
Newsgroup: it.comp.lang.visual-basic
Titolo: Compressione dei files

Come si fanno a comprimere i files con nomi lunghi?
Il Compress.exe (per Dos) tronca i file dopo gli otto caratteri iniziali,
mentre la libreria LZ32.DLL a quanto ne so serve solo a decomprimere i file.
Basterebbe rinominare il file troncato con il nome intero, ma vado cercando
qualcosa di più immediato e professionale. Il setup Wizard di VB come fa a
proposito?
Grazie.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] il file MSVCIRT.DLL è collegato all'esportazione mancante ...

Ciao a tutti
Dopo aver installato alcuni programma (scritti in VB e non proprio recenti)
e riavviato il PC ad ogni avvio del PC mi appare il seguente errore:
Il file MSVCIRT.DLL è collegato all'esportazione mancante
MSVCRT.DLL:??_U@YAPAXI@Z.
Dando OK sembra funzionare tutto ma sicuramente non mi va più FrontPage2000
(mi da l'errore segnalato sopra e non parte) e VisualInterdev (parte ma
quando apro un progetto mi dice che non è installato correttamente sul PC e
si chiude)
Ho VisualStudio 6 Professional & SP5.
Ho provato a installare nuovamente SP5 ma al termine mi da un errore di
registrazione nel registro (fp.exe) e tutto rimane come prima.
Devo proprio reinstallare VisualStudio?
huvi

Devo proprio reinstallare VisualStudio?
Secondo me, si'.
Prima pero' ti conviene disintallarlo.
Per fare questo, leggiti il seguente articolo di msdn:
HOWTO: Prepare for and Perform a Clean Installation of Visual Studio 6.0 
Q248347
-- 
hth, hal

Secondo me, si'.
Cerco di resistere fino al prossimo Weekend (se non si verificano ulteriori
problemi più gravi) perchè avevo da tempo già intenzione di cambiare S.O.
(da Win98-Winndows2000 Professional e 2. HD Linux). Almeno ho una
motivazione in più.
Grazie
huvi

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda stupida sui DB

Ciao, scusate l'ignoranza, quando creo un programma VB, ad es. una rubrica
che salva i dati nel record di un DB creato con access, e lo distribuisco,
chi lo usa deve avere installato access e/o delle librerie VB ?
GRAZIE
Ciao
Massimo
new...@tiscalinet.it

 wrote in message
87na03$t23$1...@lacerta.tiscalinet.it...

Non è necessario installare Access. Devi però installare dei componenti
distribuiti con Visual Basic. Il numero ed il nome dei componenti dipende
dall'applicazione che hai creato. Il wizard per gestire le installazioni VB
genera automaticamente per te un setup con tutt i file che devi distribuire
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Variabili numeriche ed operazioni

Se io ho questa funzione...
Function Somma(Numero, Numero2)
Numero = Text1.Text
Numero2 = Text2.Text
Text3.Text = Numero + Numero2
End Function
Come posso modificarla per far si che i valori delle variabili Numero e
Numero2 non vengano concatenati ma siano sommati?
grazie
carlito
:)

 ha scritto nel messaggio
news:8v17fl$3do$1...@serv1.iunet.it...

Dai uno sguardo alla funzione VAL, o Cint, Clong ecc. ecc. e' tutto li'....
;o)
Ciao
Ven

Caro Carlito,
prova cosě:
Function Somma(Numero as Double, Numero2 as Double)
    Numero = val("0" & Text1.Text)
    Numero2 = val("0" & Text2.Text)
    Text3.Text = Format$(Numero + Numero2, "#,0.00")
End Function
Se non vuoi i decimali, togli ".00", mentre se non vuoi lo zero usa solo "#"
Ciao!
============================================
                      CYBER Hardware & Software
                         di Albani Ettore Massimo
                           Via Scapacchiň, 48/B
                 35030 Selvazzano Dentro (PD) - Italy
                         Tel./Fax: 
(+39) 049-638681
 
http://www.protec.it/cyber
                           E.mail: 
cy...@protec.it
============================================


Oops!
Scusa, avevo dimenticato che stai usando una Function, io la sostituirei con
una Sub:
Sub Somma(Numero as Double, Numero2 as Double)
    Numero = val("0" & Text1.Text)
    Numero2 = val("0" & Text2.Text)
    Text3.Text = Format$(Numero + Numero2, "#,0.00")
End Sub
============================================
                      CYBER Hardware & Software
                         di Albani Ettore Massimo
                           Via Scapacchiò, 48/B



puoi fare in questo modo
 Function Somma(Numero, Numero2)
 Numero = Text1.Text
 Numero2 = Text2.Text
 Text3.Text = cint(Numero) + cint(Numero2)        'indicando il tipo della
variabile nell'utilizzazione
 End Function
o in questo modo
 Function Somma(Numero as integer, Numero2 as integer)  'indicando il tipo
della variabile nella dichiarazione


Newsgroup: it.comp.lang.visual-basic
Titolo: Access 97 bug o non bug?

Io ho un recordset aperto e ci lavoro.
E fin qui tutto bene.
Vado a controllare le tabelle con Access 97.
E fin qui tutto bene.
Poi cerco di chiudere il suddetto RS.
E qui va tutto male perchè mi dice che l'operazione "non è possibile nel
contesto corrente".
Se NON controllo le tabelle con Access invece va tutto liscio.
Vi è mai capitato???

 wrote in message
news:8tm8g5$8p4$1...@nslave2.tin.it...

Come viene aperto il db ? ed il recordset ?
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: CANCELLAZIONE FILE

Salve a tutti, ho un problema su un mio applicativo.
In pratica vorrei che all'inizio del mese cioe' il giorno 1, il programma
che ho sviluppato con VB, appena scatti il giorno 1 si cancellino dei
file, che si creano durante il mese, in una cartella.
Come posso fare?
Attendo vostre notizie.
Grazie Federico
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:e66a6n$nm3$1...@news.newsland.it...


Metti il tuo programma nelle operazioni pianificate di windows....
Gian


 Gian
Metti un .bat con
del cartella\*.*
nelle operazioni pianificate.
Ciao 

SI MA NON MI FUNZIONA , MI SONO CREATO UN FILE CANCELLA.CMD
PERO' NON MI FUNZIONA
IL CODICE DEL FILE è QUESTO
@echo off
C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\del *.*
setlocal
APPENA LO AVVIO IL FILE, POI VADO NELLA CARTELLA FILEMESE E I FILES CI SON
ANCORA
COME POSSO FARE?


setlocal
  Uhm, non e' che forse sarebbe meglio qualcosa del tipo:
@echo off
cd C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\
del *.*
setlocal
  Tra l'altro non vorrei che tu avessi cancellato qualche fai da
un'altra parte...
-- 
  Ciao :-)
  Massimo
Nell'indirizzo, sostituire "micio" con "mc"

setlocal
  Anzi, ora che vedo meglio mancano le virgolette alla directory!
@echo off
cd "C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\"
del *.*
setlocal
  Se ci sono gli spazi nel nome questo non viene riconosciuto percio'
occhio!


ciao massimo ma non funge
il codice attuale è questo:
@echo off
cd "C:\Documents and Settings\FEDERICO\Desktop\1\"del *.*
setlocal
come mai? aiutami :(


no scusami massimo. funziona ma si apre il prompt di ms dos dove mi kiede
procedere con l'operazione S/n?
ma io non volgio quesyto
volgio che mi cancelli è basta
come posso fare?


 
Scusa ma guarda che ti hanno già risposto.
A me funziona:
cd "C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\"
del *.*

 come posso fare?
del *.* /Y
-- 
When I make a mistake, I'll repeat it serveral times so they'll think I did it on purpose. 
News 2002 [v 2.07] / StopDialer / PopDuster - 
http://www.socket2000.com
Akapulce portal: 
http://www.akapulce.net

 COME POSSO FARE?
E ci credo. In quella riga stai cercando di lanciare un presunto
comando "del" che si dovrebbe trovare in quella cartella,
passandogli *.* come parametro. Ovviamente "del" lì non c'è :-).
Questa dovrebbe funzionare:
del "C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\*.*"
Bye, G. 

 del *.* /Y
NON FUNZIONA DUE DI PICCHE MI ESCCE SEMPRE LA DOMANDA?


 NON FUNZIONA DUE DI PICCHE MI ESCCE SEMPRE LA DOMANDA?
Non URLARE, ti ho detto !
Se non vuoi dover dare conferma, il parametro giusto è /Q, da Quiet.
DEL /Q "C:\Documents and Settings\FEDERICO\Desktop\FILEMESE\*.*"
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: da twip a pixel

come posso fare per sapere quanti pixel č un twip?
mi spiego meglio in una mia applicazione per saper l'altezza di una riga in
un richtextbox faccio cosě
label1.font=ri.font
label1.fonsize=ri.selfontsize
 e mi prendo l'altezza della label
tuttavia trovo questa soluzione poco elegante e vorrei fare una funzione di
questo tipo
pixel(twip as currency) as currency
Grazie

 pixel(twip as currency) as currency
Puoi usare i valori sopra indicati o il metodo del contenitore:
ScaleX(Misura, vbTwips, vbPixels)
ScaleY(Misura, vbTwips, vbPixels)
Ciao
------------
Questa è una risposta ritenuta inutile e maleducata da alcuni partecipanti.
(Campagna contro l'abuso del NewaGroup)

 ha scritto nel messaggio
news:acg2rk$il0$1...@fe2.cs.interbusiness.it...

Hmmm... sorvolando sul fatto che le dimensioni del font non sono espresse in
pixels ma in points, puoi ottenere quello che chiedi partendo dalle property
Screen.TwipsPerPixelX
Screen.TwipsPerPixelY
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Grazie a tutti.

 (Campagna contro l'abuso del NewaGroup)
I miei complimenti per la soluzione diplomatica e salomonica all'annoso
problema del "come glielo dico che avrebbe dovuto premere F1 e cercare
'Pixel' "?. :-)
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT[ VXD

Chi mi sa dire chi carica i vxd?
Grazie

...



Il sistema operativo (a livello di kernel, suppongo).
--
Roal Zanazzi
z...@iol.it

...


Forse mi sono espresso male io.
Intendevo: Doce sono indicati i vxd che il SO deve caricare?
Grazie

 Che siano nel registry?
No, cioč... non proprio...
nel registry sono mantenuti i componenti hardware installati, all'avvio
Win9x esegue una scansione per controllare che i dispositivi siano ancora
presenti, e nel caso carica i .VXD relativi... non esiste quindi una chiave
con la lista dei .VXD da caricare... č tutto fatto dinamicamente
controllando lo stato degli enumeratori hardware.
Spero di aver sintetizzato e semplificato abbastanza da poter essere chiaro.
Ovvio che l'argomento richiederebbe maggior approfondimenti per essere
capiti. Se volete dovreste trovare qualcosa sul Windows 9x Resource Kit,
incluso sia nel CD di Win95 che in quello di Win98 (in entrambe le versioni
č in inglese).
Buona ricerca!
Zeross
Newsgroup: it.comp.lang.visual-basic
Titolo: Lingue diverse...

Ciao a tutti,
io vorrei un consiglio da parte vostra. Devo realizzare un programma (in
VB6) in cui č possibile scegliere la lingua (italiano, francese, inglese,
tedesco e spagnolo). Ovviamente in funzione della lingua scelta devono
cambiare anche tutte le label, i caption dei vari oggetti, i msgbox....
Secondo voi qual'č la strada piů comoda e facile da perseguire anche in
funzione dell'aggiunta di nuove lingue o della modifica di certe frasi giŕ
esistenti?
Grazie per i vostri suggerimenti.
Marco Rampon
PS: complimenti a tutto il NG e a tutti i partecipanti sempre disposti ad
aiutare o ad ascoltare chi ne ha bisogno!!!

 funzione dell'aggiunta di nuove lingue o della modifica di certe frasi già



Beh, ci sono vari sistemi: il piu' semplice, come ti hanno gia' risposto, e'
di usare la tabella.
Io ho acquistato un ocx chiamato Multilizer, ed ho usato quello. Funziona
molto bene, e tutte le stringhe nelle caption le cambia da solo...
Bye by Massimo 8-]

Io ho fatto cosě:
una tabella con 3 campi:
codicelingua integer
codiceoggetto integer
testo text
codicelingua: 0=ita, 1=ing, 2=spagn ecc
ad ogni oggetto nella caption metto un NUMERO che corrisponde alla frase
scelta la lingua, nel form_load
    for each x in form.objects do ....
        select testo from tabellatrad where codicelingua= LINGUA and
codiceoggetto=X.CAPTION
    il .caption nel caso dei textbox deve essere un .text...
funziona con un numero illimitato di lingue et di oggetti.
traducilo da Italianese a Basichese e sei a posto
buondě.


La più 'professionale' è usare un file di risorse, se cerchi nei post
passati, se ne parla oppure nell'Help in Linea alla voce File di risorse.
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: Informazioni funzionamento Script Control

Il mio problema e' il seguente:
Sto utilizzando lo ScriptControl in un programma VB5, lo scopo e' quello di
creare una funzione, che ritorni un valore relativo ad un calcolo
particolare, modificabile dall'utente.
Il problema e' che oltre al numero ritornato dalla funzione, quest'ultima mi
dovrebbe generare anche una stringa, che contiene la descrizione del tipo di
calcolo effettuato.
 Ho quindi pensato di passare alla mia funzione un parametro (di tipo
stringa), che modifico al suo interno, per poi utilizzarla dopo la chiamata
alla suddetta funzione. Ma a quanto pare con lo scriptcontrol il concetto di
passaggio di parametri per riferimento non funziona.
Di seguito una piccola semplificazione di quello che scrivo:
Private    Sub    CmdCalcola_Click()
    Dim Descrizione As String
    Descrizione = ""
    ValoreRitornato = ScriptControl.Run("NomeFunzione", Descrizione)
    MsgBox "Risultato: " & Descrizione
End Sub
Dove NomeFunzione e' logicamente il nome della mia funzione in vbScript,
mentre Descrizione e' una stringa
Mentre il mio script e' il seguente
Function    NomeFunzione(appDescrizione)
    appDescrizione = "Moltiplicazione"
    NomeFunzione = 100 * 2
End Function
Dopo la chiamata della funzione mi aspetterei, che la variabile Descrizione
fosse uguale a "Moltiplicazione" invece e' "". Perche ?
Logicamente il codice qui sopra e' solo per avere un'idea piu' chiara di
quello di cui sto' parlando, il vero programma e' molto piu' complesso.
Ringrazio tutti coloro che mi dedicheranno un po del loro tempo, Grazie.


A me questo codice funziona benissimo...

...


Newsgroup: it.comp.lang.visual-basic
Titolo: consigli vb e database

salve
quando conviene utilizzare vb per creare un database completo o un
interfaccia che si colleghi ad una database esterno al posto di utilizzare
ad esempio access o altro?
scusate la domanda banale ma essendo agli inizi.....
grazie

 io consiglio di utilizzare questo strumento solo in caso di progettazione
dbase sql server.
buon lavoro


Conviene usare Access in accoppiata a VB quando devi realizzare piccole
applicazioni per un paio di postazioni di lavoro, altrimenti devi cambiare
base dati e passare a MSDE, SQL Server, MySQL ... vedi tu, ce ne sono a
bizzeffe di DB!
Ciao, Vincenzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio fra vari fogli in excel

Devo fare una macro che partendo da un'elenco di dati mi vada a
scrivere su alcuni fogli (sono 4) a seconda di alcuni valori indicati
in ogni riga.
Per far ciò ho bisogno di selezionare il relativo foglio passando il
nome dello stesso tramite variabile.
Non voglio usare i contatori dei fogli (es sheet(2)) perchè se mi
spostano l'ordine va tutto in casino.
Pensavo di associare a delle costanti i nomi dei fogli per poi
richiamarli ad 1 a 1 tramite un for.
Es
f1="sheet1"
f2="sheet2"
f3="sheet3"
f4="sheet4"
for f=1 to 4
   foglio= "f" & f
   sheets(foglio).cells(3,3)="123"
next
ma mi da "subscript out of range"
Come posso fare?
Grazie
Ciao

 next
eseguendo il tuo codice, la variabile foglio vale
f1
f2
f3
f4
e non
foglio1
foglio2
foglio3
foglio4
forse puoi risolvere con
dim pagina(1 to 4) as string
 pagina(1)="sheet1"
 pagina(2)="sheet2"
 pagina(3)="sheet3"
 pagina(4)="sheet4"
 for f=1 to 4
    sheets(Pagina(f)).cells(3,3)="123"
 next
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Diritti di autore

Salve a tutti, sto cercando un facsimile di contratto relativo ai diritti
di autore del software.
Sino ad oggi ho trovato soltanto un contratto per i diritti di autore dei
libri, ma e' troppo diverso 
come struttura per poterlo adattare anche al software.
Vanno bene anche eventuali suggerimenti su siti od organizzazioni in rete e
non.
Grazie, alla prossima !
-- 
se...@isa.it

Purtroppo lo stesso problema si e' presentato a me , quando ho dovuto
pubblicare MEDIALIBER , scritta in VB3.
L'unico modo (era il '95) per tutelarmi era stato quello di depositare il
sorgente su CDROM in SIAE , stampare tutto il programma , sia il codice che
i form e depositarli firmati.
Poi a seconda del linguaggio che usi , devi comportarti di conseguenza, nel
senso che per esempio Microsoft chiede agli sviluppatori di VB di menzionare
il prodotto (VB) nel tuo programma.
MAU ha scritto nel messaggio <01bd722c$1f6b5fe0$a186f3c2@selv>...


 
Gentile amico,
forse io posso esserti d'aiuto, perché mi trovo nella situazione di aver
fatto diversi programmi e devo studiare bene cosa dice la legge. Se puoi
essere più preciso su quello che ti serve posso cercare un po' di
materiale.
Ciao
Luca

di autore del software.
prova a postare questo invito su "it.diritto", di sicuro avrai molte
risposte.
ciao
Aldus

non.
mi risulta che, dato che il software e' equiparato alle opere letterarie il
diritto esclusivo di sfruttamento e' automatico nel momento stesso in cui l'
opera e' stata creata, e dura tutta la vita dell'  autore e fino a 40 anni dopo
la morte.
La registrazione alla SIAE e' alquanto onerosa e non molto utile, serve ad
aumentare le sanzioni a chi copia.
E'  importante, invece che sull' opera da proteggere siano indicati il nome
dell' autore e l' anno di produzione.
---------------------------------------------------------------------
remove ".blig" by my address to contact me
Newsgroup: it.comp.lang.visual-basic
Titolo: Terminare una DLL

E' possibile terminare una DLL ActiveX allo stesso modo in cui si
termina un programma con l'istruzione 'End'?
Grazie a chiunque volesse rispondere.
Giulio
Sent via Deja.com 
http://www.deja.com/
Before you buy.

End non viene accettata nelle ActiveX Dll, l'unico mode che hai per
terminarla č distruggere tutti i riferimenti che la tengono caricata.
Ciao!
C

 terminarla č distruggere tutti i riferimenti che la tengono caricata.
Direi anche per evidenti motivi: La DLL e' un componente in-process, se tu
la termini in teoria termini anche il processo chiamante, cosa che pero' non
puo' succedere dato che la DLL non ha il diritto di terminare il processo
chiamante, perlomeno da un punto di vista logico (la DLL ActiveX fornisce
servizi tramite un'interfaccia, questa interfaccia e' attivata e disattivata
dal chiamante e non ha accesso alle proprieta' del chiamante)... Non so se
windozz consenta la chiusura del processo dalla DLL...
Cmq sia, da dentro la DLL dovresti poter disattivare l'oggetto, anche se in
realta' unload e set nothing non funzionano, pero' probabilmente tra le api
del com c'e' una funzione che ti consente di chiudere il riferimento
all'oggetto corrente.
Perlomeno, quando sei in debugging da VB su due progetti diversi e ne chiudi
uno che sta runnando come DLL, lui ti disconnette, quindi dovresti poterti
disconnettere da solo.
Prova a guardare le api che iniziano con Co...
Ciao,
Alessandro

Newsgroup: it.comp.lang.visual-basic
Titolo: dove è questo file

Vorrei sapere se esiste la possibilità di metere in una variabile il PATH in
qui si trova un determinato file
es.
Dim Mia_Dir As String
Dim Mio_File As String
Mio_File = "Pippo.txt"
??????????
??????????
??????????

 Mio_File = "Pippo.txt"
certo:
Mia_Dir="c:\pippo\pluto\paperino"
...
:-P
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: crystal report

Ho un piccolo problema con crystal report:
il mio programma prepara una select da mandare in stampa... la prima
volta apre il report senza problemi dopodiche se provo a lanciare altre
stampe (anche report diversi) va in errore
errori:
METHOD 'ACTION' OF OBJECT 'CRYSTALCTRL' FAILED 
o METHOD 'REPORTFILENAME' OF OBJECT 'CRYSTALCTRL' FAILED in debug
AUTOMATION ERROR se lancio l'eseguibile
ho pensato che qualcosa rimanga appeso ma non so cosa...
tra l'altro se chiudo l'eseguibile e lo rilancio va bene (la prima
volta) mentre in debug devo per forza riavviare la macchina
es. codice
msg3="select * from ..."
rsGenerico.Open msg3, DBINUSELOCAL, adOpenStatic, adLockOptimistic
' Report notifiche
fMainForm.CrystalReport1.ReportFileName = inst_dir & "\rptNotifiche.rpt"
fMainForm.CrystalReport1.WindowTitle = "Stampa Notifiche"
fMainForm.CrystalReport1.WindowParentHandle = ChildReport("Notifiche - "
& ldafiera.Caption & ", " & ldaperiodo.Caption)
fMainForm.CrystalReport1.SetTablePrivateData 0, 3, rsGenerico
fMainForm.CrystalReport1.Action = 1
rsGenerico.Close
DoEvents
grazie in anticipo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG




Newsgroup: it.comp.lang.visual-basic
Titolo: Vorrei creare una barra tipo quella di avvio...

Salve gente,
oggi mi sono imbattutto in un problemino che non riesco bene neanche  a
definire in italiano e che quindi mi stà dando del filo da torcere su san
Google :-)
La mia richiesta è semplice...vorrei creare una barra simi le a quella di
avvio che abbia i seguenti requisiti:
- Si vada a posizionare su di un lato dello schermo (e questa non dovrebbe
essere una cosa difficile...considerando che la sua grandezza è anche
definita)
- quando aprò un altra finestra rimanga in primo piano (e anche fino qui
saprei come fare...tramite le api per far stare il form in primo piano)
- se apro un applicazione a schermo intero questa non copra la mia barra
Praticamente mi serve una barra del tutto simile alla barra di avvio...
avete suggerimenti o link utili ?!?!?!?ù
Grazie ...e scusate la sconessione della mia richiesta
ma la fame stà prendendo il sopravvento ;-)
Grazie Giuseppe


con una decina di API dovresti cavartela, tra cui sicuramente la
SystemParametersInfo x SPI_SETWORKAREA
ma la ricerca e' lunga... a te la palla!


...non meno importante:
il **subclassing** del form per intercettare il movimento
della finestra e modificarlo opportunamente

 avete suggerimenti o link utili ?!?!?!?ù
Credo si debba usare l'API SHAppBarMessage.
Questo progetto di esempio dovrebbe facilitarti il compito:
http://www.vbaccelerator.com/codelib/submit/appbar14.zip
Bye
Raf

 della finestra e modificarlo opportunamente
Temevo che fosse la via piu facile non fosse poi cosi facile ;-)
Grazie Peppe

 Raf
E' un ottimo esempio, ti ringrazio molto....ora dovrò solo studiarmi come
funge ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi Client/Server in locale...

che macello ...
Aiutatemi un secondo vi prego..:)
allora lato client io mando una stringa al server "GETDB"
il server quando riceve GetDB , esegue un loop dove va a leggere da una
tabella dei campi
per ogni campo letto, manda al client una stringa di questo genere
"LetDB:nome:cognome:numero".
Ma ho una cifra di problemi, a volte la stringa arriva, altre volte No,
a volte arriva frammentata altre volte due o piu campi insieme ...
Sapete nulla a proposito ?
Sapendo che sto lavorando in locale . of course... :((
Disperatissimo..


.....sarebbe troppo cattivo dire un altra volta: chiedi a Wally!
Cercherò di essere più costruttivo!
Presumo che tu sia ancora su quel progetto col winsock vero?
OK....
sei collegato ad una porta tcp...non importa che tu sia in localeo in
rete....cambia solo che instrada per 127.0.0.1...ma il principio funziona
uguale...basta che lanci una istanza del server e più istanze del client....
Per essere fiscali....lancia l'EXE il compilato...non lanciare da IDE!
Quindi hai il tuo serverino....hai una porta per l'ascolto e una per la
risposta? no? va beh!
Allora il client chiede qualcosa....
bene il server che è in ascolto vede arrivare una richiesta....
Primo problema a cui far attenzione...se arrivano 2 richieste?...hai
previsto che più client possono chiedere più cose?
Devi prevedere che ogni "sessione" abbia vita a se....
Secondo problema...sarebbe utile che il server rispondesse (ecco perchè
secondo me son giuste 2 porte è più logicamente capibile...ma va bene anche
con una!) "HO CAPITO UTENTE 1"
e che il client ritenti l'invio finchè non arriva il messaggio di OK (o dopo
un certo num di tentativi....segnalo che "il server è sovraccarico")
Quindi torniamo a noi....il server ha capito che vuoi dei dati.....ma ci
sono?
ossia se mi chiedi un record vuoto che ti rispondo?
oppure un record caricato con alcuni campi si e altri no?...che ti rispondo?
Anche qui ...poniamo che i dati ci siano.....invia una stringa...sarebbe
utile che il server prima di dare altra roba in pasto a QUEL client aspetti
una conferma di ricezione dati!...nel frattempo può soddisfare altri client
no?
Può darsi che il tuo server invii troppi dati al client ...o invii davvero
campi vuoti...ripensa a quello che ti ho detto!
Bye amico di wally!
8-)
--
%%============================%%
Il Wodkino Nazionale è raggiungibile anche a :
www.martek.it
Ed ha pure il forum...
http://www.martek.it/go.asp?PortamiA=1

 ha scritto nel messaggio
news:xud_9.105441$0v.30...@news1.tin.it...


la tua email corretta inizia con Marco@ ,  vero ?

Forse non lo leggerai mai, ma intendo ringraziarti pubblicamente :)
Mi hai salvato un lavoro :)
Grazie Vodka :D
e...si....scrivo proprio da cani :)

 ha scritto nel messaggio
news:4Xx_9.68914$ZE.18...@twister2.libero.it...

...Ma non era mica gratis!!!!!
dove spedisco la fattura?!

Newsgroup: it.comp.lang.visual-basic
Titolo: ADDNEW


Dai un'occhiata alla proprietà ALLOW-ADDNEW(mi sembra che si chiami così)
del DATA.
Ciao By GIANNI

Una volta caricati i dati e partito un metodo Data1.Recordset.AddNew ,
perchč mi viene aggiunto al database senza che gli applichi il metodo
Update?
Vorrei utilizzare un bottone di "Annulla Inserimento".
Grazie a chi mi darŕ indicazioni
Stefano

 Stefano
Copiati questo codice nel form e fatti un pulsante con il Nome e la Caption
impostati su ogni elemento indicato qui sotto , un pulsante per ogni
elemento. (Name cmdAdd, Caption Aggiungi ecc.)
Posiziona Aggiungi + Aggiorna uno sopra l'altro e così pure Annulla +
Modifica.
Private Sub SetButtons(bVal As Boolean)
  cmdAdd.Visible = bVal                            'Aggiungi
  cmdEdit.Visible = bVal                            'Modifica
  cmdUpdate.Visible = Not bVal                'Aggiorna
  cmdCancel.Visible = Not bVal                 'Annulla
  cmdDelete.Visible = bVal                         'Elimina
  cmdRefresh.Visible = bVal                       'Rivisualizza
  cmdClose.Visible = bVal                          'Chiudi
End Sub
Gioca con i vari SetButtons True, SetButtons False, per l'evento Click di
ogni cmd (oltre a scriverne il codice, naturalmente! :))
Spero di esserti stata utile
--
Ciao a tutto il NewsGroup
Alex
alm...@tin.it

devi aggiungere un msgbox con pulsante si e no dim risposta
risposta = msgbox("Savare record?",vbyesno)
if risposta =vbyes then
data1.recordset.uptaderecord
else
data1.recordset.uptadecontrols
end if
comunque "data1.recordset.uptadecontrols " fa si che il record non venga
salvato.Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Database Cartucce

Boungiorno a tutti .
Dato che dovro' scrivere un programma che gestisca le cartucce, volevo
sapere se e' disponibile un Database o simile ( txt, xls) contente le
codifiche, descrizioni, modelli di stampante etc, per le marche piu' note
( hp, canon, epson, ibm , lexmark etc)
Grazie in  anticipo
--
Friciu

 ( hp, canon, epson, ibm , lexmark etc)
Praticamente il 99% del lavoro già pronto?
Imho credo di no, ma san-google che ti ha detto?
_____________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

ciao
per curiosita' sono andato sul sito dell'hp e se cerchi bene ti puoi
scaricare tutti gli articoli di consumo tra qui le cartucce , in due formati
penso che gli altri siti facciano lo stesso prova a guardare
http://h40073.www4.hp.com/prodotti/listino/download/consumo_giugno04.pdf
ciao
ilario

Mi stavo per appisolare quando <ilario> salto' su dicendo:

Grazie.
Il problema comunque mi rimane per la compatibilita' della cartuccia, ovvero
su quali stampanti puo essere montata.
--
Friciu

             il 1277.1 (26/03/2233)
--
Friciu
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!

Chiedo scusa, se interrompo la vostra discussione ma ho un problemino.
Premetto che sono profano di Visual basic, ma vorrei stupire il mio
responsabile con un programmino per i nostri bisogni.
Vorrei fare un programmino grazie al quale inserendo un codice e premendo un
bottone si apre una finestra con una immagine jpg e due bottoni, uno per
chiudere ed uno che dia 2 righe di informazione.
VI PREGO AIUTATEMI E RICORDATEVI CHE PRATICAMENTE NON NE CAPISCO NIENTE.
P.s.: cena pagata!!!
DANIELE


NON postare lo stesso messaggio 10 volte!!!
L2K

Newsgroup: it.comp.lang.visual-basic
Titolo: Join e tabella di relazione molti a molti

Ciao.
Ho una relazione molti a molti con una tabella intermedia.
La tabella di relazione si chiama Pra_Int e mette in relazione gli ID della
tabella Pratica con  gli ID della tabella Tipo.
L'istruzione SELECT * FROM Int mi ritorna:
Id          Descr
----------- -------------------------------------------------- 
1           Primo Int.
2           Secondo Int.
3           Terzo
4           Quarto
5           Quinto
L'istruzione SELECT * FROM Pra_Int mi ritorna:
IdTipoPra   IdTipoInt
----------- ----------- 
1           1
1           2
1           4
2           2
2           3
2           5
3           NULL
L'ultima riga significa che al tipo di pratica 3 ci sono associate TUTTI i
record di Int.
Se scrivo
SELECT Descr FROM Int LEFT JOIN Pra_Int ON Int.Id=Pra_Int.IdTipoInt  WHERE
Pra_Int.IdTipoPra=1
ottengo:
descr
-------------------------------------------------- 
Primo Int.
Secondo Int.
Quarto
che sono tutte le descrizioni associate al Tipo di pratica con ID=1
Come posso ottenere tutte le descrizioni associate al tipo di pratica con
Id=3?
Ciao e grazie
-- 
Skysurfer

[Skysurfer = 
circa_sk...@libero.it
 in c6ioo0$ipn$
1...@serv1.iunet.it
] ha
scritto:

Visto che non usi Access (giusto?) sarà forse da adattare:
Select Descr
 From Int Left Join Pra_Int
 On Int.ID=Pra_Int.IDTipoPra
 Where Pra_Int.IDTipoPra in (select distinct IDTipoPra from Pra_Int where
isnull(idtipoint))

 where isnull(idtipoint))
Grazie per la risposta.
Non uso Access ed ho provato ad adattare la tua Select (solo cambiando
isnull con IS NULL)
ma il risultato è questo:
Descr
-------------------------------------------------- 
Terzo
Cioè mi restituisce il record della tabtella Int che ha ID=3
Quello che io voglio ottenere invece è che se il tipo di pratica non ha
nessun Tipo di intervento associato, mi vengano restituiti tutti i tipi di
intervento.
Il record in Pra_Int con i campi 3 e Null l'ho inserito io per indicare che
al tipo di pratica con Id=3 sono associati tutti i tipi di intervento, ma
potrebbe anche non esserci.
L'importante è che quando non ci sono tipi di intervento associati alla
pratica, la select mi restituisca TUTTI i tipi di intervento, mentre se
esistono dei tipi di intervento associati alla pratica vengano restituiti
solo quelli.
Grazie, ciao.
-- 
Skysurfer

 vengano restituiti solo quelli.
E perchè non chiedere anche il numero dei figli di ogni titolare di pratica?
Lupo.che.per.fortuna.le.macchine.ancora.non.pensano
Newsgroup: it.comp.lang.visual-basic
Titolo: Shutdown con Win XP

Sia con VB6 che con 
VB.NET
 non riesco a fare lo shutdown di WIN XP (ho
provato solo con la ver. Home, ma credo che non funzioni nemmeno con la
Pro).
In VB6 uso l'API ExitWindowsEx che in Windows 98 funzionava tranquillamente.
Qualcuno sa aiutarmi?
Grazie

 ha scritto

http://groups.google.com/groups?hl=it&lr=&threadm=213Z140Z5Z29Y1013521441X55
5%
40usenet.iol.it
&rnum=2&prev=/groups%3Fas_q%3Dshutdown%25202000%26as_ugroup
%3Dit.comp.lang.visual-basic%26lr%3D%26num%3D50%26hl%3Dit
e in genere
http://groups.google.com/groups?as_q=shutdown%202000&as_ugroup=it.comp.lang
.
visual-basic&lr=&num=50&hl=it
hth, j.

Per usare "ExitWindowsEx" su Win XP prima bisognerebbe usare l'altra API
"AdjustTokenPrivileges" per attivare il privilegio SE_SHUTDOWN_NAME.
Io ancora ci stň lavorando, cmq puoi bypassare tutto usando semplicemente il
file shutdown.exe nella directory %windir%\system32.
Uso:
"shutdown -r" per riavviare il computer
"shutdown -s" per spegnere il pc
 "shutdown -f" per forzare la chiusura delle applicazioni attive con un
conseguente log out senza preavviso .
Ciao
Duke
http://www.catenaia.cjb.net


Grazie mille.
Mi ero impegnato ma comunque non riuscivo a fare il power off.
Ciao

Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: MSCOMM fa male! Si fa proprio tanto male!

Un saluto a tutti,
sto invecchiando precocemente tentando di utilizzare l'OCX MSCOMM.
A I U T O ! ! !
Quarcuno "de noiantri" c'ha già dato via la capoccia?
Cò chì posso sfogamme e mailà de sto ca...io de gestore de porte seriali??
Come se pò fà a riceve un carattere sortanto??  E come se fà pe aspettà che
arriva??
N'do trovo un p'ò d'esempi de come usallo??
Fusse ca fusse che c'è stà n'OCX mejio de quello de Bill??
Mò che ho lanciato er messaggio d'aiuto me sento già mejo.
Scusate lo sfogo... ma quanno ce vò, ce vò!!
Un grazie anticipato a tutti coloro che mi risponderanno.
Ciao
Leo

 
[CLIP]
Ma come parli?
Allorta, setta queste proprieta' come ti dico:
	MSComm1.Rthreshold  = 1
	MSComm1.Settings  = "9600,n,8,1"	' questo come pare a te
	MSComm1.CommPort = 1 		' COM1 o come pare a te
	MSComm1.NullDiscard  = False
Ogni volta che ricevi un carattere, viene richiamato l'evento
MSComm1_OnComm().
In MSComm1.Input ti ritrovi i caratteri ricevuti. Lo puoi leggere una sola
volta (almeno VB3 era cosi') e anche se hai impostato
MSComm1.Rthreshold =1 spesso ti richiama che nel buffer c'e' piu' di un
carattere.
Per esperienza personale, non c'e' da fidarsi dell'evento MSComm1_OnComm(),
capita che non viene scatenato!
Per questo io metto sempre un timer, impostato a 200ms che mi richiama
(appunto ogni 200ms) la funzione/evento MSComm1_OnComm(). Questo evento
gestiscilo cosi':
dim BufferSeriale$
Private Sub MSComm1_OnComm()
	dim Caratteri$
	Caratteri$ = MSComm1.input
	if len(MSComm1) = 0 then exit sub
	BufferSeriale$=BufferSeriale$ & Caratteri$
	if len(BufferSeriale$)>32000 then
BufferSeriale$=right$(BufferSeriale$,32000)
	' e qui analizzi il buffer BufferSeriale$ per vedere se riconosci un
messaggio valido, e lo estrai dal buffer stesso.
	....
	......
	.....
End Sub
Private Sub Timer1_Timer()
	' ogni 200ms
	call MSComm1_OnComm
End Sub
Questo e' un modo semplice e perfettamente funzionale per gestire la
seriale in ricezione.
Per trasmettere, basta che fai MSComm1.Output="Questa la trasmetto".
Saluti,
-- 
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

Grazie Ettore,
proverň i tuoi suggerimenti.
Saluti
Leo
Ettore Maronese ha scritto nel messaggio
<01bdf952$5781c9c0$LocalHost@p266>...

Newsgroup: it.comp.lang.visual-basic
Titolo: de-registrare l'impossibile (ovvero un Activex EXE)

poniamo che io scriva un EXE Activex.
Essendo un exe, lo posso anche copiare su un altro computer, senza creare un
kit (chiaramente pongo di avere le necessarie dll già presenti).
Essendo un exe, per registrarlo basta ESEGUIRLO. (regsrv32 non serve)
ora la questione è: come lo DE-REGISTRO????
regsrv32 non funziona: serve solo per le dll.
Spiego nel dettaglio: ho sviluppato l'activex exe in una certa dir.
lanciandola mi trovo il componente registrato. Poi ho cancellato la dir, ma
il componente RIMANE registrato.
L'ho eseguito in un'altra dir e... patatrac! si ri-registra e me ne trovo 2!
il fatto è che la createobject ora fa casino....
Grazie.

 Grazie.
Prego, Caio!
Mattia

 Mattia
GRAZIE.

Newsgroup: it.comp.lang.visual-basic
Titolo: OCX cosa sono?

Vorrei sapere cosa in realtà sia un OCX, che cosa vuol dire registrarlo, se
è possibile distribuirlo(ad esempio se faccio un programma che usa
msflexgrid.ocx posso distribuirlo tranquillamente?) ecc.. ecc...
Gradisco anche un link a qualche sito che me lo spieghi...
Ciao a tutti e grazie anticipatamente per le risposte.

vai su 
http://www.lunet.it/offerte/berti/active/activex.html
troverai tutte le informazioni.
ciao
carlo
***************************************************
BERTI CARLO ************************************
Visual Basic & HTML *******************************
Http://www.lunet.it/offerte/berti
 ***********************
********************************************************

Newsgroup: it.comp.lang.visual-basic
Titolo: Ping di un computer in rete

Ciao a tutti,
esiste una funzione che mi consenta di verificare se un computer e'
presente nella rete in cui sono connesso?
Grazie Ciao
biXso
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

probabilmente trovi in giro degli ActiveX che fanno al caso tuo......
ne avevo usato uno un annetto fa per fare il ping, solo che non lo usavo da
VB ma da una pagina ASP......
ma dovrebbe essere la stessa cosa.....
purtroppo non so dirti il nome del componente, è passato troppo tempo!!!!
ciao, e good coding!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262