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

E' la terza volta che pongo questa domanda...
Come faccio a metter un'immagine come desktop?

Come faccio a metter un'immagine come desktop?
Nel registry c'è la voce
HKEY_USERS\Default\Control Panel\Desktop
che contiene la chiave Wallpaper.
Se ci dai un'occhiata con REGEDIT ti accorgerai che contiene il percorso al
file di immagine che vuoi cambiare.
Per modificare il contenuto del registry puoi usare il codice d'esempio che
credo sia sul sito comune, o in allegato a una delle precedenti lettere nel
NG.
Comunque, se hai un po' di tempo, sfoglia tra i siti linkati sul mio sito,
dove ho evidenziato "FREE CODE": sicuramente troverai qualcosa in merito.
Ciao
P.S. ATTENTO QUANDO MODIFICHI IL REGISTRY: FAI UN BACKUP!
--
-
MIX (VB5SP3)
post...@yahoo.com
80 links ai siti VB
http://space.tin.it/computer/gaais
http://www.tempolibero.com/user/mix/
 (alternativo)
-

 > Domenico


E' la terza volta che pongo questa domanda...
e' la prima volta che la vedo...:-)
cioe' ? in che senso, vuoi che la tua immagine preferita appaia come
sfondo sullo schermo??
con che sistema operativo??
manualmente o tramite un programma scritto in VB?
ciao,ciao
Maurizio
maum...@basta.tin.it
togliete basta. per rispondere
please remove basta. to reply
Newsgroup: it.comp.lang.visual-basic
Titolo: Package and Development Wizard (Unexpected error number 380)

Hi, I am new in here.  I just have a problem as following...
For some reasons, when I run the Package and Developemnt Wizard, 
The error message comes out after I click package
"Unexpected error number 380 has occurred: Invalid property value"
does anyone know the reason?
----------------------------
Ivan Lee
http://www.geocities.com/ginola79/

 does anyone know the reason?
mmmh have you installed SP5?
Faber


What do you mean? Is the SP5 the reason for the error or is it the solution?
Faber, come devo interpretare la tua frase?
A - "Non sarà che hai il problema perché hai installato il SP5?", oppure
B - "Hai provato ad installare il SP5 per risolvere il problema?"
Ciao, ;-)
Valerio

 B - "Hai provato ad installare il SP5 per risolvere il problema?"
B
:)
Faber

I have installed SP5, so you think I shouldn't install it ?

----------------------------
Ivan Lee
http://www.geocities.com/ginola79/

 I have installed SP5, so you think I shouldn't install it ?
IMO SP5 is the better that MS$ has ever released (at least for VB); I
don't know why you get that error message.
does it appear with every project?
Faber
P.S.: have you ever tried Inno Setup?  :)


----------------------------
Ivan Lee
http://www.geocities.com/ginola79/

What is IMO SP5 ??
:-)
IMO is an internet acronym: In My Opinion;
SP5 means Service Pack 5 (referred to Visual Studio of course)
-- 
hth, hal
Please try to quote better ;-)


[...]
8:48 Che ci fai qui a quest'ora?
E' ancora ieri sera, o ti sei comprato un portatile e ti colleghi la mattina
seduto sul Wc? :)))
Ciao
Alfonso.come fate a dormire meno di 6 ore

Alfonso.come fate a dormire meno di 6 ore
-- 
ciao, hal.zzzzz

it appears in every project ...but if I copy the whole project to
anyother computer, it works fine ....
is it because I am using DDR ram??

----------------------------
Ivan Lee
http://www.geocities.com/ginola79/
Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione a Postgre

Ciao a tutti, seguendo i vostri preziosi consigli ho installato Postgre 
8.0.3 (oltre a MSDE, per un per fare un raffronto), e l'interfaccia ESM 
PostgreSQL Manager Lite.
Se mi connetto con MSDE tutto ok, mentre con Postgre riesco a connettermi 
solo su locale. Ho configurato il file pg_hba.conf in questo modo per 
accedere da un client con IP 192.168.0.89  :
host           all            all              192.168.0.89 
255.255.255.0         ident sameuser
ma mi ritorna un errore.
In pratica, durante un accesso da client in rete va in timeout e indica di 
controllare che il server ascolti connessioni TCP/IP sulla porta 5432, 
mentre connettendomi in locale (sempre usando EMS) fila tutto liscio.
Il valore di listen_adresses è uguale ad '*' .
Ho anche provato con vari pc cambiando l'autenticazione come trust.
Le macchine in questione (client e server) girano con WinXp e WinXp sp2.
Dove sbaglio ? Ho forse installato male (ho installato lasciando quasi tutti 
i parametri di default, abilitano le connessioni in rete)?  Devo configurare 
altri file ?
Grazie anticipatamente. 

Proprio in questi giorni ho dovuto installare postgresql in ufficio, ma 
ho avuto il piacere di testarlo solo in locale (vabe' la faccenda č un 
po' piů lunga ma il resto non conta poi molto). Se avrň tempo, domani 
proverň a connettermici in remoto e vediamo...
-- 
Quando noi ignoranti eravamo di piů, tutto era piů bello...
(A. Celentano)
Per rispondermi in privato, togli prima l'immondizia dalla testa ;)

 Quando noi ignoranti eravamo di più, tutto era più bello...


Newsgroup: it.comp.lang.visual-basic
Titolo: Nuovo problema : Error code 28

Salve,
nell'installare un programma di cad che utilizza il "Microsoft Visual
Basic for Applications", mi da il seguente messaggio di errore:
<< Microsoft Visual Basic for Applications installation failed with
error code 28 >> 
Logicamente, il programma cad in questione non si installa se il VBA
non ha completato la sua installazione ... come fare per risolvere il
problema ? Grazie a tutti per l'eventuale risposta  ! Ciao ... :D
Frank

...



DesignWave 3.0 in versione Trial ... spero che questo dato serva a
risolvere il problema ... ciao !!! :)
Newsgroup: it.comp.lang.visual-basic
Titolo: problemino SULL'INSTALLAZIONE DEL PACCHETTO

