mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: è possibile creare MATRICE in RUNTIME ?

Dim A() As Double
Private Sub Command1_Click()
For INDICE = 0 To 10
    ReDim Preserve A(INDICE)
    A(INDICE) = INDICE ^ 2
Next
End Sub
Durante l'esecuzione potrei aver bisogno di altre matrici dinamiche
ma non posso dichiararle a priori perché non so quante ne serviranno.
x spiegarmi meglio faccio quest' altra sub.
Private Sub Command2_Click()
Set NUOVA(INDICE) = A()
For INDICE = 0 To 10
    ReDim Preserve NUOVA(INDICE)
    NUOVA(INDICE) = INDICE ^ 3
Next
End Sub

 ha scritto nel messaggio
news:8fs4vf$1fu$2...@nslave2.tin.it...


 End Sub
E quel "Set NUOVA..." da dove sbuca? Cos'e` "NUOVA"?
--
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: audio in VB mai nessuno ha affrontato il problema?

forse dirò stupidaggini ma scrivo tutto quello che ho potuto capire.
per avere effetti audio tipo fade-in fade-out oppure aumento della velocità
bpm ecc...
in un programma vb bisogna ricorrere alle direct sound ma c'è una guida da
qualche parte su come usarle?
o forse bisogna usare le api di windows?
booooo! helpatemi o googlato fin troppo e o gli occhi a palla ormai. thanks
a tutti.

 a tutti.
scaricati le DX9_SDK.exe o directx media dovrebbero esserci strumenti di
sviluppo per vb ( ocx , codice ecc... ) e se ci riesci fammi un fischio che
mi serve anche a me !


da dove li scarico che non li trovo?

 ha scritto nel messaggio
news:b099rb$41s$1...@lacerta.tiscalinet.it...


 Auguri.
scusa hai lavorato anche con le directx9 in vb6 ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Con o senza ActiveX

Buongiorno a tutti, volevo sapere se è possibile creare un ActiveX EXE
il quale se dichiarato nel progetto funziona normalmente, ma in caso
questa ActiveX non sia presente il programma funzioni senza
"arrabbiarsi" (ovviamente senza le funzioni di quest'ultima).
Ringrazio anticipatamente tutti coloro che potranno aiutarmi. Cece

 "arrabbiarsi" (ovviamente senza le funzioni di quest'ultima).
L'assenza di qualsiasi tpo di ActiveX non fa arrabbiare il programma se
questo non lo invoca.
Ciao
--
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Crea exe disabilitato

VB6 SP5
Questa mattina ho trovato una sorpresa nell'uovo di Pasqua.
Ho aperto l'applicativo, ho editato un paio di righe, ho salvato e, quando 
ho cercato di creare l'eseguibile il relativo comando (crea exe da menů 
file) era disabilitato. E non c'č stato verso di riabilitarlo.
Ieri ho passato l'intera giornata a provare delle soluzioni e, a questo 
scopo, ho aggiunto un paio di ocx di terzze parti. Puň dipendere da questo? 
Devo reinstallare VB?
eSQueL preoccupato 

salve,

ricordo che anni fa successe anche a me.. prova a vedere 
http://www.xtremevbtalk.com/showthread.php?t=261990
saluti
-- 
Andrea Montanari (Microsoft MVP - SQL Server)
http://www.asql.biz
DbaMgr2k ver 0.21.1 - DbaMgr ver 0.65.1 and further SQL Tools
http://www.hotelsole.com
 - 
http://www.hotelsolericcione.de
--------- remove DMO to reply 

 -- 
Mi hai toltodai guai.
Grazie, grazie, grazie :)
eSQueL
Newsgroup: it.comp.lang.visual-basic
Titolo: Parametro funzione SQL

Ciao a tutti.
Sto utilizzando per la prima volta Visual Web Developer 2005 e mi sto
impratichendo sui controlli di Accesso. Tutto molto intuitivo ma adesso mi
sono arenato. Ho l'esigenza di visualizzare in una GridView i campi
dell'utente che ha effettuato il login non appena la pagina viene caricata.
Ci sono riuscito creando una Sessione al login ed utilizzando il parametro
"Nome Utente" nella query oppure assegnando ad una label nell'evento
Page_Load NomeUtente = 
User.Identity.Name
 ed utilizzando la proprietà text
nella query.
Però tutto questo mi sembra poco elegante ed immagino ci sia un modo più
pratico per visualizzare i dati corretti. Ho pensato di  utilizzare il
controllo LoginName ma non mi restituisce la proprietà text.
Secondo voi come posso nella query presente nella pagina ASP inserire come
parametro 
User.Identity.Name
 o eventualmente un riferimento ad uno script
che restituisca il nome utente visto che, forse sbaglio, il codice VB o/e
eventuali funzioni non sono ammesse?
Avete altri suggerimenti?
Grazie
Valter

 eventuali funzioni non sono ammesse?
Penso di aver risolto...posto la mia soluzione sia per chi potrebbe trovarla
utile sia per avere eventuali critiche o ulteriori suggerimenti....
nel Page_Load del CodeFile ho posto l'istruzione:
---  SqlDataSource1.SelectParameters("UserName").DefaultValue =
User.Identity.Name
e nella pagina aspx corrispondente, nella sezione SelectParameter della
Select:
--- <asp:Parameter Name="UserName" Type="String" />
La GridView restituisce solo il record dell'utente che ha effettuato il
login.
Grazie e ciao
Valter
Newsgroup: it.comp.lang.visual-basic
Titolo: Testi

Ciao a tutto il ng, anzitutto. Pur essendomi sempre dilettato in
programmazione (a livello assolutamente non professionale) con Win 95 persi
l'uso delle dita ;-) e smisi di programmare.
Adesso sto tornando alla ribalta. Ho Visual Studio Enterprise e anche Visual
Basic 6 for Dummies della Apogeo (autore Wallace Wang). Il testo pero' non
mi soddisfa, ci sono pochi esempi di programmi e non tutte le possibilita'
del linguaggio vengono affrontate. Avete dei testi non troppo complicati da
consigliarmi? Ve ne sarei grato.
A proposito, quanto possono essere 'da principiante' le domande fatte in
questo ng?
Altra domanda: esiste un sito del ng?
Grazie ancora.
Ciao, Fra.
--
-------------------------------------------------------------
"...Ma che almeno il pane e i circensi siano di qualita'!"
___________________________________________________________
Francesco Beltramini ----- 
Francesco....@infinito.it
V.A.Nicolodi n.15                     oppure: 
fra...@ngi.it
50131 Firenze                              Icq n.: 30870593
Cell: 0349-3136205
http://members.xoom.it/Kaossian

 "...Ma che almeno il pane e i circensi siano di qualita'!"
