mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Assenza Provider dopo Setup

Quando lancio il programma, dopo che la fase di installazione si conclude
senza segnalare nessun problema, lo stesso termina dopo  3 msgbox di errore;
i primi due hanno per titolo il nome dei due Adodc contenuti nella form
d'avvio e segnalano:  "Impossibile trovare il Provider, è possibile che non
sia stato installato correttamente."
L'ultimo msgbox : "Errore di Run-Time '3706'"
Il Pc è un Winnt Wks con Office 97 pro, ho provato a installare Data Access,
e il Sp5 di Winnt;
ho provato anche ha farlo girare su un Pc Win 95, ma il risultato è lo
stesso : installazione completata normalmente con
msgbox :  "Err. Run-Time '429' il componente Activex non può creare
l'oggetto."
Il progetto utilizza Ado Data Control 6.0 (Sp4); DataGrid Control 6.0 (SP5);
DataList Controls 6.0 (SP3); DataReport.
Inoltre tutte le connessioni  (*.mdb) utilizzano come Provider :
Microsoft.Jet.OLEDB.3.51.
Ci sono requisiti particolari (Sw o Hw) per l'utilizzo di questi elementi ?
Ringrazio anticipatamente chi potrà aiutarmi.
Ciao Giuseppe.

 senza segnalare nessun problema, lo stesso termina ......
Ho risolto trovando la soluzione su
http://groups.google.com/advanced_group_search
Grazie, comunque e ciao
Giuseppe

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] WebBrowser - Destinazione links

Ciao.
1) Com'è possibile conoscere l'indirizzo di un link (prima di cliccarlo)
presente in una pagina caricata in un controllo WebBrowser? Mi spiego: In IE
se porto il mouse su di un link, nella barra di stato in basso posso vedere
l'indirizzo completo del link stesso. Non ho trovato alcunchè per ottenere
la stessa informazione col WebBrowser.
2) Inoltre: C'è modo di comunicare al controllo WebBrowser (prima che, per
conto suo, entri in azione) l'indirizzo di partenza? Vorrei evitare
l'esposizione della pagina "Impossibile visualizzare la pagina..." senza
impazzire con Visible True/False.
3) Non riesco a capire come lavori l'evento CommandStateChange. In
particolare per quanto riguarda i parametri restituiti (-1, 1 e 3 per
Command e True/False per Enable come da documentazione).
Grazie.

 impazzire con Visible True/False.
non so se ho capito ma dall'evento initialize del form usa
webbrowser.navigate oppure gohome
comunque con il webbrowser puoi usare anche dhtml(webbrowser.document)
ciao

 webbrowser.navigate oppure gohome
Certo, non mi sono spiegato bene. Mi pare che il WebBrowser "parta di suo"
con un suo indirizzo ( http:/// ) che chiaramente non corrisponde a niente e
gli fa esporre la classica pagina "impossibile visualizzare la pagina...".
Nelle proprietà di progetto non c'è nulla (per esempio uno Start_url) in cui
io possa intervenire (per esempio mettendo about:blank) e quindi, se non
gioco con il Visible all'avvio, avrò sempre quella pagina. Sposterò i
settaggi iniziali dall'Activate all'Initialize del Form. Non è un grosso
problema, comunque. Grazie ancora.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere un Controllo ActiveX con .NET

Ho aggiunto la MSComm con Add References ad un mio progetto, ma come faccio
a creare il controllo?
-- 
FAbio

 a creare il controllo?
1) Perchè mai hai usato un activeX in un progetto .net?
2) Per usarlo basta trascinarlo sul form.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 2) Per usarlo basta trascinarlo sul form.
Da dove scusa? L'unica traccia del controllo č MSComm.lib nella lista delle
references e da lě non si trascina niente!
Io comunque ero partito da questo:
Iniziamo col creare un nuovo progetto, quindi rendiamo disponibile il
controllo MSCOMM andando sul menů Progetto->Componenti, e selezionando
"Microsoft comm control x.x".
Aggiungete quindi il controllo, ora presente nella barra degli strumenti,
nel form (Form1) dando vita al controllo MSComm1."
Questo "Microsoft comm control x.x" l'ho trovato solo facendo Add
References!
-- 
FAbio

 references e da lì non si trascina niente!
Ah, ma non è la lib da includere, ma l'OCX :)
Comunque ti suggerisco di lasciar perdere e cercare la succitata classe
Rs232


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] messaggi non scaricati

Perchè quando scarico i messaggi nuovi dal NG, Outlook Express
mi scrive (ad esempio) nella status bar:
Messaggi: 1616, da leggere: 10, non scaricati: 42
Dopo aver letto i 10 messaggi, però mi dice ancora "non scaricati: 42"
e non c'è modo di scaricarli.
 Che vo' di' ?????
Ciao e grazie
Sir Jo

 Che vo' di' ?????
Aho', vordi' chettedevidacammia' er niusrider..
Anvedi d'anna' a scarica' er Agent dar sito d'a Forte'.
Manco a fallo apposta, se tratta de accatitipi' du punti, doppia bara
www.forteinc.com
Se vedemo :)
-- 
      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

 Se vedemo :)
io di solito faccio "sincronizza ng", dopo aver dato
"tutti i messaggi"
in impostazioni di sincronizzazione (clic dx sul ng nel treeview di sx).

 ha scritto nel messaggio
news:t8g7iks...@corp.supernews.com...

In strumenti opzioni alla voce Lettura trovi Leggi x intestazioni alla
volta, cambia quel numero.
Ciao VB

in impostazioni di sincronizzazione (clic dx sul ng nel treeview di sx).
Aho', ammemebasta de spiggne'r pulsante getniumessages e er niusrider
se scarica tutto da solo :)
Saluti Agent :)


 Saluti Agent :)
si'.
intendevo:
una volta per imposto la sincronizzazione.
poi se voglio scaricare i msg basta un click anche in oe.
se mi bastano le intesatzioni, lo fa da solo quando ci si punta sul ng.
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT-DB] Calendario ?? Web

Mi hano appena chiesto di realizzare un calendario "virtuale" dove si
possono sgnare con una crocetta i giorni impegnati e il tutto memorizzarlo
in un db.
Ho pensato che per scegliere i giorni utilizzo una checkbox, ma la mia
fantasia al momento si è bloccata.
Suggerimenti per come improntare il db? (access)
Il tutto per il web
Carlito