HO COMPILATO UN PROGRAMMA IN VISUAL BASIC 6 , COMPLETO DI DATA REPORT,
SULA MIA POSTAZIONE, OVVERO DOVE LO HO COMPILATO NESSUN PROBLEMA MA
NON APPENA VADO AD INSTALLARE IL PACCHETTO SULLA MACCHINA DEL MIO
CLIENTE MI RESTITUISCE UN ERRORE DI "IMPOSSIBILE RECUPERARE UNA O PIU'
GRUPPI DI RIGHE DALLA FONTE DATI CORRENTE" QUALCUNO PUO' AIUTARMI...
SONO NELLA CACCA SE NON CONSEGNO IL SOFTWARE PER DOMANI!!!! PLEASE
HELP ME

 ha scritto nel messaggio
news:e38018a8.04012...@posting.google.com...

Attento!! Credo ti sia rimasto attivato il CAPS-LOCK!
-- 
Esteban
www.seber.it

Nell'A.D. 28 Jan 2004 09:59:37 -0800, 
adr...@interfree.it
 (adrena)
scrisse:

a parte il caps-lock incastrato...
quando dà il problema?
in avvio?
ci sono tutti i riferimenti corretti?
hai installato mdac corretto su macchina cliente?
ciao
Aran Banjo
-
C'è da chiedere cosa togliere nell'indirizzo ;)
Replay to: *[[banjo]]spamdim..@**
abilene.it
**

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET - Proprietà Environment.WorkingSet , funzionamento parziale ?

Salve a tutti
ho utilizzato la Proprietà Environment.WorkingSet  per rilevare il numero di
byte di memoria fisica associata al contesto del processo.
Nel pc di sviluppo
VS.NET
 professional - Windows 2000
rileva il valore
Copiato il file.exe in un pc con
Windows 98 , File ridistribuibile SP2
non rileva la memoria fisica.
La guida indica:
Requisiti
Piattaforme: Windows 98,.......
Quindi o è un problema circoscritto o la classe non rileva in presenza di
Windos 98 , quindi l'indicazione della guida è
errata.
Possibile avere una conferma ?
grazie
giuseppeD

Forse devi leggere meglio la guida...
Remarks
Windows NT 4.0, Windows 2000 Platform Note:  This property behaves as
described.
Windows 98, Windows Millennium Edition Platform Note:  This property always
returns zero.
HTH
--
Corrado Cavalli [Microsoft MVP]
UGIdotNET - 
http://www.ugidotnet.org


Giusto,
ho saltato la parte centrale e letto solo in fondo
grazie
giuseppeD

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

La proprietà Alignment della TextBox mi funziona su NT 4.0, ma non con Win95
no.
0 = Left Justify
1 = Right Justify
2 = Center
Qualcuno sa perche' ?
grazie
c...@eubico.it

...

Perché in W95 non ha mai funzionato, sin dal vb1alfa.
(Mi sembra si possa rimediare con un'APE, ma non sono sicuro)


Devi mettere la proprieta' MultiLine a True
e nell'evento KeyPress dovresti annullare l'invio (Chr$(13)) cosi':
Sub Text1_KeyPress(KeyAscii as integer)
    If (KeyAscii = 13) Then KeyAscii = 0
End Sub
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Scoprire se un form è caricato

Riprendo volutamente il subject di un vecchio thread trovato su google,
perchè credo che sia rimasto incompiuto:
Devo forzatamente scaricare (Unload e Set=Nothing) un datareport (per
semplicità, ragioniamo come se fosse un form), se questo è già stato
caricato.
Evitiamo cose tipo flag public da mettere a true nell'initialize e a false
nel terminate, e teniamoci come ultima spiaggia il fetch della collection
forms.
Avevo fatto così:
    If Not Form2 Is Nothing Then
        Unload Form2
        Set Form2 = Nothing
    End If
e non funziona. O meglio, funziona benissimo, ma se Form2 non è caricato lo
carica e poi lo scarica. Di fatto, entra sempre nell'IF.
Questo perchè Form2 è anche nome della classe, e i form sono
autoistanzianti, ossia non appena VB inizia a scandire la condizione
dell'If, trova un riferimento a Form2, e se questo fosse già stato scaricato
prima, lo carica, quindi is nothing restituisce falso, e col not davanti
entra nell'If.
Servirebbe quindi un altro operatore, ma sinceramente non trovo quale...
Idee?
Ciao
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...

 Alberto
Ciao
Andrea

 collection forms.
Ciao
Alberto

[Albe V°] scrisse:
(snip)
idea cattiva: memorizzare il nome del datareport in una variabile.
verificare se esiste coincidenza tra il nome del datareport e il nome di tutte
le form caricate.
controindicazione: il nome del datareport è "hard coded" al design, soluzione
poco flessibile
--
Salutoni
Sergio

 Alberto
Ciao
Andrea
Ciao
Andrea

 occupato ottieni un errore, quindi sai cosa è caricato e cosa no.
Che poi non sono altro che sistemi "esotici" per avere un flag pubblico come
voleva evitare Albe ...
Premesso che una soluzione sarebbe quella di evitare di usare le variabili
implicite e istanziare la propria variabile Form (a questo punto il test su
nothing funziona tranquillamente senza caricamenti inutili), per evitare
variabili globali, si potrebbe aggiungere una property in sola lettura alla
Form, con annessa variabile privata, da impostare nel load/unload (non
nell'inizialize/terminate, che comportano solo che la form sia istanziata o
meno, non caricata) e quindi testare con
If Form2.IsLoaded Then
    '[...]
End If
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Ciao
Ciao
Andrea

 pubblico :-)
Infatti... gli stavo indorando la pillola con una glassatura di OOP ;-)
Per evitare questi accorgimento, resta valido il discorso delle istanze
esplicite.

Newsgroup: it.comp.lang.visual-basic
Titolo: [URGENTISSIMO - VB5] Formule CR

Devo passare da vb a cr una formula contenente una stringa di testo molto
lunga, ma ho incontrato delle limitazioni di lunghezza (non so se di vb o di
cr)
Qualcuno sa spiegarmi qualcosa, tenendo conto che la mia stringa č maggiore
di 255 caratteri?
Inoltre č possibile attuare una specie di formattazione (grassetto, corsivo,
ecc.) al testo di una formula passato con la seguente sintassi:
CrystalReports1.formulas(0) = "Nome formula = 'testo formula'"
Grazie a tutti
lupo...@freemail.it