--
Ciao.
Maurizio
--------
"Ti do la possibilita` di scegliere fra le mie tante botteghe
e i miei tanti canali... di che ti lamenti?" (Imperator)
--------
?SPQR(C)
 X

  X
Maurizio ti ringrazio per la disponibilita' e la velocita' con cui mi hai
risposto. Non temere che presto iniziero' ad assillare il ng con domande di
vario genere. Un saluto a tutti ed altro grazie a te (ho notato le affinita'
tra le nostre signature, ma la tua e' decisamente piu' bella, dove l'hai
presa?)
Ciao, Fra.
Newsgroup: it.comp.lang.visual-basic
Titolo: Database

Ciao,
ho un database con tabelle, campi e record.
i record sono tanti.
voglio salvarlo senza record cioč mantenendo tutta la struttura ma senza
dati (e quindi anche il campo ID deve essere azzerato e deve ricominciare da
0).
come si fa?

 ha scritto nel messaggio
news:VzZ2b.44154$zN5.1...@news1.tin.it...

che database? access?
beh, per cancellare i record... con la "delete from tabella"... o su access
o sql server, "a mano"
per azzerare il campo ID (non lo dici, ma suppongo che sia un campo
autoincrement), su access devi compattare il database (compatta e ripristina
database)

 ripristina database)
Sei sicuro??? A me non risulta che la compattazione azzeri il campo
autoincrementante, ma può darsi che mi sbagli.
-- 
Saluti
Andrea Moro

 ha scritto nel messaggio
news:bii751$9f72u$1...@ID-61006.news.uni-berlin.de...

Solo se la tabella è vuota ovviamente e anche qualche altro vincolo se vi
sono relazioni.
Saluti

 Sei sicuro???
SI, a patto (chiaramente), che la tabella sia vuota.
parlo di access 2000


 sono relazioni.
Visto che Marte in questo periodo č piů vicino alla terra .. il suo post č
arrivato prima !

non solo non azzera l'ID ma addirittura mi ingrandisce le dimensioni del
file (!)     :-(

 file (!)     :-(
eh?
vieni subito qua che ti faccio vedere Access 2000 (oppure Access XP) che
azzera l'ID e diminuisce di un casino la dimensione del file
sbagli qualcosa, temo...

 ha scritto nel messaggio
news:VzZ2b.44154$zN5.1...@news1.tin.it...
: Ciao,

Sei molto vago...
Database Access, immagino.
1) Svuota la tabella con DELETE FROM....e poi compatta il database.
2) Utilizza altri comandi SQL come TRUNCATE ecc. ecc. (attento, la
'troncatura' non funge se hai tabelle relazionate tra loro, consulta la
guida a riguardo)
3) Salva lo schema del db in XML, con .NET č una stupidaggine, in VB non so
se sia altrettanto facile.
4) Sii piů chiaro:-)
Ciao, Luca.

 sbagli qualcosa, temo...
1) per quanto riguarda l'ID hai ragione, se cancelli tutti i record ti
azzera l'ID.
2) per quanto riguarda le dimenzioni: X.MDB è 98KB, contiene 5 record.
Cancello tutti i record, compatto, l'ID si azzera dimenzione 100KB!!!

 ha scritto nel messaggio
news:GF63b.269618$lK4.8...@twister1.libero.it...

non riesco a capire cosa intendi con .net? 
vb.net
 non č .net? e comunque se
ti riferisci a vb6 e facilissimo col dom

Newsgroup: it.comp.lang.visual-basic
Titolo: Mp3 Ocx

Cerco Ocx per riprodurre i file MP3 in Vb5. Grazie per la collaborazione

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Lanciare un'applicazione

