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

Ho la necessità di proteggere (tramite codice)  con password un foglio excel
,ho cercato un pò in giro ma non riesco a capire come fare.
Qualcuno mi dà una dritta?
Ciao

 wrote in message
news:xh23a.239640$AA2.9...@news2.tin.it...

Cosa intendi per "tramite codice" ?
Non ti basta quello che già ha l'Excel ?
Ciao.
--
Massimo Bonechi
-----------------------------------
Nuovo Newsgroup al server : 
news.startit.it

Esiste il membro PROTECT per la classe Workbook.
Dai un occhio alla guda e al visualizzatore di oggetti dell'edito visual
basic di excel!!
Ciao MatteoC.
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare una stringa

Qualcuno mi sa indicare come posso stampare una parte di una stringa
indicando la lunghezza in mm ?
Esempio
printer.print mid$(a,1,30)
anzichč 30 caratteri  20 mm.

 indicando la lunghezza in mm ?
Potresti stamparla (sempre mediante il metodo Print) col font adeguato in
una PictureBox  pre-dimensionata a 30 mm di larghezza, e poi utilizzare il
metodo PaintPicture dell'oggetto Printer.
O, ancora meglio, stampi la tua stringa in una PictureBox e poi usando il
metodo PaintPicture passi di volta in volta le coordinate dell'area
stampabile (in modo da stampare di 30mm in 30mm).
hth,
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

 printer.print mid$(a,1,30)
Dovresti
- calcolarti quanti pixel per mm ci stanno sulla stampante:
' Questo è facile
px = Printer.ScaleX(1, vbMillimeters, vbPixels)
- Poi si scrive con la DrawTextEx dando in pasto un rettangolo con altezza =
Printer.TextHeight("A") (convertito in pixel: vedi Printer.ScaleX) e
lunghezza = px
Sono stato abbastanza criptico? :)
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
"

 ha scritto nel messaggio
news:gsyA9.5988$744.1...@news1.tin.it...


 Mi puoi spiegare merglio DrawTextEx?
DrawTextEx e' una funzione API. Sono funzioni che non fanno parte di visual
basic ma che si trovano in delle librerie apposite (ad es., come quella in
questione, in una libreria del sistema operativo).
La dichiarazione delle API in VB e' argomento trito e ri-trito, il consiglio
che ti posso dare io e' di visitare il sito 
www.allapi.net
 e scaricare
l'ottimo "API-Guide", un software che contiene un compendio di gran parte
delle API di Windows, corredate di definizione, uso, e validi esempi.

Newsgroup: it.comp.lang.visual-basic
Titolo: Come posso controllare la pwd di logon in W2000

Buongiorno a tutti, la domanda è molto semplice io vorrei utilizzare il nome
utente e la pwd di W2000 per accedere ad un mio pgm. Ora il nome utente l'ho
recuperato ma non riesco a trovare una dichiarazione API per controllare la
pwd. Perfavore qualcuno mi dia delle indicazioni, ho già scaricato dal sito
www.allapi.net
 una guida alle API ma non mi sembra che ci sia nulla che
faccia al caso mio.Cmq continuo a cercare metre aspetto che qualcuno mi dia
un'aiuto. Grazie a TUTTI. ANDREA

utente e la pwd di W2000 per accedere ad un mio pgm. 
eccetera eccetera eccetera ...
1. Guarda se ti va bene la risposta che ho accodato al thread precedente;
2. _Non_ e' per niente gradito ed e' contrario alle regole del manifesto di questo
newsgroup che venga pubblicato lo stesso quesito nel giro di poche ore
(nel tuo caso: 11:58 e 14:31).
Onde evitare discussioni, ti prego di dare un' occhiata al suddetto manifesto,
che viene pubblicato settimanalmente sul newsgroup ed e' sempre raggiungibile
sul sito comune 
http://it-lang-vb.net
.
ciao, hal

 >Buongiorno a tutti, la domanda è molto semplice io vorrei utilizzare il


 ha scritto nel messaggio
news:9op8ma$8tc$1...@lacerta.tiscalinet.it...


Quindi per il momento ti ringrazio.GRAZIE ANDREA
Non c'e' di che :-)
Facciamo eventuali follow up per approfondimenti o correzioni sul
thread originario.
Ciao e buon lavoro !
hal

possibile.........
controlla il vecchio thread, ti ho risposto io

Newsgroup: it.comp.lang.visual-basic
Titolo: Uscire da Windows

Salve a tutti, ho un problema, vorrei, se possibile, implementare in un
programma scritto in VB6, una routine che, chiuda il programma stesso ed
esca da windows 95 o 98.
Il pc lo accendo giornalmente ad una determinata ora con un  timer (tipo
orologio externo) , in esecuzione automatica metto il mio programma che
esegue uno scarico dati via modem, a quel punto dovrebbe chiudersi e
chiudere anche W95; il timer provvederà poi a spegnere il pc.
Tutto questo eviterebbe il giono dopo alla successiva riaccensione
l'intervento dello  scandisk.
Grazie a tutti.
gius...@sisteck.com

Secondo me c'è qualcosa sul sito comune.
Se non c'è fammi sapere che posto un esempio che ho fatto qualche tempo fa.

Ce ne sono 3 di esempi sul sito comune, cerca meglio...

Sicuramete avrai già risolto il problema ma ne approfitto per postare un po
di codice che magari puo tornare utile a qualcun'altro.
Questo serve solo a spegnere il computer (Non appare neanche la finestrella
di "Fine sessione di lavoro"):
Private Const EWX_SHUTDOWN As Long = 1
Private Declare Function ExitWindowsEx Lib "user32" _
                (ByVal dwOptions As Long, _
                ByVal dwReserved As Long) As Long
Public Sub ShutDown()
    Dim llResult As Long
    llResult = ExitWindowsEx(EWX_SHUTDOWN, 0&)
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Cartella programmi

Come posso trovare la cartella programmi di windows ?
Cambia in funzione della lingua e del sistema operativo.
Devo lanciare un' applicazione dal mio programma.
Grazie.



Dai un'occhiata 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
---------------------------------------------------------------------------

 wrote in message 999jam$pci$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: E mail con vb5