Il tutto per il web
Un' idea tra tante:
In un form html disegni una tabella, dove ogni TD rappresenta un giorno.
L' invio del form deve essere fatto POST (i checkbox saranno parecchi :)
L' asp sul server scrive nel database.
Come disegnare il db ?
Dipende da cosa deve fare il tuo programma :)
Dovrai comunque avere un calendario delle festivita',
come minimo, per disegnare correttamente la TABLE,
evidenziando correttamente i giorni.
Siamo un po' OT, pero' :-(
ciao, hal

 >fantasia al momento si è bloccata.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con Inputbox e focus

Salve a tutti, ho letto per molto tempo le vostre mail con molto interesse,
adesso avrei un problema da porvi.
Ho un ciclo While che carica in un controllo image delle immagini usando una
funzione dir, con una cadenza programmata devo poter inserire una stringa
(path di destinazione), utilizzavo per questa funzione la inputbox, invece
ora vorrei integrare questa funzion sulla form. Il problema è che una volta
partito il ciclo while, se passo il focus su una text box non fa niente e
continua con la while principale.
Vi allego il codice sperando in un aiuto Ciao a tutti
Emanuele
--------------vecchio codice---------------
Path = "d:\001\"
elenco = Dir(Path & "*.tif")
While elenco <> ""
    List1.ListIndex = x
    contatore = contatore + 1
       Picture1.Picture = LoadPicture("path & elenco")
        If contatore = 20 Then
            destinazione = InputBox
        End If
        FileCopy Path & elenco, destinazione & elenco
elenco = Dir
Wend
--------------------------
vorrei cambiare la input box con una text box nella stessa form, ma non ho
idea di come bloccare il controllo
___________________
TNX 1000 pari a ? 0.51

 ha scritto nel messaggio
news:ad2bgf$t3q$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: Info query esclusione

Salve a tutti,
    ho un quesito da porvi ringraziandovi anticipatamente. Deve generare 
delle stampe. Ho una tabella [Clienti], dove ci sono Occupanti e Proprietari 
di un determinato appartamento.
Non e' detto che esistano entrambi, o esiste il Proprietario o entrambi 
Proprietario e Occupante.
Nella query, vorrei andar a selezionare tutti gli Occupanti quando presenti 
nel DB,e se non presenti, il Proprietario.
Non so se mi sono ben spiegato.
E' possibile farlo con una query?
Grazie 1000 

Andrea ha spiegato il 27/10/2006 :

Sicuramente si.
Ma partendo da cosa?
Da un singolo appartamento, o da una tabella degli appartamenti che 
contiene le due chiavi esterne Proprietario e Occupante?
Alberto
-- 
Max Beerbohm: Tutto ciò che è degno di essere fatto è stato fatto 
ripetutamente. Dalle cose mai fatte bisognerebbe tenersi, sospetto, 
molto alla larga.

 ha scritto nel messaggio 
news:mn.dbdf7d6af...@hotmail.com...

Ciao Alberto,
    allora, ti spiego. La tabella Clienti ha al suo interno le chiavi che 
sono "codiceapp" e "tipo" dove "tipo" e' 'O' (Occupante) o 'P' nel caso di 
proprietario. Quindi un appartamento puo' avere due record nel caso abbia 
sia Occupante che Proprietario. Nel caso che ne abbia entrambi, devo tirar 
fuori solo l'Occupante, altrimenti solo il Proprietario. Spero di essermi 
spiegato un po' meglio.
Grazie 1000 

 un po' meglio.
Ti sei spiegato.
Ma non ho capito da dove vuoi partire. Tu hai un codice appartamento e 
vuoi estrarne l'occupante o, in subordine, il proprietario?
Oppure vuoi un elenco di tutti gli appartamenti con l'occupante o il 
proprietario?
Va beh, cerchiamo di inventare qualcosa di 'universale':
SELECT
    APPARTAMENTI.CODICE_APP,
    COALESCE(CLIENTI1.NOMINATIVO, CLIENTI2.NOMINATIVO, 'NESSUNO') AS 
NOMINATIVO
FROM APPARTAMENTI
LEFT OUTER JOIN CLIENTI AS CLIENTI1
ON APPARTAMENTI.CODICE_APP=CLIENTI1.CODICE_APP AND TIPO='O'
LEFT OUTER JOIN CLIENTI AS CLIENTI2
ON APPARTAMENTI.CODICE_APP=CLIENTI2.CODICE_APP AND TIPO='P'
WHERE APPARTAMENTI.CODICE_APP=<CODICE DA TROVARE>
Se ometti il Where, ottieni l'elenco, se lo specifichi, ottieni il 
singolo elemento.
Ciao
Alberto
-- 
Charles Baudelaire: C'è un solo modo di dimenticare il tempo: 
impiegarlo.

 ha scritto nel messaggio 
news:mn.dc137d6ac...@hotmail.com...

La provo subito :) e ti faccio sapere :) 

 ha scritto nel messaggio 
news:mn.dc137d6ac...@hotmail.com...

Ciao Alberto,
    scusa se ho omesso di dirti che la tabella [clienti] e' di tipo Access, 
e il "coalesce" non me lo supporta :(
Grazie 1000 per l'attenzione e per l'aiuto ;) 

 il "coalesce" non me lo supporta :(
Ma IsNull si, presumo.
Alberto
-- 
Alessandro Bergonzoni: Il tempo vola e noi no. Strano sarebbe se noi 
volassimo e il tempo no, il cielo sarebbe pieno di uomini con 
l'orologio fermo.
Newsgroup: it.comp.lang.visual-basic
Titolo: lpt1

ciao a tutti,
con VB6 come controllo gli 8 bit della parallela?
(mandarli a 1 o a 0 in base al programma che sto realizzando).
Grazie


Cercando sui post precedenti del NG.
Puoi farlo con una ricerca su:
http://groups.google.it/groups?hl=it&lr=&group=it.comp.lang.visual-basic
(ricomponi il link su una riga se va a capo).
Happy Coding =)
Lokar

Newsgroup: it.comp.lang.visual-basic
Titolo: ocx non registrato

Stamane sul pc che uso (da anni) per programmare in vb6 è sorto un problema
senza che apparentemente abbia fatto modifiche nel sistema:
quando apro un progetto di vb (anche uno vuoto) mi parte l'intstallazione di
office 2000 premium chiedendomi il cd. Non avendo il cd (ma lo recupererò a
casa oggi) annullo e scopro che il problema sembra essere la libreria
mscomctl.ocx
che non viene caricata e di conseguenza i controlli ad essa associati.
Se vado in components e la seleziono mi dà errore di componente non
registrato.
Provo con
regsvr32 mscomctl.ocx
che sembra vada a buon fine ma con vb non cambia nulla.
Se lancio un applicazione office non sembra dare problemi.
Ecco un file log di un form:
Line 105: Class MSComctlLib.ImageList of control img was not a loaded
control class.
Line 305: Class MSComctlLib.ImageList of control imgSI was not a loaded
control class.
Chiedo umilmente aiuto.
bye,
max


