mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Image gear 98 e GIF (UNISYS!)

Ho image gear 98 originale ma mi manca la licenza per i GIF (=password
+ ID). Qualcuno mi sa dire dove posso trovarla?
NB La unisys mi ha chiesto circa 5 milioni all'anno!

...



Da Vicienzo 'o Malamente,
soffet meglio dello riginale, crac, ascěsc, mariuan, Vibbisei Origginale
senza bag garantita

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

Salve a tutti !
Come faccio a integrare un vbscript in un programma Visual
Basic ??
Devo per forza usarlo come un'applicazione esterna ?? .. Come
faccio a passergli le variabil ??
Grazie Marco
--------------------------------
Inviato via 
http://usenet.iol.it

 faccio a passergli le variabil ??
componenti...microsoft script... (ocx) :))))))
per rendere visibile qualsiasi tuo oggetto usa  scriptcontrol.addobject (non
ricordo proprio bene la funzione ma è molto simile) ;))))
molto sintetico ma se hai problemi chiedi :))
(è semplice l'uso)
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Informazioni su Dischi

E' possibile avere le informazioni della capacita, label e principalmente
del Volume di Un Hard-Disk da VB senza usare VBX oppure OCX.
Grazie per la risposta e se ci fosse anche un piccolo esempio Grazie 2
volte
bm...@mbox.queen.it

Grazie per la risposta e se ci fosse anche un piccolo esempio Grazie 2
http:\\
www.geocities.com
\siliconvalley\lakes\1218\piccolidl.html
Inoltre, per lo spazio libero puoi fare
        Declare Function DiskSpaceFree Lib "SETUPKIT.DLL" () As Long
 
        Dim free_space& ' Holds number of bytes returned from
        DiskSpaceFree().
        ChDrive "c:"    ' Change to the drive you want to test.
        free_space& = DiskSpaceFree()
Ciao
Stefano - 53.6%
gl...@eponet.it
http://www.geocities.com/SiliconValley/Lakes/1218
(programmazione VB 32 bit)

Newsgroup: it.comp.lang.visual-basic
Titolo: Menu nei Form MDI

 invisibile in quanto prende il menů della form figlia.
Se il menu della MDIChild ti serve per la Popupmenu, invece di metterlo
sulla Child, mettilo su di una altra form nascosta, che non sia MDIChild.
Quando vuoi far aprite il menu chiami:
PopUpMenu FrmNascosta.MioMenu
Ovviamente devi spostare il tuo codice di porgramma associato ai menu sulla
form nascosta, oppure richiamare il tuo codice attuale da lě.
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Nome Utente e UID su NT

Qualcuno conosce il modo di ottenere da VB6 il nome utente, l'uid, etc. in
Win NT?
Ciao, Benedetto.

prova...
nel modulo in general-declarations
=========================
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal
lpBuffer As String, nSize As Long) As Long
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA"
(ByVal lpBuffer As String, nSize As Long) As Long
funzione...
========
Public Function NTDomainUserName() As String
Dim UserName As String
Dim ComputerName As String
Dim BuffLen As Long
Dim Ret As Long
   UserName = String(255, Chr(32))
   ComputerName = String(255, Chr(32))
   BuffLen = 255
   Ret = GetUserName(UserName, BuffLen - 1)
   UserName = Left$(UserName, BuffLen - 1)
   BuffLen = 255
   Ret = GetComputerName(ComputerName, BuffLen)
   ComputerName = Left$(ComputerName, BuffLen)
   NTDomainUserName = ComputerName & "/" & UserName
End Function


Environ("USERNAME"), dovrebbe esserci sia con win9x che con win NT.

Newsgroup: it.comp.lang.visual-basic
Titolo: -> ActiveX - Nascondere la proprieta' ToolTipText

ho creato un mio controllo ocx, pero' vorrei nascondere la proprieta'
ToolTipText.
Ad esempio, le ScrolBar non c'e' l'hanno!
C'e' un modo x farlo?

lel...@libero.it
 wrote in <975iht.3...@lele.my.fqdn>:

oh, sě... con il polimorfismo, una delle basi della programmazione ad 
oggetti... ma VB non ce l'ha >:->
-- 
January 15, 2028 - Intel announces their new 400THz processor, which 
performs 100 billion floating-point operations in the millisecond before 
it consumes itself in a nuclear explosion. This is a step up from AMD's 
recent processor which simply fries any nearby user with bolts of plasma 
energy. Hobbyists are already looking into ways to overclock the chip.
Newsgroup: it.comp.lang.visual-basic
Titolo: problemi con ntext

Salve ho un piccolo problema a gestire un campo ntext in sql server 2000
Premetto che utilizzo visual basic lato programmazione.
Nel momento in cui vado a chiamare la stored procedure mi da come errore:
troncamento a destra della stringa di dati.
i dati io li vado a prelevare da una richtextbox ma questo penso che sia
irrilevante
da cosa potrebbe dipendere?
-- 
Chianese Vincenzo
Digis s.r.l. - Responsabile tecnico
Tel. 0874772555
Cell. 3337497735
e-mail 
chia...@digis.it

occhio, se lavori con RTB, la proprietà .Text non ti dà solo il testo, ma
tutta la sintassi specifica RTB per la formattazione dei colori, font,
grassetti, etc. etc.
quindi credo che quello che stai per andare a salvare nel campo ntext non è
il semplice testo, ma è una roba in realtà molto più lunga: dagli un'occhio,
perchè non vorrei che ci finisca dentro qualche delimitatore particolare,
qualcosa di sporco, insomma.....
ti più non so dirti, il codice fa qualcosa di particolare?
good coding!!!
-- 
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

 colori, font, grassetti, etc. etc.
AFAIR, la .Text dovrebbe essere pulita, mi sa che stai pensando
alla .TextRTF.
Bye, G.

 ha scritto nel messaggio
news:bm5t1e$ii6rq$1...@ID-134521.news.uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Bitmap Multiple

Salve ho visto che dei programmi utilizzano un file bmp formato da tante
immagini tutte della stessa grandezza (es. 16*16 ) che poi utlizzano nella
tolbar o bottoni vari , come fanno ha separare le singole immagini da codice
??
Inutile dire che si puo' utilizzare una ListImage.....ma mi piacerebbe
sapere come
si fà da codice.....
Qualcuno sa dirmi qualcosa ? inutile dire che in rete non ho trovato niente
!

 ha scritto nel messaggio 
news:43bfefc6$0$1075$4faf...@reader2.news.tin.it...