ho inserito delle procedure per il recupero degli errori nei programmi che
ho realizzato le quali indicano il tipo di errore non previsto, il nome
della procedura e del form dove quast'ultimo si è verificato, mi piacerebbe
inserire in tale procedura un comando che mi invii in automatico una E.mail
da parte dell'utente al quale ho dato il programma, contenente le
informazioni relative all'errore verificatosi.
A quanto ho capito ciò è possibile tramite il controllo MAPI, c'è qualcuno
che mi può dare informazioni in proposito?
Grazie mille


Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] Caricare immagini da DLL di risorse

Scusate se ripropongo il msg 
Ho un piccolo problema in quanto con la funzione "LoadString"
riesco a recuperare le stringhe di risorse da una DLL ma non riesco pero ad
ottenere il caricamento delle immagini in un controllo PictureBox (o Image)
con la funzione "LoadImage(hMod, ImgName, IMAGE_BITMAP, 0, 0,
LR_DEFAULTSIZE)" oppure "Loadbitmap(hMod, ImgName).
Uso forse la funzione sbagliata ??
Qualcuno ha qualche suggerimento in merito (se accompagnato da due righe di
codice funzionante sarebbe il massimo)
Grazie a tutti
-- 
Bye - Luys
mailto: 
lu...@telemar.it




Ciao
Hai provato con loadresstring, loadrespicture?
Queste sono le funzioni per caricare dati dai file di risorse...
consulta l'help in linea per maggiori informazioni..
Stò elaborando un prg che permette l'editing e la compilazione del file di
risorse dall'IDE di VB se sei interessato contattami.
Ciao Dany
--
Posted from 
dns.iqsnet.it
 [192.106.88.9]
via Mailgate.ORG Server - 
http://www.mailgate.org

Stņ elaborando un prg che permette l'editing e la compilazione del file di


 >Ciao Dany
 Si ma chi č il webmaster attuale?


via Mailgate.ORG Server - 
http://www.mailgate.org
Grazie del consiglio ma le funzioni da te indicate si riferiscono
all'utilizzo dei file .RES che poi vengono compilati nell'eseguibile
dell'applicazione mentre io devo recuperare tali immagini da una libreria
DLL di risorse che rimane esterna all'applicazione stessa in modo tale da
non aumentare le dimensioni dell'eseguibile.
Grazie a chiunque possa fornire delle indicazioni utili
---------------------------------
Luys
mailto: 
lu...@telemar.it
---------------------------------


Potresti dotare la dll di un oggetto pubblico che ha come metodi
Public Function loadpic(pictID As Long, tipo as integer) As IPictureDisp
loadpic = LoadResPicture(pictID,tipo)
End Function
Penso che questo faccia al caso tuo ...
Fammi sapere ciao Dany


 Si ma chi č il webmaster attuale?
L'attuale WM e' Federico Galli.
In qualsiasi caso, il WM (chiuque sia) e' reperibile a: 
it_la...@usa.net
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Il funerale di LUPO

Ciao a tutti.
Il funerale di Luigi č fissato per domani, martedě 12 ottobre alle ore 10,30
con partenza dalla chiesa di SAN MARTINO DEL LAGO in prov. di Cremona.
Chi puň e chi vuole puň partecipare.
Sarete i benvenuti.
ciao, maurizio.
PS.
Non so di preciso dove si trova S.Martino, quindi non vi sono di grande
aiuto.
So solo che dista circa 20/25 Km da Cremona.

 Non so di preciso dove si trova S.Martino
http://mappe.virgilio.it/tc/mappa.jsp?cx=10.31508&cy=45.07136&lx=10.31508&ly=45.07136&lv=1&al=118799&rtg=C&com1=san+martino+del+lago+(cr)&to1=&civ1=&type=1&z=30.0&ct=&st=&cs=&nm=
--
Salutoni
Sergio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Sarete i benvenuti.
io e Nicola andiamo,  partiamo da Monza/Milano
se qualcuno vuole venire  3 posti
ciao Ilairo

 So solo che dista circa 20/25 Km da Cremona.
io ho la A21 a due passi, ci vengo anche io.....
ciao ragazzi...
anche se in un'incombenza triste, ci vediamo là
Astra blu, berlina, targata TO
-- 
Alletun
"Se ti va di spassartela adesso
Prendi il Vettore oggi stesso."
Terre Desolate - Stephen King

Io, Ilario e Alletun e maumau eravamo al funerale di Lupo.
Abbiamo consegnato alla madre un foglio con tutti i messaggi del thread
aggiornati all'una di notte, data odierna.
La madre ringrazia tutti.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
"Seminate Linux, che Windows si pianta da sè...." (Antico Adagio)
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/public/SinapsiAntispam-Setup.exe
email spamtrap: 
spam...@nicolaottomano.it

La madre ringrazia tutti.
Era il minimo che potessimo fare!
Saluti.
Andrea.

 bye
ByeZ :(
-- 
Quando noi ignoranti eravamo di più, tutto era più bello (A. Celentano).
  ___   _   ___ _  _______   _______ ___
|   \ /_\ | _ \ |/ / _ ) \ / /_   _| __|
| |) / _ \|   / ' <| _ \\ V /  | | | _|
|___/_/ \_\_|_\_|\_\___/ |_|   |_| |___|

 La madre ringrazia tutti.
gią. lieto di avervi conosciuto, anche se in una circostanza un po' triste.
un saluto a tutti e tre e a tutti gli altri del ng.
good coding, come sempre!



Grazie anche a te che hai avuto la forza di farti portavoce della tristezza
di tutti noi, saltuari, assidui, vecchi e nuovi frequentatori di questo
gruppo.


Quoto su tutto.
  Roberto
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 good coding, come sempre!
E' stato un piacere anche per me. Avrei voluto conoscervi ad un meeting con
la porchetta oleosa da mangiare a quintali insieme a tutti voi (Lupo
compreso). Ma purtroppo al prossimo meeting ci sarà uno di noi in meno...
:-(

Newsgroup: it.comp.lang.visual-basic
Titolo: VB e NSF di Lotus

Come posso leggere il contenuto di un file nsf di lotus (contenente dati 
simili ad un foglio elettronico di excel) con vb6?
Grazie
Stride 

 dati simili ad un foglio elettronico di excel) con vb6?