Non hai installato nulla?
Neanche una piccolissima applicazione?
No? Non ci credo.
Crea un nuovo progetto e prova ad inserirci i CommonControls.
Se ti funziona (se ci riesci intendo) salva con un nome qualsiasi il 
progetto.
Se non funziona è qualche altra cosa.
[SeFunziona]
Nel file vbp trovi il clsid della ocx commoncontrols, che è stato 
modificato rispetto a quello che hai nel vecchio progetto. Sostituiscilo 
ed il gioco è fatto.
Resta da capire chi ha pastrocchiato la commoncontrol vanificando la 
retrocompatibilità... Ma pastrocchioni ce ne sono molti in giro...
[/SeFunziona]
[SeNonFunziona]
Non ricordo ma è qualcosa che riguarda il registro... Mi è capitato 
tempo fa, ma non ricordo cosa ho fatto. Generalmente lascio traccia di 
quello che faccio, solo che ora non ho tempo per fare ricerche più 
approfondite.
[/SeNonFunziona]
-- 
-> GbC|
www.gbcweb.com
www.chiappori.com
 

 [/SeNonFunziona]
Ho provato con il cd di office 2000 (che mi chiede quando apro vb) ma deve
avere problemi di lettura infatti mi blocca il pc (con relativa schermata
blu).
Beh, è da anni che non faccio un bel format c:, sarebbe quasi ora...
bye,
max

 che non viene caricata e di conseguenza i controlli ad essa associati.
Per la cronaca ho finalmente risolto (dopo ore di tribolazioni):
- disinstallato visual studio 6
- cancellato file .ocx e relativi file .srg e .dep
- reinstallato visual studio 6 e relativi service pack
Credo che il problema non fosse nel file ocx ma nei file dipendenti infatti
i programmi compilati che utilizzano quell'ocx funzionavano correttamente.
bye,
max
Newsgroup: it.comp.lang.visual-basic
Titolo: Query Simultanee

Devo eseguire delle Query in simultanea attraverso ADO.
Mi sapete aiutare ?

Io non ho mai provato, ma se non sbaglio puoi mandare in esecuzione due
query in modo asincrono e controllare (in un loop) lo stato di avanzamento
delle query.
In questo modo riesci a lanciarne più di una contemporaneamente.
Per lanciare una query in modalità asincrona dovrebbe esserci un parametro
nel metodo Execute...
--
________________________________
Raffaele Tripodo
E-Mail:              
raff...@conmet.it
MSN Messenger: 
px...@hotmail.com
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯



Newsgroup: it.comp.lang.visual-basic
Titolo: Non posso usare Kernel32.dll

Il mio problema (l'avevo già postato) è che su WinNt nella libreria
Kernel32.dll non c'è l'API RegisterServiceProcess. Avevo allora pensato di
mettere in una cartella (diversa però da c:\Windows\System  perchè non posso
modificarla) la stessa libreria però presa da Win98 e poi registrarla
tramite regsvr32.exe, ma quando eseguo questo comando mi dà errore in quanto
la libreria è già registrata (giustamente: è già registrata quella scrausa
di WinNt!). Avevo allora pensato di scaricare quella che viene caricata
all'avvio da WinNt tramite il pview.exe che viene dato con VB6, ma questo
parte solo con win9x. Quindi...io ho bisogno di quell'API perchè, usata con
GetCurrentProcessID, mi permette di non far apparire il mio programma nella
lista dei Task quando si preme ctrl + alt + canc. Qualcuno ha qualche idea
in proposito?
Ringrazio tutti ;-)
Il Conte

 ha qualche idea in proposito?
Sotto NT non c'e' nessuna maniera di non fare apparire un'applicazione
in Taskmanager.
Ciao.

Me misero  :-(
Il Conte
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Nuovo arrivo in news

Salve a tutti, da oggi ci sono anche io in news e spero di poter essere
utile a qualcuno visto che già alcune news che ho potuto leggere mi sono
state di grande aiuto.  Volevo chiedervi se esiste un sito della news o
qualcosa del genere dove poter consultare del materiale.
Grazie a tutti e spero di trovare presto tra di voi collaboratori ed amici
allo stesso tempo
Nio
webm...@seitersrl.com

allo stesso tempo
Lo speriamo anche noi. Tra l'altro stiamo organizzando un meeting per fine settembre/inizio
ottobre... se non hai scaricato il ng nei giorni scorsi, prova a ceracre su google; in ogni caso a
breve sarà disponibile una pagina sul Sito comune...
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
---------------------------------------------------------------------------

 state di grande aiuto
aggiungo un semplice "benvenuto" oltre a quanto detto da Moreno
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud


Ti hanno gia' ben risposto Moreno e Fibia, ai quali non posso far altro 
che associarmi :-)
Di nuovo, benvenuto
hal

 wrote in message
9n0o69$4kmpd$1...@ID-56381.news.dfncis.de...

grazie a tutti per l'accoglienza spero di poter essere all'altezza dell'ng e
complimenti per il sito comune è veramente di grande utilità.
--
Ciao a tutti
Nio
webm...@seitersrl.com

Newsgroup: it.comp.lang.visual-basic
Titolo: TWAIN con visual basic

Avrei necessità di acquisire immagini da una periferica TWAIN. Dove posso
trovare documentazione, ocx o quant'altro per farlo senza dover acquistare
librerie?
Grazie
DeadLock
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 librerie?
Se ti interessa ho una dll (free) più progetto di esempio che dovrebbe fare
al caso tuo...

 Grazie
http://home.t-online.de/home/Alexandra.Prelle/ezx/scan01.htm
se ricordo, dovrebbe esserci anche scan02
-- 
ciao, j.
http://www.sundaysw.com/google.gif
Newsgroup: it.comp.lang.visual-basic
Titolo: Porta seriale

Dobbiamo spedire un valore intero tramite la seriale. Abbiamo usato un
oggetto MSComm. L'abbiamo chiamato PortaSeriale e una volta fatto
PortaSeriale.Output che valore gli dobbiamo passare (visto che non accetta
Integer)?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Integer)?
Accetta stringhe, il valore lo puoi avere da funzioni come CHR$() o
cStr() o anche HEX$()
ciao
  Stefano