Boh, puoi caricarti la picture e poi con PictureBox.PaintPicture puoi 
scegliere la porzione di bitmap che ti interessa.
Personalmente userei una ImageList (o un array di Image).
Ciao 

Ho fatto delle prove con PaintPicture ed effettivamente si possono disegnare
i
pezzi di immagine - tutto ok - era solo una curiosità formativa .
      grazie Zanna.


io userei l'API BitBlt
qui trovi la documentazione:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/bitmaps_0fzo.asp
bye
r

 ha scritto nel messaggio
news:43bfefc6$0$1075$4faf...@reader2.news.tin.it...

Nessuno ha mai usato il controllo Microsoft PictureClip (PICCLP32.OCX)?
DIrei che è senz'altro quello che fa per te: carichi la bmp "multipla" nella
sua proprietà Picture, imposti il numero di righe e di colonne da cui è
formata, poi, per selezionare i vari "pezzettini" il PicClip ha una comoda
proprietà array GraphicCell.
http://msdn.microsoft.com/library/en-us/vbcon98/html/vbconusingpictureclipcontrol.asp
HTH
Bye
Raf

Grazie a tutti per le risposte !

 Nessuno ha mai usato il controllo Microsoft PictureClip (PICCLP32.OCX)?
Ma non era sparito insieme a VB4?
Ciao 

 Ma non era sparito insieme a VB4?
A quanto pare no... confesso però che non l'ho mai utilizzato, trovando molto ma
molto più comodo il controllo ImageList!
Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: protezione dalla copia!

Come posso proteggere dalla copia un programma masterizzato in un CD?
ho provato con il numero di serie ma me lo cambia sempre.
Grazie
Risposte in E-Mail: 
calm...@lycosmail.com

Cerca qui nel newsgroup....ci sono già una fracca di messaggi in merito.


dove?

Newsgroup: it.comp.lang.visual-basic
Titolo: File Ini

Salve a tutti ,
Qualcuno saprebbe dirmi come cancellare il contenuto di un file ini o  una
singola sezione?
Grazie a tutti .
Saluti

singola sezione?
Per cancellare il file ini e lasciarlo vuoto, basta che lo ricrei :)
Per cancellare la singola sezione dovrebbe bastare passare (ByVal, naturalmente :)
una stringa vuota a WritePrivateProfileSection (api) come secondo parametro.
La dichiarazione dovresti trovarla nell' api viewer fornito con vb.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: sendkeys e nome del controllo che ha il focus

ragazzi ciao a tutti
allora io sto utilizzando sendkeys per inviare dei comandi es.tab,enter
ecc..
però volevo chiedervi se c'è il modo, mentre mi sposto fra i campi del
form, di ricavarmi il nome del controllo(es per una text la capiton) che
ha lo stato attivo nel momento in cui mi sposto ...
c'è questa possibilità??
oppure c'è una proprietà o un evento che ti dà questa remota
possibilità..
 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 c'è questa possibilità??
ScreenActiveControl

Scusa rettifico non è un form è la finestra di una procedura esterna al
VB
che apro con shellexecute e attraverso sendkeys e appactivate 
faccio degli eventi
esiste un'api che ti permette di catturare i controlli attivi di questa
finestra mentre utilizzo il sendkeys????


Newsgroup: it.comp.lang.visual-basic
Titolo: Point() & Pset()

Tempo fa ho realizzato un programmino grafico per la 
rotazione e l'ingrandimento (+/-) di un'immagine,
il tutto con metodi interni a VB,ma non sono riuscito
a "copiare" l'immagine in Form2 (con Point(X,Y) )
e a trattarla (rotazioni e ingrandimenti) in Form1
( PSet x,y,..)
Mi pare di aver tentato la dichiarazione:
      Form1.Pset x,y,Form2.Point(xx,yy)
Ma non sono riuscito nell' intento e ho dovuto
adattarmi a copiare l'immagine in un angolo di 
un Form unico, ed eseguire il tutto in Form1:
      Form1.Pset x,y,Point(xx,yy)
Qualcuno sa darmi chiarimenti ?
Grazie per l'attenzione.
ramarro


A me funziona facendo:
Dim x As Long, y As Long
For x = Me.ScaleLeft To Me.ScaleLeft + Me.ScaleWidth
    For y = Me.ScaleLeft To Me.ScaleLeft + Me.ScaleWidth
        Form2.PSet (x, y), Me.Point(x, y)
        DoEvents
    Next y
Next x
Devi controllare queste cosette:
-entrambi i form devono avere la .ScaleMode uguale (meglio se 3 - Pixel)
-se il disegno sparisce quando il form viene nascosto da un altro devi
mettere la proprietą autoredraw =True
-lo stesso se disegni prima di visualizzare il form
Spero di esserti stato utile
--
Diego Mazzaro
"L'importante non č conoscere tante cose ma sapere dove trovarle" A.
Einstein

 
è il dramma di tutti, e in particolare degli indici analitici !
Newsgroup: it.comp.lang.visual-basic
Titolo: Client IRC

Voglio fare un semplice Client IRC, ma non so dove trovare la lista dei
messaggi da inviare al server per effettuare la connessione ;___;
HELP!
Ciao ^_^

,

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own
Newsgroup: it.comp.lang.visual-basic
Titolo: Trigonometria

Non ho conoscenze in merito.
Provando  e riprovando sono riuscito a calcolare gli angoli conoscendo due
lati del triangolo rettangolo.
Mi servirebbe trovare i lati conoscendo un lato ed un angolo.
Per chi sa come fare sono poche righe di codice.
Se qualcuno volesse aiutarmi gli sarei grato.
Ciao, Sauro

 ha scritto nel messaggio
news:blaVb.22072$U4.7...@twister1.libero.it...

Il minimo per risolvere un triangolo č
due lati e l'angolo interno
due angoli e il lato interno
Con un lato e un angolo non č possibile risolvere il triangolo.

 Con un lato e un angolo non è possibile risolvere il triangolo.
Sto parlando di un triangolo rettangolo.
Sei sicuro di quello che dici?
Se conoscendo solo due lati è possibile trovare gli angoli (ed è sicuro), mi
sembra strano che non si possa risolvere conoscendo un lato ed un angolo.
Vedremo i prossimi post, se ce ne saranno.
Ciao, Sauro

 ha scritto nel messaggio
news:TibVb.21343$Mt6.7...@twister2.libero.it...