Forse qui trovi qualche indicazione:
http://www.developerfusion.co.uk/show/135/
http://www.ibm.com/developerworks/lotus/library/ls-COM_Access/
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.
Newsgroup: it.comp.lang.visual-basic
Titolo: dbcombo stile Explorer

Ciao a tutti.
Ho una dbcombo collegata ad un controllo data che mi visualizza i dati del
campo cognome
Ora vorrei che l'utente, proprio come fa con Internet explorer, cominciando
a scrivere nella dbcombo gli appaiano solo i cognome che iniziano con quello
che l'utente digita.
Per esempio, se digito Ros  appariranno solo Rossi, Rossetti, Rossella ecc.
Grazie a tutti per la cortesia.

Fai qualche prova con la proprietà MatchEntry.
Ciao
cg

Newsgroup: it.comp.lang.visual-basic
Titolo: Simbolo Euro

Ho fatto un piccolo programma di fatturazione in Vb... solo che su alcuni
computer presso i quali ho installato il tutto, nella fase di stampa non
appare il simbolo dell'euro.... quale elemento devo aggiornare?
grazie anticipatamente

 wrote in message
news:k1bt8.15765$m41.4...@twister2.libero.it...


 ha scritto nel messaggio
news:a93gbu$kap$1...@pluto.news.dsi.unimi.it...



In ufficio da me ci sono 4 stampanti laser hp, da vb nessuna stampa il
simbolo euro, da word qualkuna si.
L'unico modo di metterlo da vb è stato usare un font non standard tipo il
tahoma.
Penso che il problema sia legato al fatto che le stampanti spesso hanno
memorizzato dei font che utilizzano per velocizzare i processi di stampa. Se
questi set caratteri non hanno il simbolo euro allora non lo stampano.
La mia è solo un'ipotesi, comunque usando font diversi dai soliti arial,
curier e times new roman, il problema sembra risolversi.
Saluti,
Pusky

 ha scritto nel messaggio
news:k1bt8.15765$m41.4...@twister2.libero.it...


 curier e times new roman, il problema sembra risolversi.
Ti confermo l'ipotesi. Se usi un driver PostScript, guarda nelle proprietà;
se è recente ti dovrebbe dare la possibilità di cambiare le impostazioni
nel tab "Tipi di carattere": devi settare "Usa sempre i caratteri TT".
Se non è recente, puoi scaricare il migliore (IMNSHO :-) ) che abbia
mai provato dal sito Adobe:
http://www.adobe.com/support/downloads/product.jsp?product=44&platform=Windows
Non ti scordare i PPD, sono nella stessa pagina, più giù.
Bye, G.


Grazie della risposta.
Saluti,
Pusky

 wrote in message
news:k1bt8.15765$m41.4...@twister2.libero.it...

hai patchato i sistemi con la patch per l'euro di microsoft?
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: testo in rtb

Ciao,
come posso aprire un file (.doc o .txt) e caricarlo in una Rtb? Ho trovato
la soluzione solo per il formato .txt ma quando il file e un po'grandicello
il programma si blocca in quanto procede a righe e mi pare un po'pesante:
Open (filename) For Input As #1
While Not EOF(1)
Line Input #1, riga
RText1.Text = RText1.Text & vbCrLf & riga
Wend
Close #1
Come fare?
Ah, dimenticavo...come si apre con una commondialog sia i files .doc che gli
.exe?
   Grazie 1000
 Pulx

 il programma si blocca in quanto procede a righe e mi pare un po'pesante:
RichTextBox1.LoadFile Dir1.Path & "\" & file1.filename, rtfRTF
Questo e' quello che ho trovato io, nella guida in linea c'e' anche un'altra
possibilita'.
Per la seconda domanda adesso non saprei
CIao
*frankyz

 Ah, dimenticavo...come si apre con una commondialog sia i files .doc che