quindi se devo mandare un numero a due cifre a un microcontrollore devo
per forza convertirlo in stringa usando due byte?
E se in ricezione posso leggere un solo byte come potri fare?


 accetta Integer)?
Siccome immagino che tu spedisca della roba sulla seriale, con l'obiettivo 
non tanto nascosto, che qualcuno o qualcosa riceva e capisca ciò che tu 
invii, occorre che tu spedisca secondo il formato richiesto dal 
destinatario.
Cioè, se vuole un BCD, informati su quante cifre vuole, e formatta l'integer 
in stringa, e spedisci.
Se vuole un Hex, converti in hex, attacca gli zeri davanti, e spedisci
Se vuole la rappresentazione binaria, crea i singoli byte e spedisci.
Ciao
Alberto
-- 
"C'è un Calvelli dentro ognuno di noi" (cit.) 

E se in ricezione posso leggere un solo byte come potri fare?
mmm, se ho capito bene la domanda, tu puoi mandare un byte per volta
sulla seriale, cioè da Chr$(0) a CHR$(255)  o Hex$(&hFF)
Il software sul µC poi vedrà nel registro della uart un byte (8 bits
con quel valore) in binario.
Quindi in uscita puoi mandare fino a 255 valori con un byte,
naturalmente se ne vuoi mandare in sequenza devi fare
MsComm1.output = CHR$(255) & CHR$(155)  & .....
o
MsComm1.output = Hex$(&hFF) & CHR$(&h9B) &  .....
ciao
  Stefano

MsComm1.output = Hex$(&hFF) & CHR$(&h9B) &  .....
MsComm1.output = CHR$(&hFF) & CHR$(&h9B) &  .....
questo va bene
ciao
  Stefano


ha scritto:
Adesso vado a casa e mi faccio un giro in bici, fuso stasera č poco..
MsComm1.output = Hex$(&hFF) & Hex$(&h9B) &  .....
questo sě va bene..   :-)
ciao
  Stefano

 questo sì va bene..   :-)
A me piaceva più prima (se dobbiamo inviare una sequenza di byte...)


A me piaceva più prima (se dobbiamo inviare una sequenza di byte...)
già, hai ragione tu, ma stasera non connetto, ho avuto una giornata
dura.
Meglio che smetta di scrivere boiate e salti sulla mtb (spero di non
finire in un fosso, con la capacità di concentrazione che ho adesso è
possibile)
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Vb6 da console ms-dos

E' possibile fare un progetto VB6 che lavori su console msdos, quindi senza 
form windows?
Grazie! :-)
Patrick 






Si, dai un'occhiata qui ad esempio:
http://www.nirsoft.net/vb/console_application_visual_basic.html
http://visualbasic.about.com/od/learnvb6/l/bldykvb6dosa.htm
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 form windows?
Ti han già risposto, ma ti vorrei far notare che console != msdos .
-- 
Emanuele Torrenti
Registered Linux User #409659

 ha scritto nel messaggio 
news:NDRQg.63$Ib...@tornado.fastwebnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Decompilatore VB5

Ciao a tutti, è la prima volta che scrivo, ma vi leggo da molto tempo.
Mi stavo chiedendo se avete già sentito parlare del decompilatore
per il VB5, ammesso che ci sia, perchè ne ho estremamente bisogno.
Grazie anticipatamente... PAOLO.

...