Salve a tutti,
voglio lanciare un gioco, all'interno di un prg VB, cosa molto
semplice...Per un'applicazione qualsiasi (diversa dal gioco) tutto funziona
benissimo. Perchè non va bene per i giochi?
Grazie.
Utilizzo
Function StartDoc(DocName As String) As Long
          Dim Scr_hDC As Long
          Scr_hDC = GetDesktopWindow()
          StartDoc = ShellExecute(Scr_hDC, "Open", DocName, _
          "", "C:\", SW_SHOWNORMAL)
 End Function
    r = StartDoc("C:\Programmi\Daydream Software\Ski-Doo X-Team Racing
DEMO\RacingDEMO.exe")
Ho provato anche diversamente:
Shell("C:\Programmi\Daydream Software\Ski-Doo X-Team Racing
DEMO\RacingDEMO.exe", 1)
Ma con lo stesso risultato.

 ha scritto



Usa CreateProcess.
Andrea

 ha scritto nel messaggio
news:as7n6q$ogfp8$1...@ID-170738.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6+AutoCAD] domanda da ignorante...

Scusate per l'insulsa domanda ma non so come fare.
Ho guardato già su google ma non sono riuscito a trovare risposta.
Vengo al problema:
Da una piccola applicazione devo inviare ,supponiamo tramite un bottone,
una serie di comandi alla riga di comando di AutoCAD,ho visto,sempre su
google che si può usare la SendKeys.
Il problema è che non riesco dalla mia applicazione inviare una stringa
ad AutoCAD,come posso fare a far "parlare le due app" ?
Grazie
R.Zanni
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 R.Zanni
Prima di SendKeys devi eseguire AppActivate. MSDN docet. =)
Lokar

Grazie, ma AppActivate presume il passaggio dell'ID della finestra 
ritornato dalla shell.
Nel mio caso AutoCAD è già avviato,come rintraccio l'ID per inviare le
stringhe
alla finestra giusta ???


 stringhe alla finestra giusta ???
Non e' esatto, come insegna MSDN, la sintassi di AppActivate e':
AppActivate Title, [Wait]
ove "Title" e' una "Espressione stringa che specifica il titolo nella
barra del titolo della finestra di applicazione da attivare. Al posto di
title, per attivare un'applicazione è inoltre possibile utilizzare l'ID
del task restituito dalla funzione Shell." (MSDN - AppActivate).
Insomma basta il "titolo sulla barra del titolo nella finestra".
Nel tuo caso (non so com'e' il titolo della finestra di ACAD) ma la
chiamata di funzione dovrebbe somigliare a:
AppActivate "AutoCAD"
SendKeys "%FS" '(ALT+File ---- Save)
Lokar


Newsgroup: it.comp.lang.visual-basic
Titolo: Rendere l'aspetto Disabled di una bitmap

Salve,
non so se il subject sia esplicativo ma mi spego meglio. 
Se inserisco una BitMap su un commandbutton, se rendo il commandbutton
enabled=false la bitmap acqusita un aspetto particolare perdendo i
colori (tipico aspetto disabilitato). Se lo stesso effetto lo volessi
ottenere con una immagine contenuta in un controllo picture o un
controllo Image1, qualcuno ha qualche idea da suggerirmi, qualche API
da utilizzare?
Grazie per l'aiuto eventuale.
Robin


Un sistema semplice è questo, senza subclassing :
Piazzi nel form due controlli image invisibili, uno con l'immagine
"abilitata" ( imgEnable) e l'altra con l'immagine "disabilitata" ricolorata
di grigio (imgDisable), puoi utilizzare il paint per farlo.
A questo punto:
'Se abilitato
Image1.Picture = imgEnable.Picture
'se disabilitato
Image1.Picture = imgDisable.Picture
Semplice, no?
--
Dark Hado
"Pensare non è essere d'accordo o in disaccordo: questo è votare."
--- Robert Lee Frost ---

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

in un form ho un timer con impostato interval=500
ogni secondo(quindi ogni interval*2) mi esegue un addizione in una variabile
questa variabile viene poi elaborata subito dopo in modo che diventi un
"tempo", cioč del formato
13:05:22
qui riscontro un problema:
se sommo 1 ad un qualsiasi oggetto (es. la caption di un command button)
tutto ok, mentre nella variabile si raddoppia, cioč viene sommato 2!!!
questo solo se faccio run senza trace, se passo ogni istruzione con F8 tutto
OK, il tempo diventa reale!!
se non mi sono spiegato posso spedire a chiunque vuol darmi una mano i
sorgenti!!
grazie
--
Now I Greet You
...GooD LooK...
ŚŹ)
EffEPi SySteM
EffEPi...@iol.it
Fabrizio Parrella
 - VB6 - SP2
UIN:21371755
------
Grazie a tutti per l'aiuto Passato e Futuro!!
------
togliere FP. dall'indirizzo E-Mail

...


GRAZIE, ma ho risolto !!!
era una moltiplicazione che mi era scappata di mano!!
grazie comunque
Simone Severa (Assistenza Internet Uninet) ha scritto nel messaggio ...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] selezionare una sola riga di un aMSflexgrid

Salve è la prima volta che uso un aFlexGrid e devo risolvere un paio di
problemi:
1) ho imposo la slezione per righe (facile è un propritetà..) ma come si
evta la multiselezione?
2) le celle posso avere la funzione di "contenitore"(come un apicture box
per intenderci), se nop essitono altri controlli tipo "grid" che mi
permettoo questa opzione?
Grazie a tutti!
--

 wrote in message
10qpleb$9o7$1...@fe2.cs.interbusiness.it...

Non preoccuparti, la MSFlexGrid è una buona amica, ma bisogna prenderci un
p'ò la mano, io la uso ormai da 4 anni per lavoro dato che faccio il
programmatore.
Ti allego un pezzo di codice che, dopo aver creato un form con una
MSFlexGrid, puoi incollare ed eseguire.
'***************************************
Option Explicit
Private Sub Form_Load()
    Dim kR          As Integer
    Dim kC          As Integer
'---------------------
    MSFlexGrid1.FixedRows = 0: MSFlexGrid1.FixedCols = 0
    MSFlexGrid1.Rows = 0
    For kR = 0 To 4
        MSFlexGrid1.Rows = kR + 1: MSFlexGrid1.Row = kR
        For kC = 0 To MSFlexGrid1.Cols - 1
            MSFlexGrid1.TextMatrix(kR, kC) = kR & " " & kC
        Next kC
    Next kR
End Sub
'***********************************************************************
' Questo è il pezzo di codice che impedisce di fatto la multiselezione *
'riselezionando sempre la prima riga selezionata nel caso si tenti la  *
'multiselezione                                                        *
'***********************************************************************
Private Sub MSFlexGrid1_SelChange()
    MSFlexGrid1.RowSel = MSFlexGrid1.Row
End Sub

Dove lo posso tovare  il controllo aFlexGrid
Mi servirebbe con urgenza
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 & CR8