Se è rettangolo, devi conoscere un angolo e il lato compreso tra l'angolo
retto e l'angolo noto.

 Vedremo i prossimi post, se ce ne saranno.
Malfidente :-)
Posti A, B, C gli angoli di un triangolo
e a, b, c i lati opposti agli angoli rispettivamente A, B, C
sin(A)    sin(B)    sin(C)
-----  =  ------ =  ------
  a         b         c
Conoscendo tre valori, puoi conoscere il quarto.

 ha scritto nel messaggio
news:blaVb.22072$U4.7...@twister1.libero.it...

prova qui`
http://www.math.it/formulario/trigonometria.htm
bye
r

 ha scritto nel messaggio
news:blaVb.22072$U4.7...@twister1.libero.it...


 ha scritto nel messaggio
news:blaVb.22072$U4.7...@twister1.libero.it...


 
http://www.math.it/formulario/trigonometria.htm
Grazie Nerone.
Per la verità, portare in VB le formule è meno banale di quel che può
sembrare.
Entrano in gioco i radianti che non ti spiego perchè non ho ben capito.
Comunque il programma ora funziona.
Se dovessero servirti in seguito allego le necessarie istruzioni di VB
Ciao, Sauro
'Angoli espressi in Gradi centesimali
Const PG = 3.14159265358979
AngoloOppostoBase = Atn ( Base / Altezza ) * ( 180 / PG )
AngoloAdiacenteBase = 90 - ( Atn ( Base / Altezza ) * ( 180 / PG ) )
Altezza = Base * Tan ( AngoloAdiacenteBase * ( PG / 180) )
Altezza = Base * Tan ( ( 90 - AngoloOppostoBase ) * ( PG / 180) )

 wrote in message
jzbVb.8308$zm5....@nntpserver.swip.net...

Ciao Alessando e grazie  :-)
Se dovessero servirti in seguito le istruzioni di VB vedi altro mio post a
Nerone.
Saluti

 Ricordati di convertire i gradi in radianti e, dopo, riconvertirli in
gradi.
Già, questa storia dei radianti è per me un po' incasinata.
Comunque alla fine ho risolto.
Ciao Salvo e grazie.


[cut]
ti ringrazio e ti segnalo un altro sito
http://www.spiega.com/g.php?o=radiante
dove spiega il concetto di radiante.
le informazioni che ti ho dato le ho travete usando google.
cordialmente
bye
r

 ha scritto nel messaggio
news:P4tVb.24463$U4.8...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: cambiare risoluzione in vb5

salve ,
vorrei sapere se e' possibile cabiare risoluzione in vb5
se ci sono dei comandi  per poterlo fare .
se io ho un programma scritto in 1024 * 768 e' lo do ad un mio amico che ha
la risoluzione del desktop 640*480 non puo' vedere tutto il form perdendo
cosi anche dei tasti di scelta.
ringrazio per eventuali risposte anche
e-mail 
iu...@iol.it

Guarda che il ridimensionamente e' automatico... Se io lo scrivo a
800*600, poi anche sul 640*80 vedo tutto perfetto, prova a cambiare la
risoluzione man mano che scrivi il programma. Infatti windows mica
ridimensiona tutto tutte le volte che cambi risoluzione, e un
programma VB si comporta allo stesso modo.
Ciao.
""""""""""""""""""""""""""""""""""""""""""""""
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
""""""""""""""""""""""""""""""""""""""""""""""
                 Trust no ONE.

programma VB si comporta allo stesso modo.
Penso che voglia evitare le scroll bar che appaiono su form disegnati ad una
risoluzione maggiore di 640*480 o il ritorno a capo dei tasti su una toolbar
e cose del genere.
La cosa migliore in questi casi è sempre quella di visualizzare il risultato
grafico a 640*480 prima di compilare. Anche io progetto a 800*600 ma i
programmi vengono eseguiti su pc a 640*480, ed a volte devo stare attento a
questa regola se il form deve essere visualizzato interamente senza scroll.
ciao a presto
--
"Baby, vieni qui che ti devo parlare da vicino..."
----------------------------------------------------------
Night Eagle ti aspetta su:              U_/
http://space.tin.it/io/mzugar/
       / R
----------------------------------------------------------
Togliere 'FUCKSPAM' per le risposte

"Baby, vieni qui che ti devo parlare da vicino..."
Cosa mi devi dire ? :-)
Ciao !


Comunque non avete risposto alla sua domanda, cioe' se e' possibile o
meno far cambiare risoluzione in VB.
On Fri, 22 May 1998 22:17:12 GMT, 
FedE...@tin.it
 (Federico Galli)
wrote:

Gabriele Ponzo
gpo...@wnet.it
www.wnet.it/gponzo

Ciao !
ciao a presto !
P.S. a parte gli scherzi, non so bene cosa accada con il resize perchè le
mie applicazioni le progetto in 640*480 direttamente,

meno far cambiare risoluzione in VB.
Non si potrebbe leggere la rosoluzione e modificarla usando le API di
Windows?
Newsgroup: it.comp.lang.visual-basic
Titolo: Una picola mano per un appassionato

Salve a tutti, anche se sono entrato a conoscenza da un po di tempo di
questo news, solo oggi mi sono deciso a darci un'occhiatina e mi sono
accorto di come possono essere utili certi suggerimenti.
Mi rivolgo un po a tutti per chiedere una mano nella programmazione in Vb,
visto che ho 15 anni e mi piacerebbe moltissimo sapere programmare bene
questo linguaggio, ho già studiato su alcuni testi da bravo "autodidatta" ma
vorrei sapere se qualcuno è disposto a darmi maggiori informazioni ed
aiutarmi nei miei problemi da principiante!

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] driver di Access

Salve a tutti,
ho creato un pgm VB che accede ad un file Access2000 tramite ADO.
l'ho installato su un PC ma quando tento di accedere al file mi si presenta
un errore sui Driver dicendomi che non esiste il driver specificato.
ho controllato e nell'elenco dei driver ODBC nel pannello di controllo in
effetti non trovo i driver di Access.
1.    è effetivamente questo il problema??
2.    se si, come faccio ad installare il driver
N.B. sul quel PC è installato Access2000 e infatti riesco ad aprire il file
al quale NON riesco ad accedere con il mio pgmVB.
Grazie a tutti.
Paolo.

 ha scritto nel messaggio
news:0RFn7.168287$TS4.1...@news2.tin.it...


 hai provato a reinstallare mdac?
Si se intendi il file mdac_ty.exe. L'ho lanciato e installato con successo
ma i driver non ci sono!!!   :-((
Grazie.
Paolo.



E perchè invece di usare Odbc non usi direttamente il provider Oledb per
Access?
per es:
conMiaConnessioneAdo.open "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\pippo.mdb;Persist Security Info=False"
ciao
ugo

 wrote in message
9nnt9l$ie0$1...@lacerta.tiscalinet.it...



Che, appunto cosě usi Odbc.
(Tra parentesi, funziona senza specificare il Provider Oledb? Darň
un'occhiata...)
ciao
ugo

> Che, appunto cosě usi Odbc.
infatti il Provider di default č MSDASQL ovvero il provider ODBC
--
Fibia "Service Bot" FBI


thnx: non lo sapevo.
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: scrolling della flexgrid da codice

mi spiego meglio:
devo eseguire il drag & drop tra due griglie, ma ho la necessità di
scrollare la griglia di destinazione SENZA fargli avere il focus.....
come posso fare ?
è gradita la riposta, oltre che nel NG, anche alla mia casella di
posta, grazie a tutti.
valen...@usa.net
valentino...@libero.it

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione IIS con VS.NET

 
Salve ho appena installato 
VS.NET
 Enterprise Architect su WIN2000 stavo
provando a creare una nuova applicazione WEB ma mi sono accorto che IIS non
č stato installato,
č normale?
ho provato a cercarlo sui 5 cd ma non ho trovato niente, prima di prenderlo
dal cd di w2000 vorrei essere sicuro che con .NET non viene distribuito IIS.
Grazie 1000.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie 1000.
prego
-- 
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://www.ugidotnet.org/4.blog


Grazie per la risposta molto completa.

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6 ADO] Modalità efficiente per apertura tabella per sole aggiunte ?

Ciao a tutti.
Qual'è il modo più efficiente per aprire una tabella SQLServer utilizzando
ADO in sola aggiunta di nuovi record ?
In altre parole ho una tabella che, tendenzialmente, cresce moltissimo.
Continuamente io devo aprirla, aggiungere record (AddNew) e chiuderla.
Se non ricordo male col vecchio DAO era possibile specificare all'atto
dell'apertura, che si intendeva aprire la tabella, non per leggervi il
contenuto, ma per aggiungervi solamente dei nuovi record. In questo modo le
prestazioni all'atto dell'apertura della tabella stessa miglioravano
sensibilmente in quanto non caricava affatto i record già inseriti.
Boh ! Spero di essermi spiegato bene, per questa sera sono fatto che basta !
Ciao e grazie.
Roby

 ha scritto nel messaggio
news:9pv8p9$l278j$1...@ID-102415.news.dfncis.de...

giuida in linea : Istruzione SQL  INSERT INTO
es: strSQLInsert = "INSERT INTO Tabella(Campo1,Campo2)
VALUES(valore1,valore2);"
conn.Execute strSQLInsert
giuseppeD

 conn.Execute strSQLInsert
Purtroppo la tabella in questione contiene campi di tipo speciale (campi
IMAGE) nei quali memorizzo files.
Di conseguenza l'utilizzo del SQL standard per eseguire tali operazioni
diventa abbastanza pesante.
Roby

 ha scritto nel messaggio
news:9q0rm5$ki4hm$1...@ID-102415.news.dfncis.de...

A prescindere dal fatto che, non mi stancherò mai di ripeterlo, non esiste
ragione plausibile per cui i -files- debbano stare -dentro- a un database,
nonostante la posizione -commerciale- di Oracle...
In questa situazione ti comviene crearti un recordset vuoto su cui esegui
l'addnew del nuovo record.
Per es:
tabella  PROVA
CODICE Varchar(15)
DESCRIZ Varchar(40)
etc ...
rs.open "SELECT * FROM PROVA WHERE CODICE=''", conMiaconnessioneado,
adopendynamic, adlockoptimistic
Ovviamente CODICE non sarà mai una stringa vuota, quindi il recordset non
conterrà record.
rs.addnew
etc...
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Treeview e Listview

Avrei qualche problema con i controlli TreeView e ListView:
Sto cercando di fare un'applicazione con interfaccia stile gestione
risorse. Fin qui nessun problema.
La mia applicazione deve pero' comportarsi come il backup di Win95:
devo cioe' permettere all'utente di selezionare alcune voci
dell'albero e della lista.
in pratica vorrei potere mettere un casella da spuntare di fianco ad
ogni voce (come il backup appunto).
Esiste un controllo gia' fatto o devo farlo a mano?
Io avevo pensato di utilizzare le immagini da associare alle voci, ma
come faccio a distinguere se l'utente ha cliccato sul testo o
sull'immagine (se clicca sull'immagine deve selezionare, se clicca sul
testo deve fare le classiche operazioni tipo rinomina, apri sul doppio
click, ...)
Inoltre si può fare in modo che il controllo listview selezioni una
voce su tutta la riga e non solo se clicco sulla prima colonna (non so
se avete presente, ma l' ACDC permette di farlo).
Federico

Accedendo direttamente alla Comctl32.dll riesci a farlo, attraverso il più
comodo Ocx no, quindi o aspetti VB6 (che dovrebbe uscire oggi) al quale
hanno introdotto la possibilità di aggiungere le Checkbox sia al ListView
che al tree o devi utilizzare le API per accedere direttamente ai servizi
della dll, se vuoi ti mando un esempio.
Ciao Andrea


wrote:

Ti sarei molto grato, anche se non ho mai usato le API e ci mettero'
un po' di tempo a imparare, potrebbe essere un buono spunto per
iniziare (anche perche' non ho molte intenzioni di passare a VB6 in
tempi brevi).
Federico

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DBF come li leggo sotto VB6?


Un paio di metodi semplici semplici:
1) Crea un DB MS-Access 97 in cui colleghi (meglio) oppure importi la
tabella .DBF e poi gestisci il database creato come più ti piace! Ad esempio
con un controllo data (ADO, DAO, RDO...)
2) Usi direttamente un controllo dati, facendo riferimento al .DBF invece
che un database Access
3) Usi l'ODBC per aprire un database da una fonte dati.
...Sì lo immagino... non sono stato chiaro... magari mandami una e-mail
all'indirizzo mailto:
ne...@NOSPAMiol.it
  (elimina NOSPAM) così ti posso
spedire un po' di codice e maggiori dettagli.
Ciao
Giubodi



 dbf?
utilizzando DAO, dichiaro DBMain As DataBase
Set DBMain = OpenDatabase(Percorso, False, False, "FoxPro 2.0;")
dove Percorso è una variabile stringa contenente la directory dove si
trovano le tabelle DBF (dato che in questo formato il DB è considerata la
cartella dove si trovano le tabelle, che sono appunto i vari file DBF)
dopodichè utilizzi una variabile RecordSet normalmente...
Dim RS As RecordSet
Set RS = DBMain.OpenRecordset("MiaTabella")
Ciao
Faber
P.S.: occhio alla versione, a me funziona bene la 2 ma dipende da come hai
creato le tabelle

 campi1 - campo2 - campo3
Curiosita`: hai risolto? Come?
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: ricerche in stringa....