Anche a me servirebbe!!!
Ho perso il codice sorgente di un programma fatto da me!!! :-(((
Mad Hatters

Esiste un decompilatore per VB3 (anche se non so se funziona
veramente), ma non per VB 4 o 5.
Anch'io ho perso dei sorgenti ed ho imparato cosa vuol dire
"Backup"..... a mie spese....
Se invece non è per la perdita dei sorgenti che ti serve, ma per
altro.... beh, allora spero proprio che non esista!!!!
Ciao
si...@tin.it


Grazie anticipatamente... PAOLO.
Tra i links sulle mie pagine web c'è anche quello del "guru" creatore dei
decompilatori VB.
Non so a che punto sia lo sviluppo del decompilatore per VB5, comunque non
raccontatemi che lo usereste solo per i vostri programmi...
Ciao
--
-
MIX (VB5SP3)
110 links ai siti VB
http://www.tempolibero.com/user/mix/
 (consigliato)
http://space.tin.it/computer/gaais
  (alternativo)
( TEMPORANEAMENTE ACCESSIBILI SOLO CON IE )
-

Grazie anticipatamente... PAOLO.
esiste al momento attuale un decompilatore x il VB3.
era prevista anche una versione x VB4 (c'era una beta tempo fa)
non si hanno notizie su una versione x VB5
cmq, se l'EXE è compilato col VB5 in codice macchina, non c'è cristo che
tenga, in quanto i decompilatori citati funzionano solo con gli EXE
compilati in p-code.
Maurizio B.

Grazie anticipatamente... PAOLO.

A MORTE IL POPOLO DEI DECOMPILATORI !!!!!!!!!!
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                 Trust no ONE.
Vota per per it.binari.visual-basic !

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Si puo rimuovere una sezione di file INI?

Č possibile rimuovere un'intera sezione di un file di inizializzazione
(.INI), o almeno le singole voci?
Grazie a chi mi aiuterą.
Cardo

 È possibile rimuovere un'intera sezione di un file di
inizializzazione (.INI), o almeno le singole voci?
L'argomento dovrebbe essere trattato sul Sito comune:
 
http://www.murialdo.it/it_lang_vb
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

(.INI), o almeno le singole voci?
Prova cosě:
Public Sub DeleteSection()
     Call WritePrivateProfileString(m_INISection, 0&, 0&, m_INIFile)
End Sub
Ciao





---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---
Newsgroup: it.comp.lang.visual-basic
Titolo: Cancellazioni non volute in una PictureBox

Ciao a tutti,
              mi è capitata una cosa molto strana con il programma in
VB6 che sto scrivendo.
Cerco di riassumere la questione per punti, sperando di riuscire ad
essere chiaro alla prima botta:
- ho creato un form contenente una PictureBox inizialmente vuota ed
alcuni bottoni;
- se premo un certo bottone (A) ho fatto in modo che mi si crei un
pallino in posizione casuale all'interno della PictureBox e questo si
ripete ogni volta che premo tale bottone. Il pallino viene creato con
il metodo Circle;
- se premo un altro bottone (B) un pallino viene eliminato dalla
PictureBox (in pratica la routine ridisegna tutti i pallini tranne
uno, di fatto rinfrescando l'intera area di disegno)
- dopo un tot di pressioni del bottone A mi trovo ad avere un insieme
di pallini dentro la PictureBox. A questo punto se apro una qualsiasi
altra applicazione Windows, che si va a sovrapporre alla PictureBox,
l'effetto che ottengo è la cancellazione di tutti i pallini che stanno
sotto alla nuova finestra aperta, cosa ovviamente tutt'altro che
gradita per la mia applicazione :rofl:
La mia domanda è: come faccio ad evitare che questo avvenga? O in
alternativa: a che evento mi devo agganciare per fare ridisegnare il
contenuto della PictureBox una volta che la finestra di un'altra
applicazione ne ha cancellato il contenuto?
Grazie in anticipo,
Ale

 La mia domanda �: come faccio ad evitare che questo avvenga?
.autoredraw = true
Bye, G.

 Bye, G.
Grazie dell'indicazione. Nel frattempo ho fatto la scoperta dell'acqua
calda: esiste l'evento _Paint che permette di gestire tutte le mie
esigenze! :-P

 esigenze! :-P
S�,ma ti tocca ridisegnare tutto ogni volta. L'Autoredraw
mantiene una bitmap permanente in memoria, e riscrive
se necessario solo la parte invalidata da un'eventuale
sovrapposizione di un'altra finestra.
E' insieme pi� pratico e pi� veloce, ed � fatto apposta
*proprio* per l'esigenza di cui hai parlato.
Bye, G.

 Bye, G.
Grazie mille. Ho provato come dicevi tu e funziona (ovviamente, dirai
tu) tutto.
Saluti,
Ale

Newsgroup: it.comp.lang.visual-basic
Titolo: [??] aiuto, non funziona !!!!

Ho notato che, in Access, il controllo INET (che funziona benissimo) non
esegue .Cancel (per interrompere Inet in esecuzione), in quanto
probabilmente lo confonde con .Cancel dei comandi propri di Access.
Qualcuno conosce la soluzione per usare .Cancel in INET ? Grazie.
PS:  scusate il precedente post in HTML
-- 
Posted from 
mail5.galactica.it
 [212.41.208.22] (may be forged) 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 PS:  scusate il precedente post in HTML
Perdonato :)
Il prossimo passo sta nella modifica del subject. (Vedi subject di questo
reply)
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema query Access - VB6.

Premetto che sono un hobbista ed uso VB6 e Access.
Devo popolare un resordset e per fare ciň uso la seguente istruzione:
rsFILE.Open "SELECT * FROM MiaTabella WHERE Citta = 'Milano' And
DataScadenza >= #" & Date & "# Order By AltroCampo;", cnMISURE,
adOpenKeyset, adLockOptimistic, adCmdText
Il problema č che il recorset non contiene i record con DataScadenza
compresa da oggi (07/05/2007) fino al 04/07/2007, mentre carica quelli con
DataScadenza successiva. Ho provato la stessa sintassi da Access e la query
porta al risultato corretto.
Ho provato anche ad adottare la seguente soluzione:
rsFILE.Open "SELECT * FROM MiaTabella WHERE Citta = 'Milano' Order By
AltroCampo;", cnMISURE, adOpenKeyset, adLockOptimistic, adCmdText
rsFILE.Filter = "DataScadenza >= #" & Date & "#"
In questo modo il recorset contiene i dati voluti.
Sapete spiegarmi l'anomalia, non riesco proprio a venirne a capo.
Grazie in anticipo per le eventuali risposte.
Ciao.
Ivan.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Ciao.
Chiedo scusa a chi ha letto questo messaggio ed ha perso tempo...
Il perchè si verifica tale situazione è talmente banale che un pò mi
vergogno.
Per i principianti come me dico solo che basta trasformare la data dal
formato gg/mm/aaaa al formato mm/gg/aaaa e tutto funziona correttamente.
Grazie per non avermi risposto malamente...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Crystal Report Information

Adesso ho incominciato ad usare Crystal Report
Nel mio programma ho inserito l'oggetto del Crystal Report
(Myreport)collegandolo al nome  mioreport.rpt
Perchč quando aggiorno la tabella e richiamo e dico richiamo
Myreport.PrintReport non visualizza
quello che č scritto nella Tabella del DataBase???????????????????????????
Premetto il collegamento alla tabella l'ho fatto nel programma Crystal
Report 6
Rispondetemi per favore grazie
Roberto

quello che è scritto nella Tabella del DataBase???????????????????????????
Ciao stefano

 wrote in message
86u7rc$3vj$2...@lacerta.tiscalinet.it...


 wrote in message 873gqg$ev2$1...@nslave2.tin.it...










> > Grazie Stafano ma no riesco a seguirti
quando generi un report usando crystal report trovi un opzione nel menu file
(se non ricordo male ) che dice "salva dati con report" da menu puoi
attivare o disattivare l'opzione (la voce di menu verra segnata da un segno
di spunta "check" o meno se viene attivata o no) questa opzione salva il
file report che hai disegnato con dentro i dati del database e serve per
velocizzare le operazioni di accesso al database. se non forzi la rilettura
del database Crystal ti ripresenta la base dati che ha menorizzato al suo
interno senza andare a rileggersi la base dati originale (per risparmiare
tempo)
probabilmente il difetto che stai segnalando e' dovuto a questo: il tuo
report contiene anche i dati  vecchi percio devi forzare la rilettura dei
dati , in questo modo crystal cancella i dati salvati e rilegge il database
aggiornando il report con i nuovi dati.
la prop DiscardSavedData che trovi nell'OCX di crystal che inserisci nei
tuoi programmi ti consente la stessa cosa da VB.
Controlla nell'OCX tra le propieta'  disponibili  DiscardSavedData oppure
apri il tuo file con crystal e controlla come ti ho detto come e' definita'
opzione "salva dati con report"
Ciao stefano

 wrote in message
87418u$6kh$1...@lacerta.tiscalinet.it...


Stefano ti ringrazio
Quando lo chiudo e poi lo riapro ho il risultato che desidero
 Ma come faccio ad avere il risultato desiderato senza che lo chiudo e lo
riapro ?
La proprietą DiscardSavedData deve essere True o False ?
e va Priva di PrinterReport o dopo ?
Stefano Rispondimi, Ciao Roberto

 wrote in message 8748ub$67e$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: BUG DI MSHFLEXGRID O MIA INCOMPETENZA???? (ma ci sarà qualcuno che mi saprà rispondere????)

Vi segnalo questo problema (già postato più volte tra l' altro) al
quale nessuno mai mi ha dato una risposta ... ma io ci tengo e quindi
ci riprovo ...
Prendete un controllo ADO
Prendete un MSHFLEXGRID in bind con il controllo ADO
inizializzate il controllo ADO
... adodc1.connectionstring = "e ciapilu ...."
.... adodc1.recordsource = "SELECT *  .... e ciapilu ...."
... un bel refresh che sta sempre bene ....
a questo punto l' inghippo è :
partite da un recordset popolato. Poi mettete due opzioni di filtro
dati ... fate in modo che una dia come risultato 0 record. Succederà
che:
IF recorset.recorcount = 0 then
         il controllo mshflexgrid diventa inutilizzabile se tolgo il
filtro comunque si sfasa tutto di una riga e non permette di
selezionare le celle  anche se rifiltro il recordset
ELSE
         il controllo mshflexgrid funziona perfettamente
END IF
aggiungo giusto queste ulteriori notizie ... se nel recorsource
rifiltro i dati in modo che il risultato mi dia un numero di record >0
comunque il mshflexgrid non funziona più
PROVARE PER CREDERE bisogna chiudere l' applicazione e riaprila perchè
torni a funzionare
(ah ... dimenticavo che il DB sotto è un semplice file di Access con
una tabella stupidissima con campi solo testo e un contatore ... )
Ora cari smanettoni da Newsgroup per piacere non ammorbatemi con le
solite risposte ...
- aggiungi un altro controllo ado e fai il test prima con questo (e non
con quello in bind con il mshflexgrid)
- usa un altro tipo di grid magari di quelli a pagamento che funzionano
meglio
E' possibile che ci sia un problema di bug di fondo????  magari già
documentato????  e quindi devo proprio cambiare strada o sono io che
dimentico porzioni di codice o qualche proprietà????
Spero di essere io il ciarlatano che non ne capisce niente e che
qualcuno sappia FINALMENTE  rispondermi ....

 qualcuno sappia FINALMENTE  rispondermi ....
non mi far esprimere sulla tua competenza dai!
chiudiamola qui!
Newsgroup: it.comp.lang.visual-basic
Titolo: CONTROLLO NUMERI IN TEXT

sapete come si fa in a controllare l'inserimento di un numero in un text e
non permettergli la scrittura se inserisce una lettera?
Grazie

guarda i post precedenti di qualche giorno fa ...

sapete come si fa in a controllare l'inserimento di un numero in un text e
non permettergli la scrittura se inserisce una lettera?
Grazie
N.b
Scusate, sarà banale ma in vb non riesco a trovare il modo......allora
evitiamo di scrivere troverai la risposta in alcuni post fa!

 evitiamo di scrivere troverai la risposta in alcuni post fa!
Allora evitiamo di chiedere.
Ciao.


controlla il tasto premuto nell'evento keypress nel textbox
se non è un numero poni keycode=0

"Ra" ha scritto nel messaggio

Allora, molta calma, eh ?
Per cominciare, sappi che questo è un argomento che
scatena fin troppe polemiche in questo e tanti altri gruppi,
quindi evitiamo di crearne. Leggi attentamente questo post
fino alla fine, poi eventualmente rispondi. Grazie.
**************
Il punto è che questo è un "gruppo di discussione", anche
se spesso viene scambiato per un help-desk.
Nessuno ha l'obbligo di rispondere alle tue domande, e se
qualcuno lo fa, è per gentilezza. Niente ti è dovuto, insomma.
Quando poi arriva una domanda, che tu stesso definisci
"banale", e alla quale è stato risposto "diecinaia e diecinaia
di volte" negli ultimi quattro anni, fra cui appunto pochi post
prima del tuo, perché mai pensi che qualcuno _debba_
risponderti in maniera esplicita ?
Ti è stato detto che la risposta era pochi post prima del tuo,
cerca lì, no, cosa ti costa ?
Per di più la Netiquette, che _di solito_ è compresa nel contratto
che tu firmi (fisicamente o anche elettronicamente) quando
ti iscrivi ad un ISP (nel tuo caso un'adsl su McLink), consiglia
chiaramente un paio di cosette da fare PRIMA di postare in un
gruppo, fra cui:
- leggere il manifesto del gruppo (nel nostro caso lo trovi su:
 
http://it-lang-vb.net/docs/Manifesto.txt
)
- leggere un buon numero di post arretrati.
- leggere nel gruppo senza postare per una o due settimane,
   se possibile
- cercare nei post arretrati disponibili sul server, o in mancanza
- cercare su 
http://groups.google.com/advanced_group_search
   dove trovi TUTTI i post arretrati del gruppo, dall'apertura nel '97
   ad oggi.
Chiaro, ora ?
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

Newsgroup: it.comp.lang.visual-basic
Titolo: comando "seleziona tutto " da codice

ciao a tutti,
devo fare il seleziona tutto, come quello che si fa con il mouse
trascinandolo sul testo, da codice su una richtextbox. ho proavto a usare
seltext ma non mi colora di nero il testo selezionato...
come si puo fare? ( se si puo fare?)
ciao
maci

 seltext ma non mi colora di nero il testo selezionato...
hai utilizzato anche selstart?
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Excell/vba autofiltro

Ho un problema:
in un range A1:A300 ho una lista di date
vorrei, introducendo da 2 diverse combobox, selezionare un intervallo di
tempo ad esempio dal 8 luglio al 31 luglio con una procedura automatica in
VBA
chi mi può aiutare?
Grazie!

 VBA
Boh... butto lì un'idea...
Metti le due combobox... Controlli cella per cella (worksheet.cells...) se
verifica le condizioni... Se, ok... se no riduci l'altezza della riga a 0...
dovrebbe funzionare... certo non é il massimo... però... meglio di niente...
:)
                        Ciao
                                    Allanon
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo Treeview e segni +-

Ciao a tutto il NG!
Utilizzo un controllo TreeView per un'applicazione tipo Esplora Risorse.
Il riempimento avviene tramite un ciclo con il FileSystemObject.
Il mio problema è che non appaiono i segni "+" se la cartella (o, meglio, il
nodo)
ha delle sottocartelle. Mi appare solo se apro la cartella.
Qualcuno ha qualche idea?
--
Per rispondere in privato rimuovere NOSPAM

 Qualcuno ha qualche idea?
Detto cosi', immagino che tu non carichi all'inizio tutta la struttura delle
cartelle, ma lo faccia invece progressivamente, quindi carichi di volta in
volta solo le sottocartelle della cartella selezionata...
Se e' cosi', puoi usare un piccolo trucco, aggiungendo un nodo figlio
"fasullo" ogni volta che aggiungi una cartella; in pratica nella fase di
caricamento di un livello puoi fare una cosa del genere:
Dim child As Scripting.Folder
Dim FolderNode As Node, DummyNode As Node
'parent e' un oggetto di tipo Scripting.Folder
'che viene passato alla procedura e indica la cartella corrente
For Each child in parent.SubFolders
    Set FolderNode = TreeView1.Add(...)
    'se esiste almeno una sottocartella, aggiungiamo un nodo finto
    'per fare in modo che il nodo risulti espandibile
    If child.SubFolders.Count > 0 Then
        Set DummyNode = TreeView1.Add(FolderNode, tvwChild)
        DummyNode.Tag = "+"
    End If
Next
a questo punto, nell'evento Expand del TreeView esegui
Private Sub TreeView1_Expand(ByVal Node As ComctlLib.Node)
'se esiste un figlio, ed e' stato marcato con il nostro tag particolare
'allora carichiamo le sottocartelle della cartella selezionata
If Not Node.Child Is Nothing Then
    If Node.Child.Tag = "+" Then
        'eliminiamo il nodo finto
        TreeView1.Nodes.Remove Node.Child.Index
        'e quindi carichiamo le sottocartelle con la procedura vista sopra
        '[...]
    End If
End If
End Sub
a grandi linee e' tutto, ti assicuro che e' molto piu' facile a farsi che a
dirsi...
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetti in Transaction Server

Buongiorno.
Ho sviluppato due componenti ActiveX DLL  che vengono istanziati da un
documento ActiveX, il tutto utilizzando Visual Basic 6.0.
La prima DLL(BudgetDB.dll) esegue la connessione a un database SQL 7.0 ed è
fornita di funzioni che eseguono l'interrogazione dello stesso ( ho creato
una classe per ogni tabella del DB).
La seconda DLL(BudgetService.dll) crea le COLLECTION dei risultati delle
varie query eseguite sul DB.
Il documento ActiveX ha come riferimento BudgetService.dll, che a sua volta
ha come riferimento BudgetDB.dll.
Ho aggiunto queste due DLL in due package MTS 2.0 eseguendo alla lettera
quanto riportato su Msdn, TechNet, libri Mondadori, "Bibbia del
Programmatore Esperto" ecc.:-))) , ma ho ancora problemi durante
l'esecuzione ( durante il debug, con  le funzionalità MTS non abilitate <<
altro problema!?!?!?>> funziona tutto......):
 
1) -2147319779
 Errore di automazione
altre volte anche
 2) Errore 13 Tipo non corrispondente