Ciao. Per sviluppare report sui miei progetti utilizzola versione 8.0
Professional di Crystal Report. Ho letto che sulla versione 8.0 Developer
esiste un file di Help chiamato Runtime.hlp (che sulla Professional non
c'è)!
Qualcuno saprebbe dirmi dove posso scaricarla o potrebbe inviarmi via mail
questo file?
Grazie a tutti!
Andrea

 questo file?
Potrei... ma non sono "sicurissimo" di non infrangere licenze...
ciao
ugo

 ha scritto nel messaggio
news:af97dd$ce804$1...@ID-96367.news.dfncis.de...


 E' solo un file di help! ^_^
Facciamo così:
tu ci dai un indirizzo un po' meno anonimo
e, magari, noi ti diamo l'help...
ciao
ugo

 Professional _non_ è destinata agli sviluppatori, come la

Newsgroup: it.comp.lang.visual-basic
Titolo: si puo' inglobare gli ocx nel .exe?

Scusate, sono un novellino. Ho realizzato un applicazione contenente un
controllo flexgrid. Ho notato che l'applicazione non gira su altri pc
perche' nella dir windows/system non c'è un file .ocx relativo al flexgrid.
Quindi in teoria sarebbe necessario creare il pacchetto di installazione con
l'apposita funzione di VB6
Non si potrebbe in qualche modo incorporare quel file nel .exe in modo da
distribuire un unico file gia' funzionante senza che l'utente debba
inzozzare la directory di windows?
Grazie

 [...] Non si potrebbe in qualche modo incorporare quel file [OCX] nel .exe
in modo da distribuire un unico file gia'  funzionante senza che l'utente
debba inzozzare la directory di windows?
Bella domanda!
Risposta: no.
Ciao,
Carlo.

gli ock no, i controlli utente invece (che sono la base degli ocx) vengono
inclusi!
Ciao SIMO
--
__________________
www.sasim.net
* Vb è relativamente semplice perchè c'è MSDN: Usa F1 !!
* Server IRC : 
irc.azzurranet.org
 --> Canale: #it_lang_vb
* Sito Comune Ng: 
http://www.it-lang-vb.net
* Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt
* I vecchi messaggi su: 
http://groups.google.com/


 inzozzare la directory di windows?
http://www.bit-arts.com/fusion.html
cmq nella system ci finiscono lo stesso...
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: help..scusate non Ringhiate ..

Buon giorno.
Sto testando un prodotto scritto in VB5 con tabelle oracle, chi avesse
esperienza in merito, al lavoro di testaggio per trucchi, materiale da
ricercare ,o tecniche , sarei veramente grato scambiare informazioni per
imparare nuove tecniche.
-- 
Crepaldi Luca
Tart...@hotmail.com

 scritto nell'articolo
<01be240b$5ce67580$5100940a@nwx01t4320>...


Aiuterei volentieri, ma credo che Vb + Oracle NON sia roba da
tutti i giorni....
Bah, comunque non vorrei sbagliami. Auguri!

Newsgroup: it.comp.lang.visual-basic
Titolo: REQ: dove stanno le icone di access?

Salve a tutti, volevo sapere se qualcuno conosce il file che contiene le
icone di access,tanto per intenderci quelle dell'autocomposizione dei
pulsanti,e come faccio eventualmente ad estrarle?
Grazie e ciao
Pietro


Li trovi dentro MSAccess.exe e ti consiglio di aprirli con Microangelo.
Microangelo e' sw e lo trovi al sito 
http://www.impactsoft.com
Ciao
Riccardo

Newsgroup: it.comp.lang.visual-basic
Titolo: Downgrade da Visual Studio 2005 Pro con MSDN Pro a Visual Studio 6

Salve a tutti. Ho acquistato Visual Studio 2005 Professional con MSDN
Professional e vorrei avvalermi della possibilità del downgrade verso
Visual Studio 6 (cosa che sembra possibile come riportato al punto 5
del link 
http://www.microsoft.com/italy/msdn/prodotti/howtobuy/vs2005/licenze/default.mspx
).
Qualcuno sa come ottenere i CD ed il codice di installazione per poter
installare Visual Studio 6?
Grazie



Leggi questo sul blog di Gianluca, anche se un pò datato:
http://community.visual-basic.it/gianluca/archive/2004/07/29/295.aspx
--
ciao
  Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Dimensionamento colonne in MSHFlexGrid

Scusate ma anche dopo aver letto i messaggi postati in precedenza non
riesco a ridimensionare le colonne di una MSHFlexGrid a secondo della
lunghezza del dato contenuto. 
Ho provato applicando a ColWidth un valore ottenuto moltiplicando la
lunghezza in caratteri del campo * vari parametri ma non funziona.
Forse non capisco bene il significato di TWIP e il suo valore.
Grazie !
Per rispondermi togli NOSPAM dall'indirizzo
tudro...@tin.it

Forse non capisco bene il significato di TWIP e il suo valore.
Se il font della griglia e' lo stesso del form, puoi fare cosi':
grdMiaGriglia.ColWidth(indice_colonna) = frmMiaForm.TextWidth(strTestoNellaCella)
ciao, hal

Ciao VB
ho provato con w2k, vb6 sp4.
come e' il tuo ambiente ?



Grazie tante, comincio a vedere qualcosa di giusto.
Mi stupisce perņ che non esista una proprietą che possa dimensionare
la larghezza della colonna ad un determinato valore.


 ha scritto nel messaggio
news:98rh9o$38ajs$1...@ID-56381.news.dfncis.de...



 Mi stupisce però che non esista una proprietà che possa dimensionare


Ma perchč con un valore fisso a colwidth(NUMEROCOLONNA) non funziona ???
Funziona si ma vorrei che si dimensionasse perchč a seconda del tipo
di ricerca i valori della colonna possono essere di lunghezza diversa
(es una data oppure un indirizzo )
Bye


Il twip non ha un significato.    =) E' soltanto una unità di misura.
Per essere esatti è un'unità di lunghezza equivalente a 1/1440esimo di un
pollice o 1/567esimo di un centimetro.
--
Franco A. Politano -- Luvme2times
"Love me two times babe | I'm going awayyyy"
J.M.D.

 ha scritto nel messaggio
news:98rjak$3bao4$1...@ID-56381.news.dfncis.de...

Ho provato con VB6 sp3 su Win 95 e VB6 su Win ME e su entrambi la colonna
rimane più stretta della scritta ho provato anche+ font ma nisba.
Ciao VB

Ciao VB
Ci rimane la speranza che non sia il SO dell' utente, ma bastino un centinaio di MB
del SP a risolvere.
Sigh :°-)
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: BUG in Visual Basic 6

Come mai se scrivo il seguente codice:
  dim i as integer
  i=5
  msgbox  "pippo" + str(i)
ottengo la stringa "pippo 5" anzichè la stringa "pippo5" ?
cioè per quale motivo VB mi inserisce uno spazio???????????

...



Boh.... lo fa anche a me.... ma si risolve scrivendo:
MsgBox "pippo" & i
senza convertirlo in string
Ciao

cioč per quale motivo VB mi inserisce uno spazio???????????
E' lo spazio per il segno... STR$() funziona cosě
fin dai tempi del Quick Basic ! ^___^
Zeross

cioè per quale motivo VB mi inserisce uno spazio???????????
Perche' cosi' e'. Nella guida in linea (VB4) si consiglia di usare Format
per evitare lo spazio, destinato a contenere l'eventuale segno meno. Questa
e' una caratteristica storica di tutti (o quasi?) i dialetti Basic.
--
Ciao.
Maurizio

MsgBox "pippo" & i
in quanto questo concatena ignorando spazi, se i contenesse null di
una variante str andrebbe in errore & no
se vuoi comunque usare str devi fare 
pippo+trim(str(i))
--------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxx.xx with 
tin.it

fin dai tempi del Quick Basic ! ^___^
  Lo faceva gia' il GW-Basic e forse esisteva gia' prima (non me lo
ricordo). :-)
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