Scusate il doppio posting ,non l'ho fatto apposta
LuPo
Newsgroup: it.comp.lang.visual-basic
Titolo: Ma qual è il senso di questo comportamento di VB

Ciao a tutti,
ho perso mezza mattinata per il seguente inconveniente che non conoscevo.
Adesso che lo conosco mi chiedo quale senso abbia!
Riporto di seguito il codice:
Private Sub CommandButton1_Click()
    Dim numero As Integer
    numero = 1
    Call Provacal(numero)
    MsgBox Str(numero)  '********
End Sub
Private Sub Provacal(num As Integer)
    num = num + 10
End Sub
Perchè MsgBOX restrituisce "11" e quindi fa la somma della sottofunzione.... 
io ho chiesto MsgBox(numero) e non MsgBox(num)!
Forse c'è un senso... ma sinceramente non lo capisco! chiedo a voi di 
illuminarmi.
Ciao a tutti
Emiliano 

 ha scritto nel messaggio
news:tyXpd.223863$b5.10...@news3.tin.it...


 illuminarmi.
Un mio "vecchio" collega una volta mi disse "quando non fa quello che vuoi è
molto probabile che sia tu a sbagliare".
E fin'ora la teoria regge.
Ti consiglio di leggere i "concetti fondamentali di VB" nelle prime pagine
di MSDN.
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 End Sub
cut
prova:
 Private Sub Provacal1(byVal num As Integer)
     num = num + 10
 End Sub
 Private Sub Provacal2(byRef num As Integer)
     num = num + 10
 End Sub
byRef standard in VB6
byVal standard in Net (
vb.net
)
il caso è semplice ma se la cosa fosse molto più complicata (o il lavoro
fatto da molte mani diverse in tempi successivi)e non te la senti di
rischiare
 Private Function MiaFunzComplicata(byVal n1 As Integer,byVal n2 As
Integer...byVal n-n As Integer) as integer
    dim ValRitorna as Integer
    ....esegui quello che vuoi.....
    MiaFunzComplicata=ValRitorna
 End Function
(logicamente il tipo di variabili e è solo per esempio)
Ha il vantaggio di essere chiara a dispetto di 2 righe di codice in più e
del cambio da Sub a Function
-- 
Il Wodkino Nazionale è a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 Demo classe vb.NET :
WodkaThumb 
www.villaceleste.it
  click su "spippolando e
Programmando"
---
Messaggio scannerizzato e certificato "Virus free" da AVG free edition.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.797 / Virus Database: 541 - Release Date: 15/11/2004

 piů e del cambio da Sub a Function
bho, io lascio sempre tutto byref e all'interno delle sub/func uso sempre e
solo variabili globali o di routine ma non tocco mai ( o quasi ) quelle
passate. E' una mia costrizione mentale, i parametri di una sub non si
toccano, si leggono, si passano a variabili di sub e poi o si restituisce
alla Function o ad una variabile globale.
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Eliminare scheda da una ssTab

Come si può eliminare una scheda da una ssTab ?
Inizialmente avevo inserito 5 schede ma me ne sono servite 4 e adesso nella
proprietà di ssTab non trovo 'Elimina scheda'
Grazie, Alberto



C'e' Conteggio Schede nella prima pagina delle proprieta' dell'ssTab.
Saluti.
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD

 wrote:

No, però a design time puoi fare come suggeritodi da Rondinini, a runtime, invece, puoi usare la
proprietà Tabs che determina il numero di schede totali della SSTab.
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
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: date per chi usa mysql

ciao
qualcuno di voi utilizza mysql con visual basic .net?
vorrei sapere per l'utilizzo delle date e il passaggio tra i due
grazie

Francuzzo ha scritto:

MySql utilizza il formato yyyy/mm/dd quindi prima di inserire un
record in una tabella Mysql con campo date o datetime devi convertire
la tua data in questo formato
Ciao
M.Lai

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO CONVERSIONE DA FILE TESTO A FILE GRAFICO

Ho necessita' di incollare un file testo in un file immaggine (.bmp).
Mi hanno suggerito di convertire il file testo in (.bmp) e poi incollare le
due immaggini.
Non so come convertire il file testo. Qualcuno mi può dare una mano.
Oppure c'e' un modo in Visual Basic per incollare un file testo su un file
.bmp.
Grazie per l'attenzione
Flavio

...