Mi serve verificare in una stringa che:
1) Esista la stringa "Tassativa il", e questo lo faccio con la funzione
InStr
2) Se trovo la stringa "Tassativa il" allora devo verificare se è seguita da
un valore data del tipo 01/01/1900
Come faccio ?
 
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 un valore data del tipo 01/01/1900
 > Come faccio ?
Dim Pos As Long
Dim SubS As String, Flag As Boolean
Pos = InStr(TuaStringa, "Tassativa il")
If Pos>0 Then
    SubS = Trim$(Mid$(TuaStringa, Pos+12, 11))
    If IsDate(SubS) Then Flag = True
End If
If Flag Then
   'Vuol dire che c'è quella data
End If
-- 
Quando noi ignoranti eravamo di più, tutto era più bello (A. Celentano).
  ___   _   ___ _  _______   _______ ___
|   \ /_\ | _ \ |/ / _ ) \ / /_   _| __|
| |) / _ \|   / ' <| _ \\ V /  | | | _|
|___/_/ \_\_|_\_|\_\___/ |_|   |_| |___|

Newsgroup: it.comp.lang.visual-basic
Titolo: Penna ottica

Ho la necessità di fare un programma che utilizzi la penna ottica sui codici
a barre;
non ho nessun idea di come interfacciare tale strumente con il visual basic.
Sapreste dirmi se esiste qualche ocx o del codice che possa aiutarmi?
vi ringrazio anticipatamente
li...@mediasystems.net