ricordo). :-)
Non so... Dio ha voluto che iniziassi col QB ! ^__^
Cmq č abbastanza probabile che anche il
Gates William Basic (GW-Basic per gli amici)
si comporti cosě. ^___^
Zeross


-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own

Newsgroup: it.comp.lang.visual-basic
Titolo: Forms 2.0

Salve vorrei un'applicazione che installa le Forms 2.0 su una macchina su
cui non sono presenti, cosa devo fare? Quali file devo installare e quali
tra questi devo registrare??
Alessia



Forms 2.0, che, se non ricordo male, e' installato da Microsoft
Office, NON e' redistribuibile, quindi e' meglio non usarlo.
-- 
ciao, hal

 ha scritto nel messaggio
news:Dkb%9.117619$0v.34...@news1.tin.it...

Se puoi evita Forms 2.0 ... Microsoz non ne permette la distribuzione, se
oramai è troppo tardi... allora quello che puoi fare (a parte installare
office) puoi installare "Microsoft ActiveX Control Pad" (piccolo programmino
gratuito) che, come side effect, ti installa la famigerata Fm20.dll.
Newsgroup: it.comp.lang.visual-basic
Titolo: -> lo spazio libero su disco

come si calcola???
Ho trovato questa api:
Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA"
(ByVal lpRootPathName As String, lpSectorsPerCluster As Long,
lpBytesPerSector As Long, lpNumberOfFreeClusters As Long,
lpTotalNumberOfClusters As Long) As Long
Pero' non so come impostare i parametri
************
RISPONDETEMI SUL NEWSGROUP
ci@o

 ci@o
per una volta, uno che _non_ chiede una risposta email :)
qui sotto qualche dritta la trovi. a me sembra molto pratica la guida del
kpd.
* apiguide online e scaricabile, con esempi, free, in inglese:
http://users.turboline.be/btl10148
* raccolta con spiegazioni, in italiano:
http://members.xoom.it/cesarerizzi
* raccolta in html, con spiegazioni, in inglese:
http://skyscraper.fortunecity.com/transmission/45/api/index.html
per i dischi >2g, credo dovresti guardare anche
Declare Function GetDiskFreeSpaceEx Lib "kernel32" Alias
"GetDiskFreeSpaceExA" (ByVal lpRootPathName As String,
lpFreeBytesAvailableToCaller As Currency, lpTotalNumberOfBytes As Currency,
lpTotalNumberOfFreeBytes As Currency) As Long

Ti mando per e-mail un progettino (non mio) ma modificato da me per quello
che ti serve che dimostra l'uso di api per varie funzioni tra cui
GetDiskFreeSpace
Ciao Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Elencare files

Salve, avrei la necessità di elencare tutti i file di una cartella,
selezionarne 1 o più e poterli cancellare. Come iniziare?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 selezionarne 1 o più e poterli cancellare. Come iniziare?
http://groups.google.it/groups?hl=it&lr=&q=file+cartella&meta=group%3Dit.comp.lang.visual-basic
http://groups.google.it/groups?hl=it&lr=&q=file+eliminare&meta=group%3Dit.comp.lang.visual-basic
http://groups.google.it/groups?hl=it&lr=&q=file+cancellare&meta=group%3Dit.comp.lang.visual-basic
Ave
giuseppeD
---
CCR
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] creare controlli activex

Ciao a tutti.
Non so da dove cominciare nella creazione di un controllo activex. So
che devo fare nuovo progetto -> Controlli activex -> OK. E poi??? Mi
spunta un nuovo progetto che contiene al posto dei normali form un
"UserControl". Lì posso inserire vari controlli che messi insieme e
con un pò di codice diventano un unico controllo migliore. La cosa che
meno ho capito è come fare il debug o come lo posso chiamare,
l'esecuzione del controllo (in pratica se inserivo un pò di codice in
un prg normale di vb lo provavo facendo F5; ora che devo fare??). 
Per capirlo meglio vorrei che mi spiegaste passo passo ciò che devo
fare per creare un controllo che metta insieme un drivelistbox, un
filelistbox, un dirlistbox e li colleghi in modo che ogni volta che mi
servono basta che inserisco il mio controllo (che penso diverrà un
OCX).
Vi prego aiutatemiiiiiiiii!!!
Ciao,
	Salvo

 ha scritto nel messaggio
news:3b40d863...@news.inwind.it...


 ha scritto nel messaggio
news:3b40d863...@news.inwind.it...

Lo salvi, lo compili, ti annoti dove lo metti (il file.ocx, cioe'
compilato), clicchi col destro sulla casella degli stumenti ->
componenti... -> ti si apre una schermata. Clicca su sfoglia, indichi il tuo
controllo e... ecco fatto... lo usi come qualsiasi altro controllo.
Un modo semplice per testarlo consiste nel tenere 2 progetti aperti
contemporaneamente. Uno Exe standard, ed uno controllo Activex
P.S.: prima di provarlo sul progetto standard, devi compilare il progetto
ActiveX.
Pascal
--
________________________________
Padroni d'ITALIA!!!!!
Perche' perche',
la domenica mi lasci sempre sola
per andare a vedere la partita
della Roma
Perche'
Perche'
tifo Roma
tifo Roma
Ale' Ale'
_______________________________

 un prg normale di vb lo provavo facendo F5; ora che devo fare??).
[SNIP]
Dopo aver creato il nuovo progetto con il controllo ActiveX vai su File |
Aggiungi progetto... | e scegli Exe Standard; viene creato automaticamente
un gruppo di progetti,scegli il secondo (exe standard) e dal menu'
contestuale seleziona 'Imposta come progetto di avvio'.
A questo punto puoi inserire il tuo controllo in fase di sviluppo in una
form qualsiasi del secondo progetto (vedrai che compare l'icona nel toolbox,
ma, attenzione, solo se chiudi la finestra di design dello User Control) e
fare il debug di entrambi senza bisogno di compilare l'OCX.
Ciao
--
Luca Dormio
luca....@tin.it

Non mi sono ben spiegato nel mio post.
Io volevo sapere come si fa un OCX in generale e CASUALMENTE ho preso
in considerazione di fare quel controllo. So che esiste il
commondialog e lo so usare anche bene in quasi tutte le sue
funzionalità.
Ciao,
	Salvo


 funzionalità.