Flavio
Puoi provare cosě:
Prendi una Picture (anche invisibile).
Setti:
Picture1.Autoredraw=true
Picture1.BorderStyle=0 'none, per non sbagliare le misure, escludendo il
bordo
Apri il file di testo.
Leggi una riga alla volta e la stampi sulla picture:
MaxWidth = 0
do while not eof(#1)
    Line Input #1, Riga$
    'Autoredraw ciuccia parecchia memoria, ottimizzo le dimensioni della
picture
    picture.height = picture.height + picture.TextHeight(Riga$)
    if picture.TextWidth(Riga$)>MaxWidth then
        MaxWidth =picture.TextWidth(Riga$)
        picture.Width = MaxWidth
    end if
    picture.print Riga$
loop
SavePicture(Picture1.image, FileName$)
Attenzione:
SavePicture ti salva l'immagine come 24 bit.
Autoredraw serve per fare in modo che le parole non si cancellino.
Setta i font come piů ti aggrada: quello che vedi nella picture č l'immagine
finita.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Compilatore di reports

Abituato ad utilizzare i Reports di Access cerco un buon compilatore di
Reports sotto VB; ho già provato Crystal Reports e sinceramente non mi ha
soddisfatto molto in fatto di facilità d'uso e di velocità di esecuzione.
Io mi imbatto sempre in problematiche di Reports e sottoreports quindi mi
servirebbe un prodotto che abbia queste funzionalità prioritarie!!
Grazie della collaborazione.
Diego

 wrote in message
876o9b$ndm$1...@fe1.cs.interbusiness.it...


 wrote in message 879bvp$2ud$1...@nslave2.tin.it...


Con VB6 è possibile creare dei report sullo stile di Access, sono dei form
che verranno compilati interni all'exe, si ottengono solo se usi il data
environment, ma sono milto più simili a quelli di Access che a quelli di
Crystal report.
--
Bye from WildSkin
ICQ #48778908
--------------------------------------------------------------------------
Sito ufficiale del NG it_comp_lang_visual-basic
http://www.murialdo.it:8000/it_lang_vb/
--------------------------------------------------------------------------


 > Ciao e grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione errori

Dovrei controllare la presenza del mio file .jpg, per questo ho controllato
l'esempio datomi con il vb5 Enterprise sulla gestione degli errori,  ma non
ho capito molto.
Qualcuno può inserirmi un esempio codice da digitare nel form_load, per
farmi capire (magari con commenti) come devo operare? Quale è il concetto da
seguire ?
Private Sub MDIForm_Load()
    Percorso1 = App.Path
    pctSfondo.Picture = LoadPicture(Percorso1 + "\Utilizzi\Principale.jpg")
<<<< Errore se non c'è il file
End Sub
Ringrazio tutti : Giacomo 
ande...@tin.it

seguire ?
Controlla prima l'esistenza del file:
Private Sub MDIForm_Load()
    If Dir$(App.Path & "\Utilizzi\Principale.jpg") = "" Then
    ' Il File manca, non caricare niente, oppure avvisa l'utente:
    MsgBox "Manca il file di sfondo, me lo invento ?"
    Else
        pctSfondo.Picture = LoadPicture(App.Path &
"\Utilizzi\Principale.jpg")
    End If
End Sub
Su una sola riga e senza avvisi:
If Dir$(App.Path & "\Utilizzi\Principale.jpg") <> "" Then pctSfondo.Picture
= _ LoadPicture(App.Path & "\Utilizzi\Principale.jpg")
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com


Per gestire gli errori ci sono essenzialmente 2 modi di operare:
1) prevenzione: controlli le eventuali fonti di errori, in modo da prevenire
l'esecuzione di operazioni che potrebbero dare errore. Esempio:
     Percorso1 = App.Path
    If(Len(Dir(Percorso1 + "\Utilizzi\Principale.jpg")) = 0) Then
        ' <<<< Errore se non c'è il file
        MsgBox "ERRORE, file non trovato!"
    Else
     pctSfondo.Picture = LoadPicture(Percorso1 + "\Utilizzi\Principale.jpg")
    End If
2) gestione "a posteriori": usi il meccanismo di error-handling di VB (On
Error...). Esempio:
    On Error Goto Error_Handler
     Percorso1 = App.Path
     pctSfondo.Picture = LoadPicture(Percorso1 + "\Utilizzi\Principale.jpg")
    Exit Sub
Error_Handler:
    ' Qui puoi anche verificare il numero dell'errore, usando l'oggetto Err
(vedi help in linea)
    ' <<<< Errore se non c'è il file
    MsgBox "ERRORE, file non trovato!"
Questi due modi di operare possono anche essere mischiati e/o usati
contemporaneamente.
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT forse] VB, SQL Server e Access

Sto provando un programma in VB fatto da altri che gira su SqlServer e
utilizza un mdb, ma io non ho SQlServer, allora uso una connessione
MicrosoftJet 4.0. sul mio PC.
Ho le idee molto confuse perchè non conosco SQLServer. Il programma mi dà
una serie di errori quando trova nel DB dei campi Null e li vuole attribuire
a delle TextBox, ma in ambiente SqlServer mi hanno assicurato che problemi
non ce ne sono.
Che differenza c'è tra i due ambienti (molte immagino) riguardo a questo
problema dei Null? Hanno fatto uno script sql che elimina i null dal DB, ma
questo come agisce, solo in fase di creazione delle tabelle o può eliminarli
anche dai record creati run time?
Io non posso utilizzare questo script, immagino, non avendo il server. Ho
fatto una gran confusione anche nel fare le domande perchè non conosco bene
l'argomento. Se qualcuno mi potesse chiarire le idee... oppure consigliarmi
qualche testo mi farebbe un grosso favore.
Ciao a tutti
Fulvia

 wrote in message
news:8pB96.96$lT5....@twister1.tin.it...



Oltra a quello, puoi assegnare a qualsiasi campo il valore Null (dall'
Enterprise Manager CTRL + 0) cosa che invece con Access non puoi ...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] x moreno

Bene o male si riesce anche con outlock, anche se con qualche piccolo
raggiro  :)))
Ciao
            ..*---====~^°|MaViMo|°^~====---*..
-- 
Posted from [62.10.92.110] by way of 
oe70.law12.hotmail.com
 [64.4.18.205] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

raggiro  :)))
aaahhh, lasciamo stare... outlook... brrrrr..... :-)
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
---------------------------------------------------------------------------

Ciao
Che cosa?
Mai sentito parlare di "quotare"?
(non in borsa)
Ciao

 ha scritto

si'.
nel linguaggio militare, se non sbaglio.
"quotare una postazione nemica"
o giu' di li' :)

Newsgroup: it.comp.lang.visual-basic
Titolo: Access2000 e VisualBasic

E' possibile utilizzare un db Access2000 con Visual basic al posto del
solito access 97????
grazie

solito access 97????
Zierto che sě... basta modificare la stringa di connessione (ADO) (jet 4.0) od utilizzare la
versione 3.6 di DAO....
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
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:3b603...@news2.prserv.net...


 ha scritto nel messaggio
news:3b603...@news2.prserv.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: rogne con Adodc1.Recordset.AbsolutePosition

Ciao a tutti,
volevo fare in modo da visualizzare il numero del record corrente
nella caption del mio controllo ADODC usando la seguente istruzione 
Adodc1.Caption = Adodc1.Recordset.AbsolutePosition
ma non c'e' verso di ottenere risultati validi.... intanto quando
visualizzo in una griglia DataGrid il recordset mi trovo SEMPRE il
primo campo del primo record in visione azzerato, e in piu'
spostandomi vedo che la Caption dell'Adodc1 varia ma con senso
piuttosto relativo, partendo da 2 (al primo record) andando a 1, poi
di nuovo 2, 3,4 etc. e quando torno su cambia i numeri ad alcuni
record (tipo il 2 e il 4 risultato entrambi 2 etc.) insomma, che
succede?



 ha scritto nel messaggio