Il tutto è distribuito su 3 PC e lo sviluppo è stato effettuato su un quarto
PC con S.O WinNt 4.0 WS Italiano con Option Pack Italiano:
un server per MTS 2.0 , uno per Sql Server 7.0 ed uno per IIS.
Qualcuno mi può aiutare a risolvere questo problema?
Grazie a tutti.
Rino

 ha scritto nel messaggio
news:98o6ht$5pd$1...@pegasus.tiscalinet.it...


 wrote in message
news:98pt5v$iec$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: OT?: VS6 in Inglese ???

Scusate la domanda forse un po' OT ma volevo un vostro parere...mi č stato
regalato da un mio amico in Irlanda la versione Inglese del Visual Studio 6
Enterprise, a questo punto avendo tutte le applicazioni in Italiano
compresi W2K e Office2K mi sono chiesto se mi creerebbe problemi dopo un
eventuale installazione...cosa ne pensate?
Thanks!
--------------------------------
Inviato via 
http://usenet.iol.it

 Scusate la domanda forse un po' OT ma volevo un vostro parere...mi è stato


Be', quando lo installi stai attento alle dll che ti chiede di sostituire.
Magari te ne cambia qualcuna da italiano ad inglese. Ti parlo per
esperienza! Avevo acquistato VS5 learning edition ed il VB mi era stato
recapitato in spagnolo. Naturalmente l'ho fatto cambiare, ma dopo
l'installazione (mi sono accorto dopo dell'errore! ;) qualche messaggio
d'errore mi arrivava non proprio in italiano ;;;)))
CiaoZ
SebaMix

 ha