Prova a vedere nella guida MSDN...
[quanno ce vo' ce vo'...]
-- 
DElyMyth - ICQ: 8761263
Key fingerprint = E2F5 275D A50C FF24 34C0  9A0B 956B B1E6 0FD2 917B

Newsgroup: it.comp.lang.visual-basic
Titolo: Elenco commentato delle API


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Tempo di attività del computer

Mi piacerebbe sapere se posso rilevare attraverso un'API o quant'altro, il
tempo di attività del computer.
E' possibile infatti posso vedere tale valore in Microsot System Information
quindi penso si possa ricavare con una funzione.
Qualcuno potrebbe dirmela ?
Grazie.    £ o r i $.

GetTickCount. Ti restituisce il numero di millisecondi trascorsi dall'inizio
della sessione corrente di Windows.
--
Ciao a tutti
Cesare Nicola
http://digilander.iol.it/cesare
L'indirizzo del sito comune č:
http://www.murialdo.it:8000/it_lang_vb/
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO o RDO ?

Sto collegando un controllo a una fonte dati OLE DB e vorrei usare il
controllo ADO...
Se potete dirmi quale sarebbe il più appropriato tra l'ADO e l'RDO e quale
sarebbe il più sicuro?
E' possibile associare all'RDO tutti quei controlli che sono associabili al
controllo ADO (es. DataList, DataGrid)?
Ciao!!!
--
Posted from 
mta10-acc.tin.it
 [212.216.176.41]
via Mailgate.ORG Server - 
http://www.mailgate.org

Io direi di utilizzare ADO perchè RDO sparirà fra non breve.
"vbStefano" wrote in message <001601be7ac8$5427e0a0$07a6d8d4@catania>...


sarebbe il piů sicuro?

Newsgroup: it.comp.lang.visual-basic
Titolo: Winsock e proxy

Qualcuno e' riuscito ad utilizzare il controllo WinSock attraverso un proxy
e non un modem locale?
(non mi funziona nemmeno in una rete connessa ad internet tramite router.)
Ciao e grazie.
--
/||||||||||||||||||||||||||||||||||||||||||||||||\
               Kjo
\||||||||||||||||||||||||||||||||||||||||||||||||/

 wrote in message
news:UiqA6.13398$k53.2...@news1.tin.it...


 wrote in message
UiqA6.13398$k53.2...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Scrivere dati in una cartella condivisa in sola lettura

Salve a tutti, ho il seguente problema.
Su un server (Win 2000 server) ho una cartella.
Un mio programma dovrebbe scrivere dati in questa cartella quando viene
lanciato su un qualsiasi computer della rete collegato al server.
Inoltre il contenuto della cartella deve essere liberamente consultabile
dagli operatori, che però non possono modificare i dati.
Per impedire le modifiche, ho impostato la cartella con condivisione
in sola lettura, ma così ne impedisco le modifiche anche da parte del
programma.
Esiste un qualche modo per far scrivere dentro la certella al programma?
Possibili soluzioni che ho pensato.
- Impostare i permessi della cartella in modo che sia di sola lettura
  per tutti tranne che per l'utente pinco palla, così lui può
  liberamente scrivere.
  Problema: per far funzionare il programma devo fare il logout e
  rilogarmi come pinco palla, per poi fare il percorso inverso al
  termine. Non posso utilizzare la bellissima funzione presente sul
  server "esegui come utente diverso" perchè i client hanno un semplice
  win98.
- Installare sul server un programma tipo ftp e scrivere tramite questo.
  La soluzione non piace all'amministratore che mi ha detto di tenerla
  come ultima spiaggia.
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/

CUT
soluzione di rimbalzo:
mandalo al webserver 2 sol:
a) pagina ASP che chiede utente e PW e carica il file (ci sono un sacco di
script per upload a giro)
b) Componentino che si integra in IIS accetta il tuo input(lo riconosce) e
lo scarica dove deve!
...tanti il webserver con win2kserv c'č!...se non l'ha attivato ancora
meglio...una Intranet locale a tutti gli effetti!
penso che questo l'amministratore te lo possa concedere no?
....al volo...mentre scrivo una altra sol...
se lo scarichi via ftp in una cartella isolata(quindi i client + che li non
vanno!)....e uno script o mini programmino che gira sul server(come servizio
sarebbe il massimo!) si occupa di testare se c'č roba in quella cartella(con
i vari check del caso) e di spostarla al posto giusto??
Ciao...al volo mi č venuto in mente questo!
:-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere in automatico

Avendo come esempio un sito tipo motore di ricerca, ad esempio Google.com,
dove si inserisce nello spazio la parola da ricercare, secondo voi  č
possibile con un programma VB, che ha al suo interno il suo browser, fare in
modo che automaticamente senza che l'utente debba toccare alcun tasto
inserire delle keyword nella text box della pagina (text box -->dove vengono
inserite le parole da ricercare)???
In altre parole io apro la pagina 
google.com
 poi voglio scrivere la parola
ciao (senza pero' digitare sulla tastiera) nell'apposito spazio
.................č fantascienza????
Grazie
Chiara

 .................è fantascienza????
... telepatia???
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Tabelle DBF collegate in un database MDB

Ho il seguente problema:
Ho un programma che gira su una rete di pc (pier to pier), su uno dei pc che
funge da Server (solo perchè concentra la maggior parte dei dati) ho un MDB
in cui ho 2 collegamenti a 2 tabelle DB3 che risiedono pure loro sulla
stessa macchina.
I due file DB3 subiscono modifiche, aggiornamenti, ecc tramite programma
Clipper. Quando da mio programma VB6 (programma che gira non sulla macchina
definita Server, ma su un'altro dei PC dell'ufficio) accedo all'MDB non
riesco a vedere le ultime modifiche fatte alle tabelle DB3, se per esempio
ai file DB3 sono stati aggiunti dati, da programma io non riesco a vederli.
C'è qualche cosa che devo fare per forzare l'aggiornamento ?
Grazie anticipatamente a chi mi risponderà.

>ai file DB3 sono stati aggiunti dati, da programma io non riesco a vederli.
Sara' un problema di indici. Hai impostato gli indici da aprire per ogni tabella? Mi sembra inoltre che il Jet di Access usi solo gli ndx mentre di default il clipper usa gli ntx (puoi cambiarlo pero').
Antonio