news:3a64dc9a...@news.tin.it...


 ha scritto nel messaggio
news:3a64dc9a...@news.tin.it...


Access, Oracle, SQL-Server?
Access, uso un file mdb da cui devo prendere dati e visualizzarli, con
DAO tutto apposto, con ADO mi sballa il contatore del record
corrente... ggrrrrrr

Stessa situazione?
piu' semplice : ho un controllo ADODC e sull'evento WILL_MOVE c'ho
messo l'update della Caption con .AbsolutePosition visualizzato, ecco
bell'e' fatto un generatore casuale di numeri :)) scherzo, scherzo, e'
che come ho detto mi salta da un numero all'altro salendo e scendendo
per il recordset e associando doppioni a record diversi ai quali da'
una posizione in salita e una diversa in discesa :) !

 una posizione in salita e una diversa in discesa :) !
Ti posto una parte dell'help, l'ho riletta tante volte e continuo a non
capire niente:
Osservazioni
Utilizzare la proprietà AbsolutePosition per spostarsi su un record in base
alla relativa posizione ordinale all'interno dell'oggetto Recordset oppure
per determinare la posizione ordinale del record corrente. Il provider deve
supportare la funzionalità appropriata per rendere disponibile questa
proprietà.
Allo stesso modo della proprietà AbsolutePage, AbsolutePosition è basata su
1 e corrisponde a 1 quando il record corrente è il primo record del
Recordset. Per ottenere il numero totale di record contenuti nell'oggetto
Recordset, utilizzare la proprietà RecordCount.
Quando si imposta la proprietà AbsolutePosition, anche se su un record della
cache corrente, ADO carica di nuovo nella cache un nuovo gruppo di record a
partire dal record specificato. La proprietà CacheSize determina le
dimensioni del gruppo.
Nota   Si consiglia di non utilizzare la proprietà AbsolutePosition come
numero di record sostituito. La posizione di un determinato record infatti
cambia quando si elimina un record precedente. Non è affatto sicuro inoltre
che a un determinato record sarà ancora associata la stessa proprietà
AbsolutePosition se l'oggetto Recordset viene utilizzato per una query o
riaperto. Si consiglia invece di utilizzare i segnalibri per memorizzare e
individuare facilmente una data posizione e per posizionarsi in tutti i tipi
di oggetti Recordset.

 ha scritto nel messaggio
news:947bb1$g09$1...@news.IT.net...


 "numero" del record su cui sei posizionato? L'utente finale che se ne fa?
Questo è vero.
Ciao
Basty

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ActiveX: proprietà "Informazioni..."

Sigh... non ricordo più come far apparire "Informazioni..." nella finestra
delle proprietà di un ActiveX.
Ho inserito:
Public Sub ShowAboutBox()
    frmInformazioni.Show vbModal
End Sub
ma sembra non bastare!

 wrote in message
news:V5Uy8.107753$SR5.2...@twister1.libero.it...

Secondo me "sembra non funzionare" sarebbe meglio.
Cmq,. prova col menù Tools dell'IDE di VB:
    Tools --> procedure attributes.
    Scegli la "procedures" e scrivi la descriziones ;)
ciao,
Dads.

     Scegli la "procedures" e scrivi la descriziones ;)
Grazie!

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

Salve .Ho un problema ovale.
Devoconvertire numeri da decimale ein esadecimale OK
Uso la funct. Hex.
Poi da esadecimale li devo convertire in decimale.
Che cavolo di funzione devo usare.
Non ditemi che bill non ha pensato a ci?.
Se ? vero , scusate il linguaggio , ma ? propi un cazzone ....
Paolo B

 Poi da esadecimale li devo convertire in decimale.
Val("&H" & trim(sStringaEsadecimale)) ' Stringa del tipo "D4", "D1AE",
etc.
oppure, meno paracula:
Val("&H" & sStringaEsadecimale)
Ciao
Flavio Ronco
-- 
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

Grazie della risposta.
Mi vergogno di non aver letto meglio la documentazione e chiedo scusa per il
linguaggio sconcio che ho
usato.
Chiedo anche scusa al buon Bill che in effetti aveva pensato a ciň.
Grazie ancora

 Chiedo anche scusa al buon Bill che in effetti aveva pensato a ciň.
A Bill NON si chiede mai SCUSA!
Gianluca.
Newsgroup: it.comp.lang.visual-basic
Titolo: file .OCA

alcuni OCX hanno un relativo file .OCA.
Cos'è?
va incluso nel kit?


Dai un'occhiata qui:
http://support.microsoft.com/support/kb/articles/q149/4/29.asp
Io non li includo nei pacchetti di installazione.
Ciao.
-- 
Skysurfer

Newsgroup: it.comp.lang.visual-basic
Titolo: barre degli strumenti universali ?

metti una toolbar nell'mdi e gestisci il clic sulla toolbar in base
all'activeform (non mi ricordo se c'e' anche un activefield o simile).
in alternativa mettila sul child.
nb solo che per mantenere il bold nel db il field dev'essere un memo e il
controllo testo un rtb, che pesa abbastanza. questo per ogni campo che vuoi
formattato. non so se consigliartelo.
piuttosto tieni un txt normale, con carattere settato a bolf, rosso, ql che
vuoi.
poi magari stampa su un rtb, gestendo la formattazione, e manda in stampa il
rtb.
hth pal

...


 wrote in message