Esistono degli OCX di solito distribuiti dalle case di produzione delle
penne ottiche stesse.  Altrimenti ci sono le chiamate api... ma il lavoro
diventa più lungo.
Ciao

...

Newsgroup: it.comp.lang.visual-basic
Titolo: gestione I/O

Salve a tutti!
Avrei bisogno di alcune informazioni per risolvere un problema che ho con
VB.
Mi trovo nelle condizione di dover gestire una scheda, inserita nel bus ISA,
che viene utilizzata per getire dati di I/O con altri circuiti. Per il
funzionamento di tale scheda devo scivere o leggere un dato ad un indirizzo
compreso tra il 300H al 307H. Il dato ha la lunghezza di un byte e deve
essere poi disponibile per successive rielaborazioni. Il mio problema sta
nel fatto che questa operazione la devo fare usando VB, ma sono all'oscuro
di quali istruzioni si debbano usare per fare questo. Qualcuno sarebbe così
gentile da aiutarmi. Vi ringrazio findora.
-- 
Posted from 
mta23-acc.tin.it
 [212.216.176.76] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 gentile da aiutarmi. Vi ringrazio findora.
Ti seve una DLL che trovi sul sito comene (IO32) mi sembra, cmq cerca nei
post vecchi...
Ciao
--
Timothy Redaelli
timothy....@email.it

Newsgroup: it.comp.lang.visual-basic
Titolo: SENDKEYS NON SPEDISCE UN ACCIDENTE

Ciao ragazzi.
Sono alle prese con un mini progettino che dovrebbe avviare altre procedure
alle quali però per partire servono delle password e l'invio.
Ecco come ho fatto :
shell("c:\percorso\applicazione.exe"),1
sendkeys "password",true
sendkeys "{enter}",true
PERCHE' NON MI FUNZIONAAAAAAAA?
Si blocca sull'enter e per curiosità ho provato anche a "passare" il tab, e
non passa nemmeno quello.
Aiuto.
Elisa.
PS. ho provato anche a sostituire {enter} con ~ ma nulla da fare.

 non passa nemmeno quello.
mah, da me funziona...
Hai metto .default=true sul commandbutton del progettino che chiami?
ciao
ugo

 wrote in message
9m58tc$2mq$1...@pegasus.tiscalinet.it...


 non usa né {enter} né {tab} e funziona).
mmm...
la prima sendkeys, quella che ti riempie i campi utente e pass funziona?
se sě, limitati a mettere la .default sul commandbutton di Ok del programma
ricevente.
In ogni caso, perchč invece non permetti al programma ricevente di ricevere
(passami il gioco di parole...) anche username e password tra i parametri?
Mi sembra piů semplice e sicuro...   :)
ciao
ugo

 ha scritto nel messaggio
news:1zoh7.43589$TS4.1...@news2.tin.it...

prova così:
Dim vX As Variant
vX = Shell("D:\Giuseppe\VB\ADO\Classe_Connection\ClasseConnection.exe",
vbNormalFocus)
SendKeys "sa"
SendKeys "{ENTER}"
giuseppeD

 funzionare.
Guarda che quando succedono cose strane come questa è perchè ti sta
sfuggendo qualcosa!
Quello che dici non ha senso!
Ciao


Confermo:
doveva bastare nelle proprietą del Commandbutton.
C'č qlc che non va... cerca...
:)
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] unione stringhe SQL

Salve, come faccio a passare alla propietą recordsource del data control 2
stringhe SQL unite da AND o OR
esempio:
data1.recordsource = "SELECT FROM * tabella WHERE nomecampo = 'valore'" +
un'altra stringa simile???
Grazie Giovanni

 wrote in message
cSWS5.11840$s61.3...@news1.giganews.com...

se ho capito bene la domanda
data1.recordsource = "SELECT FROM * tabella WHERE nomecampo = 'valore'"  &
" and nomecampo = valore2"
ciao
max

 Grazie Giovanni
Non ho ben capito, perņ ci provo...............
data1.recordsource = "SELECT * FROM tabella WHERE nomecampo = 'valore'" & _
" AND nomecampo2='valore2' AND comecampo3='valore3'"
Ciao
Sirjo

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema di stampa su più pagine, aiuto!!!!!!