gli .exe?
Con una CommonDialog non si apre nessun file, si viene informati unicamente
delle scelte operate dall'utente. Sara` quindi il nostro programma che
dovra` incaricarsi di "aprire". In particolare, nel caso di un file .exe
piu` che di aprire parleremo di avvio di un'altra applicazione, mentre in
quello di un file .doc, intendendo con questo un file Documento di Word, ci
sono varie modalita` che dipendono da quello che devi farci: aprirlo per
farlo usare all'utente, per modificarlo da programma, ...
Per cominciare potresti consultare la guida alla voce "Funzione Shell".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Eseguire un file da visual basic

Ciao a tutti...
avrei bisogno di sviluppare un programma che, selezionato un file, lo esegue
con il programma associato...
Esempio se eseguo "c:\winzip.txt" si apre il notepad mentre se eseguo
"c:\documento.doc" si apre il word con il relativo documento....
Is possible?


certo, ti consiglio di usare il comando conchiglia...
(ok, e' una battuta rubata :D )

 (ok, e' una battuta rubata :D )
e siccome mi hai fatto arrabbiare per la violazione del copyright
(naturalmente scherzo), ti smentisco... stavolta sono meglio le cosine
volanti.
 
http://makeashorterlink.com/?K3A553945
hth
salutoni
sergio


prova con shell + F1
-- 
Ciao Gab
ICQ#158859446

  
http://makeashorterlink.com/?K3A553945
ma perche' usare la shellexecute con "print" ?? quando c'e' la shell del vb
??
noi la shellexecut la usiamo solo quando bisogna attendere la fine di un
processo....
anyway mi fido  :D

 anyway mi fido  :D
anche io vado sulla fiducia, in realtà non l'ho mai utilizzato
Salutoni
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: Serial ID

Per bloccare la mia applicazione sul pc , vorrei vincolarla al seriale di XP 
in modo che anche in caso di upgrade hardware non ci sono problemi.
So che si puň leggere l'unique ID che in effetti varia per ogni seriale 
quindi soddisfa il suo scopo.
Dovrebbe essere nella  chiave di registro ma come si legge ?
C'č uan falla : se il cliente ha un windows  con lo stesso seriale su piů 
macchine .. allora oltre a Bill , frega anche me ! potrei verificare l'id e 
almeno in rete locale lo frego cmq !
Grazie 1000
Antonio

la chiave se no0n sbaglio č
hklm\software\microsoft\windows\currentversion\explorer....
o cmq posizionati su risorse del computer(sempre ne regedit) e fai trova
scrivi Owner e cerca nei dati e nei valori (No stringa intera)
quando lo trova troverai anche il num di XP che č univoco su ogni 
macchina!!!anche se il sedriale
č ugugale!

Newsgroup: it.comp.lang.visual-basic
Titolo: msi - per utti gli user

Come posso fare per installare un'applicazione per tutti gli user di un pc 
xp  ?
insomma , se installo sotto admin poi gli user non eseguono il programma !
l'user non può installare , e allora come si fa ?
Kit Microsoft developer enviroment 6.0  x  per vb6
Grazie

 l'user non può installare , e allora come si fa ?
C'è qualcosa che nel programma non va, sicuramente il tuo programma scrive
in App.Path.
Quindi devi installare da admin e dare controllo completo alle cartelle
dove leggi/scrivi.
Oppure riscrivere il programma che scriva nelle cartelle utente specifiche
dove hai l'accesso.

 wrote in
news:487ce5ed$0$41663$
4faf...@reader4.news.tin.it
: 

cosa vuol dire 'se installo sotto admin'?
e' una cartella speciale?
dove si trova?
verificati i permessi di quella cartella?
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

Sono stato poco chiaro.
Sul pc xp c'è l'utente admin e un user(limitato)
Se installo l'applicazione da user non mi va perchè appunto è limitata.
Quindi entro come Admin e installo il programma,ma quando entro come user 
non trovo il programma e anche se lo lancio dalla cartella mi da un sacco di 
ocx e dll non registrate.
Ricordo di aver visto che aluni programmi in fase di installazione chiedono 
se rendere accessibile  l'applicazione a tutti gli user delpc oppure solo 
all'user attuale , credo che io debbo inserire questa opzione nel seput 
delmio programma.
ma non trovo questa possibilità in Microsoft developement environment 6.0 !
Non la vedo oppure non esiste ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Open for Input (virgola)

ciao a tutti.
da qualche parte sbaglio.
se ho il file "Pippo.csv":
Prova,10-07-2001,riprova
se faccio:
xFree = FreeFile()
Open "Pippo.csv" For Input As xFree
Input #xFree, ilRec
MsgBox ilRec
Close #xFree
ottengo:
ilRec="Prova"
domanda:
come posso leggere tutto il contenuto, compreso le virgole ?
grazie

 ha scritto nel messaggio
news:VnA37.72157$cd.4...@news1.tin.it...


 come posso leggere tutto il contenuto, compreso le virgole ?
Con l'istruzione Line Input invece di Input, legge il contenuto del
file fino all'occorrenza del carattere CrLf e restituisce tutto in una
stringa.
ciao, Assa.
--
-----------------------------------------------------------------
Assa (Gabriele Genta)
WebMaster del "Sito Comune dei militanti del newsgroup
it.comp.lang.visual-basic"
http://www.it-lang-vb.net

 wrote in message
news:VnA37.72157$cd.4...@news1.tin.it...


 wrote in message
news:VnA37.72157$cd.4...@news1.tin.it...

la virgola è utilizzata come separatore di dati nei file sequenziali di vb
(e anche di gwbasic, qbasic etc. etc.)
quindi hai 2 possibilità :
input #xFree, ilRec, ilRec2, ilRec3
per cui ottieni :
ilRec = "Prova"
ilRec2 = "10-07-2001"
ilRec3 = "riprova"
oppure, come hanno detto ange gli altri, utilizzando Line Input
line input #xFree, ilRec
per cui ottieni :
ilRec = "Prova,10-07-2001,riprova"
Ciao
Enrico
Newsgroup: it.comp.lang.visual-basic
Titolo: {{{{ UUDecode & MIME/BASE64 Decode }}}}

 
Hello everyone.  I am working on a newsreader, and I want to be able
to convert UUEncoded or BASE64 encoded atatchments from a NNTP server
back into a binary file.  Can someone please tell me how this is done?
I've read the RFCs on MIME and couldnt find anything about UUE...but
that which I did find read like stereo instructions... if anyone has
any BAS/CLS/orDLLs that they could share with me, or some non-cryptic
instructions on how it's done, I would be very grateful...  thank you!
My email address is  
phoen...@crosswinds.net
  -gabriel

...

Proviamo col mio scarsissimo inglese... .
Yes, you can find an example of UUEnclode at
http://www.murialdo.it/it_lang_vb
section "Sorgenti" projectr "SMTP.ZIP"
The next time that you write in this NG, you must use a more correct SBJ!
eg: "[?] UUDecode  &  MIME/BASE64 Decode"
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: SetWindowPos( ) ??

come uso questa chiamata api per non permettere di ridimensionare la
finestra oltre un certo limite?
č questa l'API giusta?
ho provato a mettere dei resize nell'evento Form_Resize, ma ottengo uno
sfarfallio del form orribile
grazie
--
ciao
- Xaero -
"Quando ero piccolo i miei genitori mi
 volevano cosě bene che nella culla mi
 misero un orsacchiotto vero"


---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---

 WM_GETMINMAXINFO.
scusa, ma non ho molto chiaro il concetto di subclassing
ho letto l'articolo sul sito comune, ma continuo a non avere chiare le idee
forse sarà perchè non ho mai provato a costruirmi un esempio pratico
potresti darmi qualche info in più?
grazie
--
ciao
- Xaero -
"Quando ero piccolo i miei genitori mi
 volevano così bene che nella culla mi
 misero un orsacchiotto vero"

Newsgroup: it.comp.lang.visual-basic
Titolo: [Disperato] Registrazione Wav

Sono disperato, possibile che non esista una banale funzione
o libreria in Visual Basic per registrare un file audio Wav?
Qualcuno può aiutarmi? Purtroppo per me è urgente!
Grazie per la compassione!...
Ninzo

 Ninzo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Da picture a matrice

Vorrei riempire una matrice bidimensionale con i pixel che compongono
un'immagine partendo da un oggetto picture.
Praticamente tramite le prop dell'oggetto riesco a conoscere da quanti pixel
č formata l'immagine in verticale e orizzontale. Vorrei quindi riempire ogni
singolo elemento della matrice con il valore del colore del pixel
corrispondente dell'immagine.
Non ho la piů pallida idea di come si possa realizzare una cosa del genere,
ma non credo sia cosa facile da realizzare soprattutto con quello che mette
a disposizione VB.
Chi sa come fare?


Ci sono alcune API della libreria di sistema GDI che ti permettono di farlo,
non è cosa facilissima ma non penso nemmeno troppo complicata.
Pultroppo non ho esempi da suggerirti de so siti su cui trovare qualcosa di
"già fatto" :-(
Sappi che comunque con le API s puo' fare, e anche con estrema velocità di
esecuzione, quindi muoviti in questa direzione.
 /\/\/\/\/\/\/\/\/\/
| 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

 un'immagine partendo da un oggetto picture...

 Per ora ciao e se poi avessi problemi ad usarle, contattami pure.
Sia se sei disposto, beninteso, ma che ne dici di inviare gli esempi anche
al Sito Comune di questo NG ?
E' molto visibile ed il tuo progetto aiuterebbe molte persone.
Il Sito Comune sta qui: 
http://www.murialdo.it/it_lang_vb
--
/\/\/\/\/\/\/\/\/\/\/\/\/
|  Qui sul NG è nata una iniziativa:
|  Partecipa alla stesura di progetti VB sviluppati in team,
|  informati sul Sito Comune sezione Leonardo. Io
|  partecipo al progetto Data Raptor, alleati con noi.
\/\/\/\/\/\/\/\/\/\/\/\/\


 Per ora ciao e a risentirci.
 /\/\/\/\/\/\/\/\/\/
| 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

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] pacchetti di installazione

Mi servirebbe un pacchetto di installazione valido, ma che non mi spenni!!!
Ho visto che InstallShield costa più di 1000 euro.
Allora ho guardato ghost install innosetup e qualche altro
Voi cosa mi consigliate??
Ma tempo fa avevo letto che microsoft metteva a disposizione Windows
installer (mi sembra ver 1.1) per chi possedeva un visual studio.
Ma non ritrovo l'articolo e soprattutto mi sembra di aver installato il prog
ma non so minimamente come usarlo.
Ma ce l'ha l'interfaccia il windows installer oppure è solo script???
A me serve principalmente la possibilità di customizzare le form del wizard
So che InstallShield e Wise lo fanno ma mi mandano anche in bancarotta.
--
__________________________________
Usi Messenger??
Parliamo velocemente, aggiungimi ai contatti.
glaucoc...@libero.it

 ha scritto nel messaggio
news:SqYia.70160$i26.2...@news2.tin.it...


Scusa ma hai provato il PDW ( package and deployment wizard), č un add-in
del vb e non si parla di script e\o righe di comando.
In piů, personalmente non lo uso, mi sembra che anche InnoSetup sia gratuito
e abbastanza elastico.
Ad ogni modo la creazione dei pacchetti di installazione č stata trattata in
svariate decine ( o centinaia ) di post che puoi recuperare in questo ng.
Ciao, Luca.

 Ad ogni modo la creazione dei pacchetti di installazione è stata trattata


 ha scritto nel messaggio
news:DvYia.52138$Jg1.1...@news1.tin.it...


 Si, il PWD è un vero troiaio
Concordo.
Per chi non segue le regolette di base, è inutilizzabile.
Però qualcuno fa pacchetti che vanno al primo colpo su tutti i S.O..
Gente strana, al mondo...
Alberto
--
E non so se avrò gli amici a farmi il coro,
o se avrò soltanto volti sconosciuti,
canterò le mie canzoni a tutti loro
e alla fine della strada
potrò dire che i miei giorni li ho vissuti...

 Gente strana, al mondo...
Big Albe! ;-)

Newsgroup: it.comp.lang.visual-basic
Titolo: MS Chart

Salve a tutto l'NG,
Potreste indicarmi qualche link (guida) per utilizzo del componente MSChart.
Grazie 

 ha scritto nel messaggio 
news:ct7urv$gq5$1...@carabinieri.cs.interbusiness.it...


 quando impari a fare delle cose con una, impari a farle con tutte.
Sei un mito :)
-- 
Quando noi ignoranti eravamo di pių, tutto era pių bello...
(A. Celentano)
Per rispondermi in privato, prima togli l'immondizia dalla testa.

 quando impari a fare delle cose con una, impari a farle con tutte.
LOL, questa me la segno :-D
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] Problema Overrides

Un saluto a tutti, ho un problema sull'utilizzo di Overrides.
Ho una libreria di classi che contiene un form cosě composto:
1 bottone con Modifier Protected
l'evento click del bottone dichiarato public overridable;
l'evento click chiama una sub dichiarata public overridable
Genero un nuovo progetto, aggiungo il riferimento alla libleria di classi
aggiungo un form e eseguo la import del form precedente.  Tutti i controlli
vengono importati.
Nel  form ridichiaro la sub con public overrides sub xxx.
Purtroppo continua ad eseguire il codice della vecchia sub.
Ho provato anche ad importare la libreria n fase di progettazione ma non
cambia nulla
Qualche suggerimento ?
Grazie

risolto, grazie comunque

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.Net] chiusura del form

Ho un form nel quale l'utente puo' inserire dei valori in una datagrid. Nel
momento in cui chiude il form verifico con una variabile booleana se ha
effettuato delle modifiche nei dati.
Se non le ha effettuate chiudo il form.
Se le ha effettuate visualizzo una message box dove ha le due possibilita'
per chiudure o meno il form senza salvare.
Ho messo una routine nell'evento closing del form che effettua il controllo
ma se risponde di uscire senza salvare esce ma anche se clicca su no per non
uscir esce lo stesso. Forse al momento in cui si verifica l'evento closing
il form e' ormai destinato a essee chiuso? Allora quale altro evento prima
di closing bisogna intercettare?
Grazie
Riccardo

Da me sul Closing , come segue , se clicco su no non chiude la maschera:
Private Sub formCostruireDataSet_Closing(ByVal sender As Object, ByVal e As
System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Dim x As DialogResult
x = MessageBox.Show("Vuoi uscire ?", "Chiusura Maschera",
MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If x = DialogResult.No Then
e.Cancel = True
Exit Sub
End If
End Sub
giuseppeD

ok, ora va. Grazie per la dritta.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere tabelle in Word 2000 con VB6

Ho un problema che non riesco a venirne a capo spero che qcuno di voi possa 
darmi una spintarella......
In un documento di Word devo inserire un numero variabile di tabelle tramite 
un ciclo for each....next.
Il problema e' che nel posizionare la 3^ tabella viene generato un errore 
'4608' valore fuori misura quando imposto il range per posizionare 
successivamente la tabella.
Sommariamente:
for each Tabella in collTabelle
        .....
        If NumTable = 0 Then
            Set myRange = ActiveDocument.Range(0, 0)
        Else
            'questa riga genera l'errore soltanto al terzo passaggio e non 
al secondo!!!!!
            Set myRange = 
ActiveDocument.Range(ActiveDocument.Tables(NumTable).Range.End + 1, 
ActiveDocument.Tables(NumTable).Range.End + 1)
        End If
        ActiveDocument.Tables.Add Range:=myRange, NumRows:=X, NumColumns:=Y
        NumTable = NumTable + 1
        ....
next
Come gia' detto l'errore viene generato alla creazione della terza tabella 
in quanto "ActiveDocument.Tables(NumTable).Range.End + 1" raggiunge il 
valore "fuori misura".
Quello che non mi spiego e' perche' l'errore non venga generato gia' alla 
seconda aggiunga (che invece avviene correttamente), ma solo dalla terza....
Ho aggiunto " + 1" perche' lasciando il valore 
"ActiveDocument.Tables(NumTable).Range.End" la nuova tabella viene creata 
"agganciata" a quella precedente....
Sono quasi certo che il problema e' assegnare al "range" il valore giusto 
purtroppo e' da quasi un giorno che ci provo ma sono sempre punto e a capo
Grazie in anticipo
-- 
.o0-- I.d.N. alias JYD --0o.
Please Cut "-some trees-" for reply

Per ora ho risolto aggiungendo al documento tanti "vbCrLf" quante saranno le 
tabelle da inserire, se qualcuno riesce e vuol darmi cmq il perche' sono 
sempre in attesa.....


Newsgroup: it.comp.lang.visual-basic
Titolo: Datacombo a più colonne...

Ciao,
Mi sarebbe molto comodo usare datacombo a più colonne, simili a
quelle che si trovano in Access. E' possibile trovarle da qualche parte? o
mi conviene fare un ocx?
Grazie a chiunque saprà aiutarmi.
Gianluca
--------------------------------
Inviato via 
http://usenet.iol.it

 ha scritto nel messaggio > Ciao,


Newsgroup: it.comp.lang.visual-basic
Titolo: Filigrana di stampa e occupazione di memoria

Buongiorno a tutti!
 Sto utilizzando una gif di 2k per fare la filigrana di un report in Access.
Purtroppo però dopo una stampa , o dopo qualche modifica, mi esce il
messaggio di memoria esaurita..
Anche se esco e rientro in Access non riesco a liberare la memoria, devo
reinizializzare il computer.
Che istruzione dovrei mettere a pgm per evitare questo problema?
Grazie
Eleonora
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

reinizializzare il computer.
In effetti, ogni pagina A4 ti viene a pesare qualche mega...
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Soluzione a problemi con gli apici

Salve a tutti,
girando sul ng ho più volte visto messaggi che chiedevano aiuto per
risolvere il problema delle parole con gli apici in SQL, dato che anch'io ho
avuto questo problema e per risolverlo non ho trovato meglio da fare che
costruirmi una funzione (ma non avrà altro da fare questo qui!, penserete),
ho pensato di metterla a disposizione di tutti.
Non è oxfordiana comunque.
Public Function ControlloApice(MyString As String) As String
 Dim lunghezza As Integer
 lunghezza = Len(MyString)
 Dim car As String
 For i = 1 To lunghezza
  car = Mid(MyString, i, 1)
  If car = "'" Then
   MyString = Mid(MyString, 1, i) & "'" & Mid(MyString, i + 1)
   Exit For
  End If
 Next i
 ControlloApice = MyString
End Function
Esempio:
 Dim ricerca As String
 ricerca = "SELECT A.nome FROM Atleta A WHERE A.cognome = '" &
ControlloApice(DBCombo2.Text) & "'"
--
"Puoi alzarti molto presto all'alba, ma il tuo destino si è alzato un'ora
prima di te"
(Proverbio africano)

Si può sostituire tutto quel codice con questo:
Public Function ControlloApice(ByVal MyString As String) As String
   MyString = Replace(MyString, "'", "''")
End Function
Luca

Solo per vb6.

 Non č oxfordiana comunque.
Se usi VB6 puoi renderla molto + veloce cosě:
Public Function ControlloApice(ByVal MyString As String) As String
    ControlloApice=replace(MyString,"'","''") ' primo paramentro = 1 apice,
secondo = 2 apici
End function
Ciao
*Roby*
P.S.
Comunque grazie per aver condiviso con noi  il tuo codice.

 ho pensato di metterla a disposizione di tutti.


 penserete),


 >


Io utilizzo questa funzione:
Function fncstrChkCaret(stringa As String, Optional chiudi As Boolean =
True) As String
'   Controllo la presenza dell'apostrofo e delle virgolette nelle frasi da
inviare a SQL Access
'   Se presente, bisogna raddoppiarlo
    Dim x As Integer
    Dim Stringa2 As String, Carattere As String
    Stringa2 = ""
    For x = 1 To Len(stringa)
        Carattere = Mid$(stringa, x, 1)
        If Carattere = Chr$(34) Then
            Stringa2 = Stringa2 + Chr$(39) + Chr$(39)
        elseif Carattere = chr$(39) then
            Stringa2 = Stringa2 + Chr$(39) + Chr$(39)
        Else
            Stringa2 = Stringa2 + Carattere
        End If
    Next x
    If chiudi Then
        Stringa2 = Chr$(34) + Stringa2 + Chr$(34)
    End If
    fncstrChkCaret = Stringa2
End Function
Non è il massimo di eleganza, ma mi ha risolto molti problemi.

E' la stessa cosa, se gli apici sono raddoppiati funziona correttamente (Ca'
de' Soresini diventa Ca'' de'' Soresini).
Se non funziona stai sbagliando qualcosa nella function o nel replace.

 wrote in message
885sq3$ej1$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Confronto tra vettore e matrice

Devo controllare se gli elementi di un vettore di tipo variant sono
corrispondenti agli elementi di una riga di una matrice di tipo variant.
Dato che devo simulare la schedina, devo confrontare se l'elemento del
vettore è uguale a 1 o a 2 o a "X". Però nel confronto mi dice "Tipo non
corrispondente". Come fare a superare tale problema? Grazie.

 corrispondente". Come fare a superare tale problema? Grazie.
"Vade retro, Variant !" [1]
Usa un vettore di Long (basterebbe un integer, ma Long č piů
veloce per la CPU) per lavorarci, con 1, 2 e 3.
Solo in fase di visualizzazione, input e stampa lo converti da/in "X".
[1] Lupo permettendo :-).
Bye, G.

 ha scritto nel messaggio
news:c6enbn$b2uh8$1...@ID-108681.news.uni-berlin.de...


 Bye, G.
Scusami ma il problema non è risolto. Questo programma dovrebbe simulare la
compilazione di una schedina. Quindi l'utente deve usare 1 2 o X. Non è
molto attraente dire all'utente "Al posto della X usa il 3". Come si fa?

 il 3". Come si fa?
Acquisici X e la converti in 3 da codice.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 [1] Lupo permettendo :-).
Questa è una sviolinata bella e buona :-P


 Questa è una sviolinata bella e buona :-P
Davvero ? O:-)
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: installazione visual basic.net

salve
sto cercando di installare visual 
basic.net
 versione 2003, su un pc
W2000PRO
256M
Athlon XP 2000+
ad un certo punto dell'installazione mi chiede il cd
visual 
studio.net
 prerequisiti
lo inserisco, parte l'installazione di
microsoft .NET Framework 1.1
la barra blu che indica il progressivo dell'installazione arriva alla fine,
e poi rimane li.
ho provato come administrator, senza antivirus e alto ma niente.
se qualcuno mi puo' aiutare
un grazie a tutti
ciao michele

 ho provato come administrator, senza antivirus e alto ma niente.
Nel file
Se ricordocon V.S. .NET prof, è possibile saltare i prerequisiti,
leggi

 ho provato come administrator, senza antivirus e alto ma niente.
Nel file Help\moreinfo.htm del disco 1 di V.S. .net prof, è presente il
seguente:
4.1. Errori di diagnosi durante l'installazione di Visual Studio .NET -
Prerequisiti
Prova a dare una letta.
Se ricordo bene è possibile installare evitando i prerequisiti e installarli
a parte.
Vedi nella cartella dove sono presenti i file di help
Ave
giuseppeD

risolto
ho scoperto che la procedura di installazione si fermava nel momento in cui
cercava di stoppare alcuni servizi senza riuscirvi
ho impostato da automatico a disabilitato i seguenti servizi
Servizio di amministrazione di IIS
Servizio Pubblicazione sul World Wide Web
Servizio Pubblicazione tramite FTP
riavviato la macchina
installato "microsoft .NET Framework 1.1"
finito di installare "visul basic.NET" e "msdn Library"
ho impostato in automaticoi seguenti servizi
Servizio di amministrazione di IIS
Servizio Pubblicazione sul World Wide Web
Servizio Pubblicazione tramite FTP
grazie a GiuseppeD x i consigli
michele
Newsgroup: it.comp.lang.visual-basic
Titolo: Rs.Fields.DefinedSize non ha bisogno del RecSet aperto?

Ciao a tutti,
mi sono accorto per caso che se io faccio
Adors.source = "SELECT * FROM TABELLA WHERE 0=1;" 
' Quindi anche condizione falsa ->EOF
e faccio
Adors.open
Adors.close
debug.print Adors("campo").definedsize
funziona comunque, io credevo ci volesse il recorset aperto...
Utilizzo firebird, e ricordo che un paio d'anni fa (non avevo installato
firebird ma interbase) questa cosa mi pare non fosse possibile.
Avete idea se è una funzionalità di ADO o dipende dal driver del DB?
Altrimenti mi sa che io l'avevo considerata impossibile senza provarla.
Grazie

 Avete idea se è una funzionalità di ADO o dipende dal driver del DB?
Per quello che mi risulta è indipendente dal db, anche se non ho mai avuto 
a che fare con firebird o interbase.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 Solo che non contiene alcun record... ma lo schema si ;)
Quindi anche se faccio adors.close prima rimane comunque aperto lo schema?
Perchè io tranquillamente faccio adors.close e mi funziona.
Non vorrei fosse un caso che funzionasse in questo modo :)

 Avete idea se è una funzionalità di ADO o dipende dal driver del DB?
Non dipende dal db, ma è proprio una funzionalità di Ado.
Il metodo Open esegue, come prima (e principale) cosa, la 
strutturazione del recordset.
Poi, se e solo se la tipologia di recordset lo richiede, fa anche il 
fetch delle righe.
Col close si 'buttano via' le righe, ma non la struttura.
Basti pensare che tu puoi definire un recordset senza alcun 
collegamento ad un db, ma solo per usarlo come struttura tua di 
memorizzazione.
Lo strutturarlo, significa proprio definire Name, Type, DefinedSize, 
ecc..., di ogni Field.
E questa strutturazione avviene *prima* di aprirlo, quindi DefinedSize 
esiste anche prima.
Solo che, se invece di strutturarlo a runtime, lo lasci strutturare con 
il metodo .Open, evidentemente non avrai alcuna DefinedSize prima 
dell'Open.
Credo invece, ma se provi potrebbe essere interessante, che diventi 
insignificante ActualSize, dopo il Close.
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 insignificante ActualSize, dopo il Close.
Non mi è mai servita l'actual size per ora, comunque con Rs chiuso da
proprio errore.
Uso la DefinedSize all'inzio per dimensionare le maxlength delle txt, per
non doverlo ricontrollare poi io.
Solo che evitando di farlo se rs=EOF quando entravo in un archivio vuoto,
la prima volta non avevo il dimensionamento.
Poi dopo funzionava grazie ad una 
select * from tabella where id=(select min id from tabella)
Newsgroup: it.comp.lang.visual-basic
Titolo: Tutte le parole in un file

Salve a tutti.
Stò realizzando un piccolo gioco con il VB6 (L'impiccato).
Sapreste dirmi dove posso trovare un file che contenga tutte le parole della
lingua italiana?
Purtroppo io ho solo trovato dizionari ecc. ma nulla con solo parole.
Grazie anticipatamente.
Saluti Iotu
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 lingua italiana?
tutte direi che praticamente è impossibile...
qui ce n'è un bel po'...
http://www.gbcweb.com/free/vb_esempi/samples_tools_dizITAmdb.rar
mdb, 3 mega; solo parole
-> GbC|
www.gbcweb.com

 ha scritto nel messaggio


 Per caso qualcuno sa se c'è un database con meno termini?
????
Sinceramente non ho mai visto una persona chiedere di un database con 
"meno" elementi...
Cancellarne qualcuno a caso no, eh?
:D
-- 
Rivolterò il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starà nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

 Per caso qualcuno sa se c'è un database con meno termini?
Io mi dolgo del fatto che ce ne siano troppo pochi...
-> GbC|
www.gbcweb.com

Il problema è che non posso sfogliare 250000 parole per cancellare quelle
meno usate...
Vorrei realizzare un programma che intuisca la parola scritta in base alle
prime lettere: se ci sono troppe parole risulta molto difficile che il
programma la "intuisca" se non dopo averne scritta i 2/3 o di più...
Ecco il motivo della richiesta un po' strana...
Ghigo    ;o)
-- 
*******************
www.ghigoweb.com
*******************
"Darkbyte [Home]" ha scritto


 programma la "intuisca" se non dopo averne scritta i 2/3 o di più...
L'ho già fatto, proprio con quell'archivio.
Un input controllato con suggerimento delle parole.
La natura composta delle parole della lingua italiana non consente altro
approccio che suggerire mentre si scrive, ed in questa ottica più parole hai
meglio è.
L'esempio dell'input facilitato è on-line...
Spe che cerco il link... Trovato...
http://www.gbcweb.com/free/vb_esempi/samples_text_ConSuggerimentoParole_VBP.rar
Ovviamente usa quel db...
Hola
-> GbC|
www.gbcweb.com

Grazie mille!
Adesso mi studio il codice...
Ghigo
-- 
*******************
www.ghigoweb.com
*******************
"GbC|" ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: C'e' un DELAY() in VB?

Ciao a tutti!
                    e' da pochissimo che ho iniziato a programmare in
Visual Basic, prima lavorar\vo su Pascal e Delphi.
Ebbene... c'e' in Visual Basic una funzione analoga alla DELAY() del
Pascal?  Una funzione cioe' che faccia passare tot secondi (o
centesimi di secondo) senza fare nulla?
Grazie!
Ciao, Paolo.

On Mon, 18 Jan 1999 22:07:39 GMT, 
paolo...@usa.net
 (Paolo Rosa)
wrote:

FACILE...
Public Sub Delay(Secondi as integer)
    Dim start As Single
    start = Timer   
    Do While Timer < start + delay
        DoEvents    
    Loop
End Sub
PS il doevents e' necessario per non bloccare tutti gli altri
processi...
SW.


E se start + delay superano la mezzanotte ?
Ciao
Francesco C.

Ciao, Paolo.

E se start + delay superano la mezzanotte ?
E' vero ho controllato.... 
SW.


Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
A questo punto l'istruzione
Sleep(100)
manda a dormire il tuo programma per un decimo di secondo (senza
consumare CPU).
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------

Francesco C.

consumare CPU).
Grazie mille a tutti!
Risolto :)
Solo una cosa.... lo so che dovra' necessariamente essere una
stronzata ma non ho trovato nell'help nessun chiarimento:
Per cosa si mette il segno del dollaro dopo una variabile o una
funzione?   Chr$()   o Buffer$
Cosa sta ad indicare?
Scusate ma....
Ciao, Paolo.

Si aspettano 24 ore in piů.
No non si esce piů

Sleep(100)
Interessante....
SW.

>Sleep(100)


SW.

che quella variabile e' una stringa
ciao


Si puo fare di meglio :-)))
Cambi l'ora a 23.59 e aspetti con il programma delay in esecuzione...
SW.

Newsgroup: it.comp.lang.visual-basic
Titolo: ...come si rallenta o blocca il processo per un po' ?

Ho i problema di dover aspettare PKUNZIP prima  di poter elaborare il
file.... di solito VB NON lo trova.... come faccio a rallentare o
mandare in pausa VB ?
Grazie !
Bye, Red
red...@tin.it
==============

Sul Sito Comune di questo Newsgroup:
www.murialdo.it/it_lang_vb
trovi un esempio su come avviare un programma ed attendere la sua chiusura.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Indubbiamente l'esempio proposto da Moreno e' il migliore e il piu'
professionale ma se tu ci capisci poco (come me che dall'esempio ho capito
pochisismno purtroppo) io ho adottato un sistema diverso...
Invece di lanciare PKUNZIP lancia un BAT che  prima di lanciare PKUNZIP
crei un file e lo cancelli dopo Pkunzip 
Da Visual Basic Controlla con 
MYFILE = Dir("C:\IlFile.PRV")
se MYFile=0 allora  il file non esiste piu'  e quindi PKUNZIP e'
terminato..ciao
spero di esserti stato utile