Ti ringrazio molto per la tua soluzione, la prenderò in considerazione, so
di essere un rompiscatole ma avevo bisogno di alcuni chiarimenti se non ti
recano perdite di tempo.
Ho creato con VB 6.0 un EXE std con form MDI poi con Visual data ho creato
un nuovo database "clienti" in formato ".mdb" (Access ver. 7.0).
il nocciolo del programma è quello di interagire con il database tramite dei
form da me creati per l'inserimento dati, alcuni form dovranno poi
visualizzare questi dati in combo e memorizzarli in un'altra tabella del
database "clienti".
Domanda: qual è il modo migliore per collegare il database "clienti" a VB
nel modo più semplice e veloce da gestire (tenendo presente che il tutto
dovrà essere aggiornabile in qualsiasi momento dall'utente)?
cosa mi consigli
ti ringrazio per il tuo interessamento  BY Marco - GRAZIE MILLE -
pal ha scritto nel messaggio ...


 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: Titolo della finestra

Ho visto che alcune applicazioni nascondono il titolo della finestra.
Come fanno ?
Grazie.
c...@eubico.it



 
Tolgono i tastini di ridimensinamento e chiusura con:
	Form1.MinButton = false
	Form1.MaxButton=false
	Form1.ControlBox=false
	Form1.Caption = ""
A designe time ovviamente va benissimo.
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Se non ho capito male la tua domanda.. basta settare la caption del form
come stringa vuota ...=)




Newsgroup: it.comp.lang.visual-basic
Titolo: vb6

Sarei interessato all'acquisto di VB6... ma che ci trovo in piu'
rispetto a VB5 oltre alla, suppongo, maggiore "pesantezza"?
Grazie, lucio


-----------
Ciao
I miglioramenti sono parecchi, anche se non paragonabili a quelli intercorsi
tra le versioni 4.0 e 5.0. Come tutti i prodotti Microsoft di ultima
generazione, anche VB6 è orientato a Internet: da segnalare la possibilità
di creare pagine HTML che possono essere inserite direttamente nel
programma. Inoltre, ci sono nuove funzioni per la distribuzione di
applicazioni e per la condivisione di componenti all'interno di un gruppo di
sviluppatori.
Fra le novità di maggior spicco, si possono restituire array come valori di
ritorno delle funzioni e si possono (finalmente) utilizzare i tipi definiti
dell'utente come parametri delle chiamate a funzione.
Le novità non mancano, mentre ciò che scarseggia è l'attenzione da parte
degli sviluppatori di Visual Basic. Pensa che, dopo pochissimo tempo
dall'uscita di VB6, Microsoft ha messo a disposizione un Service Pack per
correggere alcuni errori.
Detto questo... a te la scelta!
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: object.close AIUTATEMI!!!

Come funziona questo comando?
Sapete indicarmi un sito dove scaricarmi una guida di visual basic?
GRAZIE1000

 wrote in message 8ja1su$6bk$1...@serv1.albacom.net...


 ha scritto nel messaggio
news:8ja1su$6bk$1...@serv1.albacom.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: Espellere il CD dal drive

Conoscete qualche cosa per ottenere l'espulsione del CD? Forse una chiamata
API...

si puň fare, l'ho fatto, ma non me lo ricordo piů! :-)
Guarda tra le API del MCI
La risposta č lě
Spartaco


Newsgroup: it.comp.lang.visual-basic
Titolo: DbGrid e tasto Invio

La pressione del tasto Invio in una DbGrid sposta il cursore sulla cella a
destra.
Vorrei far si che il cursore rimanesse nella posizione in cui si trova.
C'č qualche modo che voi sappiate?
Nota 1: ho provato a mettere il keyascii=0 nell'evento keypress ma non
sortisce alcun risultato.
Nota 2: il problema sarebbe risolto in effetti con un SendKeys "{LEFT}" alla
pressione del tasto invio stesso. Perň il problema stavolta č che premendo
invio devo fare delle operazioni dipendenti dalla colonna in cui mi trovo, e
la soluzione Invio + SendKeys Left non mi permette di fare la cosa giusta se
mi trovo o sull'ultima o sulla penultima colonna (se identifico
correttamente l'una, non identifico piů correttamente l'altra). Qualche
idea???
Grazie a tutti in anticipo.

 sortisce alcun risultato.
Prova con l'evento KeyDown:
If KeyCode = 13 Then KeyCode = 0
Dovrebbe funzionare.
Bye, G.
-- 
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

Dovrebbe funzionare.
Funziona perfettamente! Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Avviare programma prima del LogOn di NT

Ho la necessità di avviare il mio programma all'accensione di una macchina
NT non presidiata, come posso fare visto che non ho la possibilità di
premere
Ctrl-Alt-Canc?
Ciao Antonio!

Puoi creare un nuovo servizio per nt.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Help, ordini via modem!

Mi è stato richiesto un programma di
gestione ordini (e fin qui tutto bene) 
che permette al rivenditore di inviare 
l'ordine in ditta tramite modem (ohi, ohi).
Avrei bisogno di consigli, suggerimenti e
quant'altro mi permetta di risolvere il 
problema della trasmissione dei dati via modem.
Grazie. Anna Maria
aia...@tin.it
--
Posted from 
mail.tin.it
 [194.243.154.49]
via Mailgate.ORG Server - 
http://www.mailgate.org

...


> usa RAS e fai una banale copia di file, ? il metodo pi? veloce senza
dover
  > acquistare software di terzi.
  > bye
  > Mauro Mariz
  > 3nto
Che cos'? RAS ?
Maurizio
--
Posted from 
smpt.crtn.it
 [194.185.204.150] (may be forged)


Remote Access Service, o servizio di ACCESSO REMOTO (Start \ Programmi \
Accessori \ Accesso Remoto). Quello che, in pratica, si usa per collegarsi
da Win9x ad internet.
bye
Mauro Mariz
3nto
Maurizi...@ITCCCRT0.crtn.it
 ha scritto nel messaggio ...


Newsgroup: it.comp.lang.visual-basic
Titolo: solito autorun

Salve a tutti,
la mia richiesta sicuramente ha gia' avuto parecchia "letteratura" , ma
qualche anima gentile puo' aiutarmi? Devo distribuire un'applicazione
scritta in VB che interfaccia dati da database Access su un CD
autoinstallante! Aiuto, sono un principiante!!
Grazie in anticipo.

 wrote in message
37971053...@unina.it...


autoinstallante! Aiuto, sono un principiante!!
Hai ragione, il thread è stato ampiamente discusso in un passato non troppo remoto...
se vai su 
dejanews.com
 potrai rileggertelo con calma....