Sara' un problema di indici. Hai impostato gli indici da aprire per ogni
tabella? Mi sembra inoltre che il Jet di Access usi solo gli ndx mentre di
default il clipper usa gli ntx (puoi cambiarlo pero').
Antonio
----------------
Le tabelle non usano indici, quindi non dovrebbero essere quelli il
problema.



Newsgroup: it.comp.lang.visual-basic
Titolo: Quando la GRID di vb4 vi va` STRETTA ???

Ciao,
devo creare un form per il rapido inserimento delle ore spese da ogni 
dipendente di una ditta su una attivita` di una commessa.Volevo mettere 
in una griglia i dati sulle "ore spese"  provenienti da un db mettendo 
sulle ascisse le date e sulle ordinate i dipendenti per poi poterli 
modificare e aggiungere. 
Penso che usare la Grid standard di vb4 mi richiederebbe un 
po`troppo codice, visto il tempo che ho. Mi servirebbe quindi un 
controllo, anche  bruttino ma gratis. Penso di non poter far accuistare 
un altro controllo alla ditta per cui faccio il lavoro visto che volevo 
gia' fargli spendere 250 $ (fottuti DOLLARI U.S.A.) per un controllo 
GANTT(Gantt/VBX della Addsoft). <- qualcuno lo conosce ?  non e'che posso 
usare lui anche per il mio problema ?  o esiste un un controllo simile 
FREE? 
ciao grazie
P.S. sarete al lavoro anche in agosto come me ?????????????

Scusa ma in VB4 non c'è la Apex DBGrid ?
Lo so che funziona male, ma se scarichi gli aggiornamenti alla Apex, và
abbastanza bene!
Ciao
                                                    Maurizio B.

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere testo da una textbox o da una label di un'altra applicazione... C'è un'api apposta o cosa?

Ciao a tutti, sono appena tornato dalle vacanze ed ho già un problema: ho
scaricato un programmino della Matrix (Virgilio Amico) che cliccando su una
parola la riconosce... e riesce a farlo non solo in una textbox, ma anche
con commandbutton, nomi di icone, menu, label... in pratica, riesce a
leggere qualsiasi cosa, basta che sia scritta (non funziona ad esempio con
testi di immagini)... La mia domanda: coma diavolo fa? c'è qualche api che
fa tutto oppure i programmatori della Matrix hanno perso mesi a scrivere
codice per fare funzionare 'sto programmino? Un'ultima cosa:
quell'applicazione preleva una sola parola, mentre a me servirebbe avere
tutta la caption del controllo... Grazie 1000 a tutti... Ciao...
DSMk


SendMessage con WM_GETTEXT, maggiori info su MSDN
Ciao
Faber

 wrote in message 8pajtc$o8v$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: DB Access remoto?

Salve a tutti,
generalmente utilizzo MySql per id db su inet, ma è posibile con vb6
accedere ad un database remoto ragiungibile ad un indirizzo tipo
100.101.102.103\database\database.dmb?
Se si, qual'è la stringa di connessione?
Mardok
Grazie in anticipo.

 100.101.102.103\database\database.dmb?
cerca con google un thread del mese scorso con il subject simile al tuo 
(togli "Access")...
Ciao,
Moreno
Inviato da 
www.mynewsgate.net
Newsgroup: it.comp.lang.visual-basic
Titolo: acquistare VB.NET 2003

A che indirizzo internet posso acquistare 
VB.NET
 2003? Ho cercato sul sito
di microsoft, ma non ho trovato niente


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.471 / Virus Database: 269 - Release Date: 10/04/2003

 
C'č, c'č, proprio sulla home page (Risorse->dove acquistare, sulla 
sinistra):
http://www.microsoft.com/italy/pdc/mail.htm

 ha scritto nel messaggio
news:JKeVa.209580$Ny5.6...@twister2.libero.it...
| 02/70398398
| MICROSOFT ITALIA
giusto, non ci avevo pensato

(Ż`·.¸ robiweb90¸.·´Ż) wrote:

Permettimi di fare una osservazione. Tu hai chiesto che ti indicassero 
un indirizzo web dove poter acquistare 
VB.NET
 dicendo che sul sito 
Microsoft non hai trovato indicazioni utili. Ieri sera ti ho inviato il 
link di una pagina del sito Microsoft che riporta i siti dei rivenditori 
di prodotti Microsoft (vedi il mio precedente post). Visto che ora 
ringrazi per un numero di telefono...........ehm ehm.........voglio 
dire......forse non hai visto il mio post? Puntualizzo perchč 
effettivamente mi interessa sapere il pensiero dei miei simili :)

 ha scritto nel messaggio
| > news:JKeVa.209580$Ny5.6...@twister2.libero.it...
| > | 02/70398398
| > | MICROSOFT ITALIA
| > giusto, non ci avevo pensato
|
| Permettimi di fare una osservazione. Tu hai chiesto che ti indicassero
| un indirizzo web dove poter acquistare 
VB.NET
 dicendo che sul sito
| Microsoft non hai trovato indicazioni utili. Ieri sera ti ho inviato il
| link di una pagina del sito Microsoft che riporta i siti dei rivenditori
| di prodotti Microsoft (vedi il mio precedente post). Visto che ora
| ringrazi per un numero di telefono...........ehm ehm.........voglio
| dire......forse non hai visto il mio post? Puntualizzo perchè
| effettivamente mi interessa sapere il pensiero dei miei simili :)
io volevo i punti vendita, non i rivenditori. quella pagina l'ho vista
anch'io, ma avrei voluto un elenco dei punti vendita autorizzati. infatti
telefonando alla microsoft hanno detto di chiamare ai rivenditori, quindi
quella pagina mi è tornata utile. grazie
|
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report 8 e Creazione pacchetti di applicazione

ciao a tutti.
scusate ma sono ancora qui con il problema di CR8 it.
con W2000-SP3 e VB6-SP5 ho creato un progetto.
gli ho inserito l'ocx crystl32.ocx e tutto funziona bene.
ma quando creo un pacchetto di installazione, mi dice che manca un file
crep_rev_it.dll (o qualcosa del genere, non ricordo esattamente) e finisce
normalmente.
poi quando installo il programma, mi genera degli errori.
sapreste indicarmi quali sono i files che dovrei copiarmi direttamente per
non incorrere in questi problemi ?
grazie ancora a tutti.