In un programma ho inserito una routine di stampa che legge i dati da
una ListBox e li passa alla stampante riga per riga. Fin qui tutto
funziona regolarmente e velocemente, sempre che per stampare il
contenuto della ListBox basti una pagina; se si va oltre, dopo che è
stata riempita completamente la prima pagina, il flusso di stampa
continua ma su ogni pagina nuova viene stampata una sola riga! Penso
vada usato il metodo  NewPage quando in ogni pagina sono state scritte
le righe che può contenere (che sono 20), ma non so proprio come
fare...se potete aiutatemi o butterò la stampante (che non c'entra poi
proprio per niente..:-) dalla finestra!
Questo è il codice della routine di stampa attuale:
Dim PosizioneVerticale As Integer, X As Integer, TotaleRecords As
Integer
Printer.CurrentX = 600
Printer.CurrentY = 1500
PosizioneVerticale = 1500
TotaleRecords = List1.ListCount
For X = 0 To TotaleRecords Step 1
    Printer.Print List1.Text
    Printer.CurrentX = 600
    PosizioneVerticale = PosizioneVerticale + 500
    Printer.CurrentY = PosizioneVerticale
    List1.ListIndex = List1.ListIndex + 1
Next X
Grazie a tutti!
--------------------
Stefano
--
Posted from 
ro...@soarisc.comune.firenze.it
 [159.213.248.2]
via Mailgate.ORG Server - 
http://www.mailgate.org

    Printer.CurrentY = PosizioneVerticale
      IF PosizioneVerticale + 500 > PRINTER.SCALEHEIGHT THEN
        PRINTER.NEWPAGE
      END IF

Newsgroup: it.comp.lang.visual-basic
Titolo: Come mai alcune api non sono contemplate

Ho trovato un esempio di utilizzo dell'ape SetFileTimeWrite sulla msdn, ma
quando l'ho cercata nel file win32api.txt, non l'ho trovata. Come mai? E' la
mia sfortuna o ci sono api minori che non sono strettamente necessarie
(infatti la suddetta ape, puņ essere rimpiazzata dalla migliore
SetFileTime).
Aspetto risposte in gran numero :-)
Grazie
Franco Stefanelli - Developer [VB5SP3]
- 
fras...@franco.geocities.com
 -
[Remove 'franco.' from my e-mail address in order to write me]
**************************************************************
http://www.geocities.com/SiliconValley/Haven/2388/
      *** Franco's
Developing Site ***
http://freeweb.aspide.it/freeweb/AnFStefanelliweb
       ***          My own
*** UPDATED!!!
http://www.reolcity.com/rolmagazine/home.html
           *** The Web-Magazine
which I write for ***


SetFileTimeWrite(), per quanto ne so NON e' una funzione delle API WIN32...
--
Roal Zanazzi
z...@iol.it

SetFileTimeWrite(), per quanto ne so NON e' una funzione delle API WIN32...
Infatti č quello! Resta il fatto che sulla msdn c'č un esempio di utilizzo
di quell'ape e il tutto funziona!
ByeZ...


Newsgroup: it.comp.lang.visual-basic
Titolo: far sparire il cursore

vorrei sapere come posso far sparire il cursore con le api  di win98


Funzione ShowCursor(), come parametro False se vuoi nasconderlo, True se
vuoi visualizzarlo.
----
Roal Zanazzi

 wrote in message
news:%PgW3.30988$s17.3...@typhoon.libero.it...


 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: MouseDown

Salve.
In una form, ho bisogno di un'etichetta che compia una determinata azione
quando il mouse č sopra, e che smetta di compierla quando lo sposto.
L'evento per il mouse sopra č MouseMove, ma come faccio a specificare il suo
allontanamento?
Grazie a tutti!
--
Gabriele "Stockton" Alese
PGP Key: 0x9FE09EEC
DH/DSS 4096/1024 - 3EBB 1554 2726 E9CC F923  B6DB 9DEF 9706 9FE0 9EEC
PGP Key available on keyservers


Un trucco potrebbe essere quello di posizionare il controllo su un altro
controllo. Quando l'evento MouseMove passa al 'contenitore', sai che è
uscito dal tuo controllo principale.
Non so se possa funzionare come 'contenitore' lo stesso Form, ma puoi fare
una prova.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 --
Hai ragione.
Grazie! :-)
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single,
Y As Single)
Form1.Caption = "Fuori"
End Sub
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Form1.Caption = "Sopra"
End Sub


Newsgroup: it.comp.lang.visual-basic
Titolo: dual processor di nuovo

grazie per avermi risposto ma avevo anche chiesto se creando i programmi con
Visual Studio 6 (con il visual basic)in NT questi gireranno anche in w95/98
Grazie
--
======================================================
Provate il contascatti per internet disponibile all'indirizzo
www.tucci.freeweb.org

 wrote in message
7tdcau$f7k$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Class Module

E' possibile passare come paramentro ad una sub o funzione, definita in un
modulo di classe, il valore di un
controllo (ad es. textbox) ?
Francesco.

Francesco ha scritto:

Certo
Ad esempio
Dim A As New clsA
A.SetNome Text1.Text
Dove nella classe clsA è definita una funzione
Public Sub SetNome(ByVal S As String)

 ha scritto nel messaggio
news:9puk9s$k1f$1...@newsfeed.cineca.it...


Perchè queste domande prima non le fai direttamente ??? :-)))
Comunque si!
CIao

 il form a sua volta contenente la textbox che cerco di passare.
Non capisco... questa č una domanda o la tua soluzione?
Ciao

la soluzione che ho descritto non  funge. Why?

 la soluzione che ho descritto non  funge. Why?
Allora spiega meglio cosa vuoi ottenere, perchč cosě come lo hai detto
funziona perfettamente.
Ciao


Eccetera un par di ciufoli :P
E' proprio l'"eccetera" che hai saltato a pie' pari a essere la soluzione
dell'errore.
Leggi bene quello che ti dice, se non lo capisci postalo intero.
Ciaotutti,
*
P.S. Si risponde SOTTO