Comunque:
Il CD deve automaticamente eseguire il programma oppure installare il software?
se la risposta è "La prima che hai detto", beh, allora si da il caso che faccia un salto su Deja...
se invece è "la seconda che hai detto", allora basta che, nel file autorun.inf specifichi il nome del file di setup
(alcuni dicono si tratti di Setup.Exe... ^__^)
Ciao,
Moreno
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
Home Page - 
http://www.geocities.com/SiliconValley/Bridge/1414/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto connesssione ad db con ADO...

Salve,
come da subject, chi mi aiuta 1 attimo a chiarire come funziona ADO?
Cominciamo con 1 esempio semplicissimo, diciamo che io ho nel mio pc un
database
Access, (C:\Temp\skunk.mdb) aiutatemi a vedere un eventuale stesura di
codice per collegarmi e fare un po di operazioni su questo db. Iniziamo.
Private Sub Command1_Click()
    Dim strDbPath As String
    Dim rs As Recordset
    strDbPath = "C:\Temp\skunk.mdb"
creo una connessione al database
    connection.Open strDbPath
creo un comando
    Command cmd = New ADODB.Command
    fingiamo che nel db skunk esista la tabella mp3 e che sia composta
dai campi titolo e autore
    cmd.CommandText = "Select * from mp3"
eseguo il comando
    ho trovato in rete un esempio dove spiega che mettere qui, ma non
ho mica capito a che si riferiscono quei campi, ti ricopio
    quanto c'č scritto:
    connection.Execute(TestoComando, Recordinteressati, Opzioni)
    command.Execute(RecordInteressati, Parameters, Opzioni)
    Recordset.Open Fonte, ConnessioneAttiva, TipoCursore, TipoBlocco,
Opzioni
vorrei cercare un record
    rs.MoveFirst
    Do While Not rs.EOF
        Debug.Print "Titolo: " & rs!titolo & " Autore" & rs!autore
        rs.MoveNext
    Loop
End Sub
Finito cosě? Questo č quanto?
Aspetto news, grazie.
Saluti, ciao ciao.





Prima di tutto 
creati una connessione ODBC con il tuo database, cioè da pannello di controllo 
---> Origine Dati ODBC ---> con Win98 vai sulla cartella DNS di sistema e 
da qui clicca su aggiungi , ti chiederà di selezionare il driver per l'origine 
dei dati, tu seleziona MICROSOFT ACCESS DRIVER, cliccando su fine ti apre una 
finestra dove devi inserire il nome dell' origine dati, dagli un nome che abbia 
senso con il database che vuoi collegare, poi clicca sul pulsante database e 
seleziona il database access che vuoi utilizzare, nel tuo caso Skunk. e poi dai 
OK.


 


In visual basic 
scrivi


 


dim cn as 
adodb.connection


dim rs as 
adodb.recordset


dim strsql as 
string


 


 


Set cn = New 
ADODB.Connection
cn.ConnectionString = "MSDASQL.1;Persist Security 
Info=False;Data Source=qui inserisci il nome che hai dato per l'origine dei 
dati"
cn.Open


strsql = "select * " 
& _
        "from mp3"
Set rs= New 
ADODB.Recordset
Set rs.ActiveConnection = cn
rs.LockType = 
adLockOptimistic
rs.CursorType = adOpenKeyset
rs.Open 
strsql


 


if not rs.eof 
then


    
    Do While 
Not rs.EOF
        Debug.Print "Titolo: " 
& rs!titolo & " Autore" & 
rs!autore
        
rs.MoveNext
    Loop


end 
if


 


rs.close


 


Spero di esserti 
stata utile ciao Manuela



 Spero di 
  esserti stata utile ciao Manuela


 


UTILISSIMAA!! 
  Grazie mille, poi forse ho da farti qualche domanda ma...poca cosa :) Grazie 
  ancora.


 


Saluti, ciao 
  ciao.







Se posso aiutarti 
molto volentieri ciao Manuela
Newsgroup: it.comp.lang.visual-basic
Titolo: barra degli strumenti

Ciao ragazzi,
stò programmando un server chat, vorrei aggiungere
nell'interfaccia di controllo un pulsante che
nasconda il pannello stesso e crei un icona nella
Task bar (dove c'è l'orologio per intendersi) in
modo simile al server MySQL.
Come potrei fare?
Claudio

 Task bar [tagliato]
io sto facendo proprio la stessa cosa!
un server chat!
cerca l'oggetto "system tray icon...", mi hanno già risposto...
puoi cercare anche "Shell_NotifyIcon" nella guida di vb (MSDN cd.2).
ciao,
Andrea

 ha scritto nel
messaggio
news:nEIf8.27530$Ns4.1...@news2.tin.it...


 [tagliato]
nessuna... ;)
per ora ho un solo server e una sola "stanza"
insomma, una chat molto semplice per scambiare info con pochi amici.
se vuoi sapere come identifica il server i vari client, bè, per IP e per
nick.
il server ha una lista degli utenti collegati e fa da ripetitore.
un client invia un messaggio al server e il server lo rimanda a tutti i
client collegati.
cioè, collegati si fa per dire visto che uso udp.
intendo quelli che hanno mandato il messaggio iniziale di presentazione e
non hanno ancora mandato quello di cancellazione...
e se a uno gli crasha il pc... ummm... devo aggiungere un qualche
controllo... per ora mi resta in lista...
data base o no?
se hai intenzione di creare una chat seria usa un database strutturato bene.
non so quanto ti convenga creare un listone unico in memoria e scorrerlo
ogni volta che passa un messaggio, se ho capito bene...
io faccio una cosa simile, anzi addirittura molto peggio!
i dati li tengo come stringhe in una listbox che è comoda da controllare.
ma ripeto, io ho pensato la mia chat per 10 utenti al massimo.
la mia preoccupazione maggiore è andata alla crittografia dei pacchetti...
e poi se ho scritto str*****e è che sono le 5.17 e sto ancora d'avanti al
pc.
ciao,
Andrea

 Andrea
Ciao
Claudio
Newsgroup: it.comp.lang.visual-basic
Titolo: Visual basic ed excel