scritto: 

E per quanto
riguarda i service pack, possono creare dei problemi alle altre
applicazioni ? Cmq provo ad installarlo e speriamo bene!!!


Semmai prima fai una bella immagine con il Norton Ghost e poi magari
recuperi tutto! ;)
I vari SP male che vada ti costringono a reinstallare Windows ;;;))) Il SP4
no dovrebbe darti problemi. Il 5 non so... ;)

 wrote in message
news:151Z15Z187Z94Y...@usenet.iol.it...


 quello in italiano..
Ok ma ti ha creato problemi con le altre applicazioni?

Io l'ho usato per un annetto... nessun problema... a parte che era tutto in
inglese... ;-))
L'ho provato (o miei amici l'hanno provato ;-)) sotto 98, 98 SE, ME e
2000...
Ora, era versione un po'... insomma... strana...
Purtroppo avevo problemi di installazione se era già installato l'office
2000, ma credo che fosse perché era una delle primissime versioni... CMQ una
volta installato... perfetto...
        Ciao
                Allanon

 wrote in message
news:L3CA6.450$xC3....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: comboBox....visual basic 6

Ciao,
ho un problemino.....ho una comboBox che mi permette di selezionare
quali tipi di file desidero cercare in c:\ o in d:\, ad esempio *.*,
*.dll, ecc..., vorrei fare in modo che la lista dei file trovati venga
visualizzata in una listbox, qualcuno sa aiutarmi?
Ciò che utilizzo per il mio programmino è:
driveListbox
combobox
dirListBox
fileListbox
listbox
commandbutton
grazie

non c'è nessuno che mi può aiutare?

 
La domanda non l'ho capita bene. Forse vuoi partire popolando la FileListBox con 
i file che hanno una certa estensione (una di quelle elencate nel combobox).
Dunque fai cosě:
Private Sub Combo1_Click()
     File1.Pattern = Combo1.Text
End Sub
Poi? Vuoi copiarli in una ListBox?
Daniele

 Daniele
Ciao,
mi spiego meglio, una volta selezionato il tipo di file, dalla
comboBox, per cui voglio effettuare la ricerca, la lista dei file
trovati vorrei che mi venisse visualizzata all'interno della listBox.
grazie!

 
prego.

 Daniele
Ciao,
mi spiego meglio, una volta selezionato il tipo di file, dalla
comboBox, per cui voglio effettuare la ricerca, la lista dei file
trovati vorrei che mi venisse visualizzata all'interno della listBox.
grazie!
--
oltre al suggerimento di daniele, se non usi un filebox ma un listbox, 
guarda nella guida la funzione dir$()
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: [CONTROLLI] Come realizzare un treeview con più campi