sì, ma...
Non ti farà l'aggiornamento della textbox nel caso che modificassi il
testo...
Non so bene il perché, ma é così in qualsiasi subroutine anche nel progetto
iniziale...
deve essere un casino tra property (anche se immagino che per come sono
state costruite sia un po' diverso...).
Avanzo un'idea:
Classe textbox
Private m_text as string
Property get Text() as string
    text=m_text
end Property
Property Let Text(Value as string)
    m_text=Value
    RefreshContenutoTextBox
end Property
Se leggi il valore text ti viene automaticamente resa una copia della
variabile interna m_text, per avere aggiornamenti sulla textbox dovresti
richiamare direttamente la property Let.
In altre parole...
se vuoi cambiare il text di text1 devi farlo direttamente
Text1.text= "quello che vuoi scrivere"
Se vuoi alla classe puoi passare l'intero controllo...
Passa la textbox (probabilmente dovrai farlo come control o come object) e
dall'interno della classe leggi e modifica la textbox...
Oppure...
Fai la stessa cosa al di fuori della classe
Tipo:
Dim pippo as string
pippo=text1.text
miaclasse.miometodo pippo
Text1.text=pippo
Spero di non avere confuso le idee... ;)
                Ciao
                                Allanon
Newsgroup: it.comp.lang.visual-basic
Titolo: IP di connessione

Potete aiutarmi a risolvere questo grande problema?
Mi serve di vedere l'IP di connessione che il provider mi assegna ogni
volta.
Cosa semplicissima voi penserete ed infatti qualche mese fŕ grazie a
sorgenti trovati su internet č stato uno scherzetto realizzare un
programmino che mi restituiva ogni volta l'IP.
Cosa č cambiato adesso? Il pc su cui girava il demon e diventato un server e
quindi č collegato ad N Client, risultato il demon mi restituisce l'IP
assegnato alla scheda di rete 192.168.0.1
Come posso generare lo stesso demon che mi restituisca l'IP di connessione?
Vi ringrazzio anticipatamente
Jobbe

 volta.
Probabilmente c'è una api, cmq puoi sempre richiamare ipconfig (on winipcfg
su 9x) e vedere che ti dice :)
Ciao

 ha scritto nel messaggio
news:a5j2fn$ssh$1...@newsreader.mailgate.org...


 ha scritto nel messaggio
news:a5j2fn$ssh$1...@newsreader.mailgate.org...


Newsgroup: it.comp.lang.visual-basic
Titolo: [Crystal Report] Come aggiornare il report?

salve a tutto il Ng
ho un report creato con CR 8.5 e lo devo stampare con vb6 aggiornando
una query sql
il codice è
data = Format(DTPicker1.Value, "mm/dd/yyyy")
Dim crAPP As New CRAXDRT.Application
Dim Report As CRAXDRT.Report
Set Report = crAPP.OpenReport(App.Path & "\Bianco.rpt")
Report.PaperOrientation = crPortrait
Report.SQLQueryString = "SELECT DISTINCT Disposizione.N_Omb,
Disposizione.Settore From Disposizione Where Disposizione.Settore = "
& mioset & " AND #" & data & "# BETWEEN Disposizione.Dal AND
Disposizione.Al UNION SELECT DISTINCT Ombrelloni.N_Omb,
Ombrelloni.Settore From Ombrelloni Where Ombrelloni.Settore = " &
mioset
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Set Report = Nothing
Set crAPP = Nothing
praticamente mi visualizza il report tramite il crviewer senza
aggiornarlo ai dati attuali ma come l'ho salvato quando l'ho creato
con CR

è un problema del file RPT. Aprilo con l'editor, vai sotto il menù Database
e togli la spunta a "Saved with data"
o qualcosa del genere, non lo ricordo esattamente....
per sicurezza, vai nelle opzioni (menù File) e toglilo anche da lì, così
tutti i report che farai da oggi in poi saranno già a posto....
domanda: quando hai aperto l'anteprima, premi F5 per aggiornare i
dati......funziona, vero?
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 wrote in message
459d528a.03090...@posting.google.com...


 good coding!!!
Grazie mille ora aggiorna i dati come sono nel db, il problema è che
continua a fregarsene della query SQL che gli passo
in pratica il report visualizza tutto il db che gli ho collegato!

 in pratica il report visualizza tutto il db che gli ho collegato!
Dai un'occhiata sul Sc, c'è un progetto di esempio di gestione di crystal
report che avevo postato un po' di tempo fa.
Mi pare si chiamasse crysvr.
ciao
ugo

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

E possibile disabilitare alcuni tasti della tastiera e poi riabilitarli
senza dover ravviare il pc?
Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: Dbase gerarchici....

sono molto inesperto....vi pongo una domandona..
Ho un dbase gerarchico....dove 2 tabelle sono collegAte da una forign key
come faccio via software a visualizzare il record principale di una
tabella..e tutti i suoi collegati?
cioè io utilizzo un codice di questo tipo:
 Set ws = DBEngine.Workspaces(0)
 Set db = ws.OpenDatabase(App.Path & "/archivio.mdb")
 Set rs = db.OpenRecordset("FATTURE", dbOpenDynaset)
        rs.MoveFirst VADO SUL PRIMO RECORD
For X = 1 To rs.RecordCount
  frm_fatture!grl_fatture.Text = rs![codicefattura]  'ORA QUI SCORRO CON
QUESTO CICLO SOLO I REC DELLA TABELLA APERTA....E NON QUELLA COLLEGATA....
SO CHE BISOGNA UTILIZZARE MSSHAPE (ALMENO CREDO) MA CHI MI SPIEGHEREBBE IN
MANIERA ESAURIENTE COME FARE??
  frm_fatture!grl_fatture.Text = rs![codicepreventivo]
next x
grazie Fa

 ha scritto nel messaggio
news:3hQ78.28276$om6.7...@news1.tin.it...
CUT

Newsgroup: it.comp.lang.visual-basic
Titolo: [?][~OT] Metodologie di lavoro