Ciao
sono nuovo sia del gruppo che del visual basic
muovo i miei primi passi nello studio del visual basic per via di una
necessità che credo si possa risolvere mediante tale applicativo
spero qualcuno possa aiutarmi o magari indirizzarmi e scusate se scrivo
banalità o stupidaggini
L'applicativo di cui necessito deve essere capace di modificare il contento
di una determinata cella all'interno di un certo numero di fogli excel.
Grazie a chiunque mi risponderà

Agamennone ha scritto:


Puoi usare OLE usando l'associazione tardiva dell'oggetto di automazione,.
Dim objXL As Object
Set objXL = CreateObject("Excel.Application") 
With objXL 
    .Workbooks.Open "NomeFile.xls", , True 
    .Cells(1, 1).Value = "Scrivo nella cella A1!" 
    .Workbooks("NomeFile.xls").Save 
    .Quit 
end With 
Set objXL = nothing 
Questo apre il file NomeFile.xls e scrive nella Cella A1, se devi scrivere
in più files dovrai inserire il codice in un Loop al quale passerai il
nome del File singolo.
Chiaramente se ti prendi Excel ed accedi al suo modello Oggetti tutto
questo ti si chiarisce leggendo l'Help.
@Alex
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Non ho capito.
Se Excel non c'č, cosa modifichiamo?
-- 
---------------------------
Mauro Gamberini
http://www.riolab.org/
 

 Se Excel non c'č, cosa modifichiamo?
penso che intenda modificare un file excel accedendovi come file binario...
ciao ciao
Syd Heep


 Inviato via 
http://arianna.libero.it/usenet/
Intendo dire che vorrei modificare il file xls e visualizzarlo con il solo
xlsViewer per esempio,
quindi senza la necessità che MSexcel sia installato.
Ripeto quel codice funziona solo se ho installato solo MS excel!!!!
Mi piacerebbe farlo funzionare senza che MS excel sia installato.
Grazie


 Grazie
Scusa ma, per fare una similitudine, è come voler far funzionare un'auto
senza il motore!
Ciao da Striker

 ha
scritto:

Esiste un activex (formula one activex) solo che mi hanno chiesto 2000
euro!!!
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere la TOC

Pe creare una struttura ad albero dell'HD è possibile leggere dirattamente
la TOC o bisogna necessariamente fare la scansione di tutte le DIR?

Cos'č la toc?
Grazie
Oz

Adesso ho capito veramente tutto!
Grazie Xaero, se non c'eri tu.........
Sarebbe come a dire, uno mi chede: cos'è
l'oggetto Inet e io gli posto:
Microsoft Internet Transfer Control.........
Ciao
Oz

 Oz
:)
"indice dei contenuti" va meglio ?
:)
hai presente quando il sw sta finendo un cd, "writing toc"...

 ha scritto nel messaggio
news:8qvgp3$j6$1...@fe1.cs.interbusiness.it...



un partizione formattata secondo lo schema FAT o FAT32 non ha alcuna TOC
relativa alla struttura globale di tutte le directory e di tutti i files;
le uniche informazioni "globali" della partizione sono relative a FAT
(memorizzata in 2 copie, per motivi di fault tollerance = tolleranza ad
errori e malaugurati black out) e root-dir (directory principale);
non conosco in dettaglio il formato di altri tipi di filesystem (es. NTFS =
WinNt o EXT2 = linux) ma ho buone ragioni per credere che la situazione sia
molto simile (almeno per quanto riguarda l'assenza di una TOC contenente
tutte le informazioni relative a files e struttura directory);
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Non trovo l'errore... :-(

Sto passando il contenuto di una textbox ad una procedura che sto 
modificando.
Richiamo la procedura in questa maniera:
Dim StrtPath As String
StrtPath  = Text3.Text
Get_Files StrtPath
L'errore � : il caratterte di dichiarazione tipo non corrisponde al tipo di 
dati dichiarato  alla riga:   file_name = Dir$(File_Path, vbDirectory)
Ho provato a vedere la var che passo alla procedura ed � identica, nella 
forma, alla var che la procedura originale passa a sua volta facendo 
funzionare il codice.
Dove sbaglio?
La procedura originale (funzionante nell'esempio che ho trovato) � cos� 
strutturata:
Option Explicit
Dim fnode As Node
Dim FIndent As Integer
Dim FIndex As Integer
Dim StrtPath As String
Private Sub Get_Files(FPath As String)
    Dim file_name As String
    Dim File_Path As String
    Dim File_Read As Integer
    Dim x As Boolean, xTemp As Integer, S$
    Dim I As Integer
    On Error Resume Next
    FIndent = FIndent + 1
    File_Path = FPath & "\"
    file_name = Dir$(File_Path, vbDirectory)
    File_Read = 1
    x = False
    Do While file_name <> ""
        If file_name <> "." And file_name <> ".." Then
            If GetAttr(File_Path & file_name) <> vbDirectory Then
                FIndex = FIndex + 1
            Else
                StrtPath = File_Path & file_name
                Set fnode = TreeView1.Nodes.Add(File_Path, tvwChild, FPath & 
"\", file_name)
                'changed to dash/hyphen for readability
                Text1.Text = Text1.Text & "->" & String(FIndent * FIndent, 
"_") & file_name & vbCrLf
                S$ = ""
                ''possible hack ; if FIndent=1 this doesn't execute
                For xTemp = 2 To FIndent
                    S$ = S$ & vbTab
                Next
                'write to a file; number of levels= number of tabs
                Print #1, S$ & file_name
                FIndex = FIndex + 1
                x = True
                'recursive call
                Get_Files StrtPath
            End If
        End If
        If x = True Then
            file_name = Dir$(File_Path, vbDirectory)
            For I = 2 To File_Read
                file_name = Dir$
            Next
            x = False
        End If
        file_name = Dir$
        File_Read = File_Read + 1
    Loop
    FIndent = FIndent - 1
End Sub 

 Dove sbaglio?
Secondo me ï¿œ quel Dir$() che ti fa saltare tutto. Perchï¿œ non usi
semplicemente Dir()?
Nicola