Salve a tutto il NG.
Avete presente la finestra di OE dove c'è l'elenco dei messaggi?
Ok, avrei bisogno di qualcosa di simile, ma con il treeview non sono
riuscito a combinare niente. Innanzitutto è possibile realizzarlo
utilizzando i controlli di VB?
Eventualmente dove scaricare questo controllo?
--
Samuele Battarra
mail server: 
libero.it
, account: battarsa

 utilizzando i controlli di VB?
Credo che in realta' sia una listview (che quindi hai gia') in vista Report
(lvwReport) con la prima colonna indentata.
Tipo una cosa del genere:
Option Explicit
Private Declare Function SendMessage _
    Lib "user32" Alias "SendMessageA" _
    (ByVal hWnd As Long, _
    ByVal wMsg As Long, _
    ByVal wParam As Long, _
    lParam As Any) As Long
Private Type LVITEM
   mask          As Long
   iItem           As Long
   iSubItem     As Long
   state           As Long
   stateMask   As Long
   pszText      As String
   cchTextMax   As Long
   iImage       As Long
   lParam       As Long
   iIndent       As Long
End Type
Private Const LVM_FIRST = &H1000
Private Const LVIF_INDENT = &H10
Private Const LVNI_ALL = &H0
Private Const LVNI_SELECTED = &H2
Private Const LVM_GETNEXTITEM = (LVM_FIRST + 12)
Private Const LVM_GETITEM = LVM_FIRST + 5
Private Const LVM_SETITEM = LVM_FIRST + 6
' LV e' la listview di cui si vuole far rientrare la colonna
' nIndent e' il numero di rientri (larghi circa quanto l' icona)
' n.b.: non ho gestito gli errori
Public Sub IndentaListView(ByRef LV As ListView, ByVal nIndent As Integer)
        Dim lvitem_ As LVITEM
        Dim flag As Long
        Dim sty As Long
        lvitem_.mask = LVIF_INDENT
        lvitem_.iItem = LV.SelectedItem.Index - 1
        flag = LVNI_ALL Or LVNI_SELECTED
        sty = SendMessage(LV.hWnd, _
                            LVM_GETNEXTITEM, -1, ByVal flag)
        lvitem_.iItem = sty
        If (SendMessage(LV.hWnd, LVM_GETITEM, 0, lvitem_)) Then
            lvitem_.iIndent = lvitem_.iIndent + nIndent
            Call SendMessage(LV.hWnd, LVM_SETITEM, 0, lvitem_)
        End If
End Sub


Prova ad andare sul sito 
WWW.VBACCELERATOR.COM
 (credo sia con una 'L'
sola, al massimo prova con due...), hannno una cosa che e' esattamente
cio' che chiedi.
Bye by Massimo 8-]

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

Qualcuno sa dirmi dove posso trovare Visual Basic 3 da scaricare ?
Grazie

 ha scritto nel messaggio
news:8tmnhn$24j$1...@fe2.cs.interbusiness.it...


 wrote in message
news:8tmp24$52hu$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: ...continua

VBNET:
nomeditta=txtCerca.Text
 
 
VB6:
nomeditta=txtCerca
 
-- 
Gulpï¿œ

 nomeditta=txtCerca
 
Questo ï¿œ un bene, o perlomeno ï¿œ logico. Le default properties
in VB erano una delle cose che facevano inorridire i puristi
(categoria alla quale, sia detto per inciso, mi pregio di NON 
appartenere :-D).
 
Ma in un ambiente davvero OO, ï¿œ decisamente logico che se io
mi riferisco a una textBox, voglio riferirmi "alla textBox",
non ad una sua proprietï¿œ.
Se voglio riferirmi alla proprietï¿œ, devo specificare quale.
 
Bye, G.

 
 
Quoto. Maledette Proprietà di default :D 
 

 Se voglio riferirmi alla proprietà, devo specificare quale.
 
si, hai ragione. E' giusto.
 
-- 
Gulp®

Newsgroup: it.comp.lang.visual-basic
Titolo: Che differenza c'è tra Oca e Ocx

Mi sono accorto che se includo un ocx nel mio progetto,
a volte mi carica un oca nei riferimenti.
Che tipo di file è .rll
L'ho visto quando uilizzavo il rif a sqldmo Object Library,
esso mi associava al file sqldmo.rll
Un grazie a chi mi sa rispondere.
P.s. Secondo voi non bisogna dire a M$ di allargare la
form per includere i riferimenti?In modo tale da vedere
quei c@@@o di percorsi di dll?
Ciao
Oz
--
Carè Walter SIA SOFTWORK S.R.L.
Via Zanardelli, 13/A - 25062 Concesio (BS) Italy
Tel. 0039-30-2008135/0039-30-2091057  Fax. 0039-30-2004911
Web: 
http://www.siasoftwork.it
 - E.mai:- 
ca...@siasoftwork.it

esso mi associava al file sqldmo.rll
i file oca sono dei files stupidi (in genere di capigliatura bionda), e
contengono la cache delle proprietà dell'ocx.
In effetti non dovrebbero servire in quanto mi pare di ricordare che l'ocx
in mancanza se lo ricrea.
Ciao

 quei c@@@o di percorsi di dll?
concordo appieno, l'ho sempre detestato... ci voleva molto ad assegnare il
percorso anche alla proprietą ToolTipText della label?! mah...
Faber

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

Un'aiuto....
Problema, dichiarare una variabile pubblica tipo var1 = 0 che sia visibile a
tutti i form, ma non solo che da qualsiasi form sia possibili aggiornarla,
mi potete dare delle dritte magari con degli esempi.
Grazie

 wrote in message 83cq5j$gjn$1...@nslave2.tin.it...


 progetto). Sarà visibile a tutti e da tutti modificabile.
Ho fatto in questo modo
---Modulo Bas
Option Explicit
Public Var1
Sub Main()
    Var1 = 0
End Sub
-- Pero arrivato la form x
non succede nulla la var è vuota

ma la sub Main la esegui?
se hai messo come modulo di avvio il Form x e nessuno esegue la sub Main la
variabile non viene assegnata.
Poi, a livello di modulo o di form, dichiara Var1 con il tipo corretto
Public Var1 as Integer
....                       Double
......                     ecc..

Se ho ben capito il modulo di partenza dell'applicazione deve essere
la sub main... ma scusa anche se questa e presente nel modulo bas?

 wrote in message 83drtr$b8v$1...@nslave2.tin.it...