Ciao a tutti.
Faccio una richiesta un po' strana.
Sto cercando quanta più documentazione on line possibile (possibilmente "in
pillole", altrimenti mi sarei laureato :)) su metodologie di lavoro per la
progettazione SW, la scrittura del codice, il lavoro di gruppo.
Come ad es.
http://italian.joelonsoftware.com/Articles/TheJoelTest.html
http://www.codeproject.com/gen/design/nfOORules.asp
cioè il contrario di
http://www.strauss.za.com/sla/code_std.html
anche se articoli ironici sono comunque ben accetti.
Qualcuno ne conosce (magari in italiano :P )?
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 
Puoi cercare articoli sul metodo Extreme Programming. Non so darti 
riferimenti precisi, ma con google dovrebbe essere fin troppo facile.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 Ciao
ciao
-- 
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://blogs.ugidotnet.org/pape

Newsgroup: it.comp.lang.visual-basic
Titolo: Tasti su portatile..

Ciao a tutti, chi mi da un consiglio su come utilizzare i 4 tasti presenti
sul mio notebook (che con il programma del portatile si possono usare per
navigare in internet, avviare la posta elettronica e altro..).
Voglio dire:
 a che cosa corrisponderà la pressione di uno di quelli? sarà tipo quando
schiacci il tasto "A" che corrisponde al numero 65 ?
Grazie e scusate la domanda stupida....

 ha scritto nel messaggio
news:4ovd7.11370$2L.4...@news.infostrada.it...

E se provi a fare un'applicazioncina con un semplice Form e controllare il
valore di KeyAscii che restituisce l'evento KeyPress del Form?
Ciao!
Esteban

 valore di KeyAscii che restituisce l'evento KeyPress del Form?
E' decisamente più probabile che si debba controllare KeyCode in KeyDown/Up.
L'idea però di "svegliarsi" un attimo è fondamentalmente buona.
Ciao


E' la prima cosa che ho provato, ma non segnala nessun tasto premuto!
Newsgroup: it.comp.lang.visual-basic
Titolo: PROBLEMI CON INTERRUZIONE TRAMITE DOEVENTS

Ciao a tutti,
utilizzo DoEvents per forzare l'interruzione di un ciclo abbastanza pesante.
Ora l'interruzione avviene ma non immediatamente alla pressione del famoso
tasto "Interrompi".
Ora anche se non fosse possibile bloccarlo immediatamente , vorrei trovare un
modo per far sě che non passi troppo tra la richiesta di blocco ed il blocco
effettivo.
Ringrazio anticipatamente
Giorgio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 tasto "Interrompi".
mago.cut
mago.poof
prova ad utilizzare un ciclo do while con una var booleana...
inizializza varstop=false
while (  not varstop)
.
.
wend
sub Interrompi_Click
varstop=true
end sub
e scrivi il subject in minuscolo...
mago.poof

 wrote in message
news:N8g_7.6395$WQ2.2...@news2.tin.it...

Ciao Mago , anzitutto grazie per la disponibilità.
Approfitto ancora un secondo:
Ho modificato il ciclo come mi hai detto: ho un'altra condizione che ho 
messo insieme a quella che mi hai suggerito tu.
Ti dico come era prima..
for each .....
  doevents
  if blnIterruzione = true then
    exit for
  end if
  ........
next
Ora ho modificato il for each con il while con 2 condizioni una delle
quali è sempre la condizione booleana di interruzione.
while condizione 1 and (not blnInterruzione)
  ......
wend
Ho tolto il Doevents , ho errato ?
Non mi ha cambiato nulla rispetto a prima: dove potrebbe essere l'inghippo ?
Ciao


 ha scritto nel messaggio
CUT
il difetto dipende dal fatto di essere "umani"...da quando il tuo cervello
pensa di interrompere a quando effettivamente schiacci il tasto per noi
passa poco tempo...per (non esagero) un pentiumIII 800Mhz passano anni! Sai
quanti record ad esempio ha già processato! E se anche lo stoppassi
preciso...ci sono buffer da svuotare, transazioni da annullare  e via
dicendo...considerà poi che tutto è asincrono!
...E figurati su un PentiumIV 2 Ghz!!!
Saluti!

 wrote in message
news:jzF_7.1477$LO4....@news2.tin.it...

  .... beh vedi , io non è che abbia troppe pretese , non avevo chiesto il
blocco istantaneo
  ma neanche che passassero 15 secondi.
  Con un pò di sbattimento sono comunque riuscito a limitare il tempo di attesa
a 3 o 4 secondi
  e questo per me va già bene.
  Ti ringrazio comunque dei tuoi preziosi suggerimenti.
  A risentirci

Newsgroup: it.comp.lang.visual-basic
Titolo: Shotdown

Salve ho realizzato un programma che attraverso il timer fa alcune 
operazioni tipo backup cancella file chiude programmi e poi spegne il pc.
Per spegnere il pc uso un modulo col comando shotdown.
Il problema č che spesso e volentieri ha problemi a spegnersi perchč ho non 
riesce a cancella re un file o un programma dice la memoria non poteva 
essere letta Insomma non si spegne per motivi tecnici. Io vorrei fare uno 
spegnimento forzato anche se lascio un file aperto o  chissa quale altro 
disastro voglio che si spenga. conoscete un sistema che non sia pagare 
qualcuno perchč venga a staccare la corrente? :-)) grazie
Ps se volete metto online il codice del modulo. 

 Ps se volete metto online il codice del modulo.
Dopo aver interpretato quello che hai scritto, ho capito che vuoi
forzare lo spegnimento del pc (Shutdown, non Shotdown).
Mi viene in mente un'idea veloce, far fare tutto al prompt dei
comandi...
Prova a fare così: al posto del comando x spegnere il pc, ti crei un
file batch e ci scrivi dentro questa riga:
Shutdown /s /f
Poi non mi ricordo come era in vb6, comunque esegui il file che hai
creato con Shell.
ciao,
Daniele

Prima di usare visual basic avevo un collegamento al desktop con quel 
comando  e spegnevo cosě il pc. allora la domanda diventa come utilizzo un 
file bat di dos in visual basic? 


Funzione Shell   >>  F1
o API ShellExecute  
http://allapi.mentalis.org/apilist/ShellExecute.shtml
--
ciao
  Stefano

 file bat di dos in visual basic?
Usando il comando shell
Shell "[file da eseguire]"
Ciao

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

Ho un manuale di VB3 acquistato anni fa e poi mai usato.
Quali sono le cose presenti su questo manuale che posso ancora
considerare attendibili (valide cioč anche per VB6) e quali invece
sono 'out'?
Grazie :)
--
Leo_duca



il copyright...
 :-)
a parte gli scherzi, per non incasinarti la vita, ti consiglio di lasciar stare e di acquistarne uno
nuovo...
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
---------------------------------------------------------------------------

Il mio manuale preferito (per le cose estremanente BASE) é proprio un
manuale di VB3 (della Apogeo) e secondo me é ancora un valido manuale per
imparare le basi... Ecco visti però il tempo trascorso... sarebbe bene anche
averne uno moderno... :) Molte cose sono cambiante e molte aggiunte... oggi
si accede ai Database con ADO per esempio...
                        Ciao
                                Allanon

 ha scritto nel messaggio
news:9mi3fs$2eiql$1...@ID-98670.news.dfncis.de...

Ciň provato :)) Come non detto!
Grazie a tutti!
--
Leo_duca