non incorrere in questi problemi ?
Scava nell'help di cristal report perche' lo spiega. Fai attenzione
perche' ci sono un paio di nomi di dll che non corrispondono
(modificati dopo la stesura dell' help?).
In ogni caso leggi bene i file .dep, perche' riportano le varie
dipendenze.
Scusa se non ti dico di piu', ma l'ultima volta che ho preparato un
setup per un prg che usava CR e' stato due anni fa.
-- 
ciao, hal

 ha scritto nel messaggio
news:fef39v4vt2guqhnr9...@4ax.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ExitWindowsEx e NT

Ho notato che la funzione ExitWindowsEx per eseguire uno shutdown o un
reboot non funziona correttamente su WinNT.
Se non ho capito male, sembra che debba acquisire alcune autorizzazioni dal
sistema prima di lanciare il comando, ma non ho ben capito di cosa si tratta
e come fare.
Qualcuno mi sa dare una mano?
Grazie 1000 per qualsiasi aiuto.
--
________________________________
Raffaele Tripodo
E-Mail:              
raff...@conmet.it
MSN Messenger: 
px...@hotmail.com
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

 wrote in message
8kmjfp$bt3$1...@fe1.cs.interbusiness.it...


Ciao.
Ora funziona tutto!
Il codice continua a funzionare anche su Win98 (così non devo cambiare
niente per eseguire lo stesso programma su Win9x e WinNT).
Grazie e ciao!


 wrote in message
8kmoq5$lhe$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Pilotare la parallela

Cari Amici,
vorrei creare una periferica parallela che mi piloti degli interruttori
esterni.
Come faccio a dialogare con la porta?
Grazie in anticipo
massimo

 Come faccio a dialogare con la porta?
Ecco un'altro post giornaliere (Samuele Battarra, perché non fai le
statistiche delle domande + richieste :-)).
Cerca WIN32IO che però non funziona su WNT/2k/XP.
Dove??? Cerca nei Vecchi Post o su Google o sul Sito Comune oppure chiedi ai
muri (ormamai lo sanno anche loro :-))))
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com
tim.joke

 Come faccio a dialogare con la porta?
Quasi quasi faccio una paginetta anche di questo... ormai l'ho
postato chissà quante volte. :-)
Sotto Win 9X puoi usare la dll che trovi sul Sito Comune:
http://it-lang-vb.net/
Se ti serve per NT e 2000, prova questo (se il link è spezzato ricomponilo):
http://groups.google.com/groups?hl=it&selm=8sd610%242l8c%241%40stargate1.inet.it
Ma il post è vecchio, il nuovo link è quello di driverlinx:
http://www.driverlinx.com/DownLoad/dnload.htm
Altro approccio al problema:
http://www.geekhideout.com/iodll.shtml
Questo non mi ricordo, ma l'ho trovato negli stessi appunti :-))
http://www.winfordeng.com/support/download.html
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: Clonare una classe??

Ciao a tutti,
E' possibile in VB6  (e se si come) clonare una classe?
Vi spiego meglio:
Ho fatto la seguente prova con un progetto contenente una semplicissima
classe denominata miaclasse
poi ho scritto quanto segue in un form:
'--------------------begin-------------------------
'Variabili globali di form1...
Dim ObjOrigine As New miaclasse
Dim ObjDestinatario As New miaclasse
' Funzione per la Clonazione
Function CreateClone(ByVal Classe As miaclasse) As miaclasse
(1)          Set CreateClone = New miaclasse
(2)          Set CreateClone = Classe
End Function
Private Sub Form_Load()
'' TEST ''
Set ObjOrigine = New miaclasse
ObjOrigine.proprieta1 = 1
ObjOrigine.Proprieta2 = 2
Set ObjDestinatario = CreateClone(ObjOrigine)
ObjDestinatario.proprieta1 = "copia"
MsgBox "Proprieta1 Classe origine " & ObjOrigine.proprieta1
MsgBox "Proprieta1 Classe destinazione " & ObjDestinatario.proprieta1
End Sub
'--------------------end--------------------------
Purtroppo non funziona! ;(
si comporta cosi:
se metto la riga (1) viene creata un istanza nuova della classe ma poi la
riga (2) viene ignorata
se tolgo la riga (1) viene creato un riferimento alla classe gia
istanziata...
Un grazie anticipato a tutti coloro che mi aiuteranno


In effetti mi sa che è un piccolo casino.
io ho ipotizzato una cosa simile
-------- inizio Classe  MiaClasse -------
Private Stringa As String
Private posizione As Long
Public Function Init(s$)
    Stringa = s$
    posizione = 1
End Function
Sub RawInit(s$, v&)
    'Dim clone As New MiaClasse
    Stringa = s
    posizione = v
End Sub
Public Function GetCh() As String
    GetCh = "-" & UCase(Mid$(Stringa, posizione, 1)) & "-"
    posizione = posizione + 1
End Function
Public Function Clona() As MiaClasse
    Dim clone As New MiaClasse
    ' Stringa e posizione sono private, quindi lo
    ' posso fare solo da qui dentro
    Call clone.RawInit(Stringa, posizione)
    Set Clona = clone
End Function
-------- Fine Classe MiaClasse -------
E lo uso in questo modo:
Private Sub Form_Load()
    Dim c As New MiaClasse
    Dim c2 As MiaClasse
    Call c.Init("pippo")
    Debug.Print c.GetCh
    Set c2 = c.Clona()
    Debug.Print c.GetCh
    Debug.Print c2.GetCh
End Sub
E' brutto, ma non ho visto alternative.
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: MSINET.OCX: Qualcuno lo usa ?

Ciao,
utilizzo questo controllo per scaricarmi (via HTTP) il sorgente HTML di una
pagina web per poi "estrapolare" dei dati che mi interessano con:
Stringa = Inet1.OpenURL("
http://www.
........", icString)
- Su un PC (WIN95 + VB5) nessun problema
- Su un altro (WIN98 + VB5) lo scarico della pagina si ferma sempre al byte
2138, anche se dallo stesso sito scarico altre sottopagine.
Su altri siti invece funziona...
Ho controllato, ma non mi pare ci siano caratteri "strani"
Qualcuno ha avuto esperienze simili ?

 ha scritto nel messaggio
news:9cHY5.70526$hk4.2...@news.infostrada.it...
