mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: se variabile contiene nullo

scusatemi se non sono molto professionale , ma sto imparando.ecco il 
problema:
  ho una variabile
dim sid as variant
ad un certo punto se metto il cursore sulla variabile visual basic mi 
dice sid=Nullo
quindi io avrei bisogno che il programma quando sid =nullo mi segnalasse 
  questa condizione ho provato nei due modi che scrivo sotto ma non 
funziona :
if sid="" then
msgbox "manca sid,creare il sid"
end if
if sid=null then
msgbox "manca sid,creare il sid"
end if
qualcuno mi pu� aiutare,grazie e buone feste

 questa condizione ho provato nei due modi che scrivo sotto ma non
isnull 

 end if
if NullDef(sid,"")="" then
    msgbox "manca sid,creare il sid"
end if
Public Function NullDef(ByVal vntValue As Variant, _
                   Optional ByVal Default As Variant) As Variant
    If IsNull(vntValue) Or IsEmpty(vntValue) Then
        If IsMissing(Default) Then
            NullDef = 0
        Else
            NullDef = Default
        End If
    Else
        NullDef = vntValue
    End If
 
End Function

> isnull 
  grazie, e buon anno

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore nell'esecuzione

Ciao a tutti e nello stesso tempo HELP !!!.
Ho un progetto composto da alcune forms. Ho la neccessità di doverle tenere
contemporaneamente aperte , e con la proprietà hide e show rendo attiva
l'una o l'altra.
Mi si presenta spesso il messaggio "Out of memory". Non sò più cosa fare. Da
tener presente che ho un Pentium con 32M di RAM
e uno swap file di 64M.
Qualcuno mi può dare qualche informazione ???
fzan...@siliani.it

troppi form caricati danno diverse conseguenze (anche senza sfociare
nell'out of memory) come il decadimento delle prestazioni.
Ti consiglio di lavorare con load ed unload, scaricando i form che non
usi (difficilmente li utilizzerai tutti contemporaneamente...)
--
Automatic posted from 
ro...@DNS.Punto.IT
 [194.21.188.33]
via Mailgate Server - 
http://www.mailgate.org

Newsgroup: it.comp.lang.visual-basic
Titolo: controlli activex

Qualche giorno fa avevo già  fatto una domanda su questo argomento. Ora vorrei sapere come si fa a
dichiarare delle proprietà Cioè quelle che compaiono nella finestra (che normalmente è ancorata a
destra). E poi come si aggiungono la pagine di proprietà. Per favore non ditemi: "Si fa con Property
Let, Property Get e Property Set" perchè lo so. Io vorrei sapere come funzionano.
Grazie.

 Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con refresh del Data Environment.

Ho un problema con il data environment per quanto riguarda il refresh del
report.
   Qualcuno ha gia utilizzato questo ActiveX , per  meglio dire qualcuno
riesce a farlo funzionare come si deve.
grazie per le vostre eventuali risposte
Gianluca
--
Posted from 
relay.bassilichi.it
 [194.185.86.10]
via Mailgate.ORG Server - 
http://www.mailgate.org

riesce a farlo funzionare come si deve.
Chiudi il recordset prima di fare il refresh, purtroppo con il Data
Environment non si capisce mai se il Recordset e' aperto o chiuso.
--------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxx.xx with 
tin.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report: Cerco Soccorso!!!!!

Aiuto!!!!!!
Una volta già fatto il report ho bisogno di cambiare il nome alle caselle
che leggono un campo nel database. Mi spiego con un esempio: per adesso il
campo nel report legge nella tabella x il campo "filippo". Voglio che legga
il campo "Mario" e non più "filippo". Poichè i campi nel report sono una
quarantina e ci ho messo giorni a sistemarli volevo utilizzare quelli già
esistenti e posizionati. Non riesco però a cambiarne l'indirizzamento. Vi
prego ditemi che si può fare e come si fà!!!!!!
Curioso

che leggono un campo nel database. .....
Non sai quante volte mi è toccato di riposizionarli tutti, e parlo di report
con ca 100 campi...
Comunque se vuoi provare ad utilizzare Alias, forse ci cavi qualcosa, ma
dammi retta, fai prima e meglio a ricominciare.
Ciao
Maurizio B.
mrzNOMMI...@tin.it
 (eraseNOMMISPAMMA)

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Condivisione connessione internet

Sapete x caso qul'è l'APE che permette di impostare profilo di accesso
remoto come predefinoto per la condivisione connessione a internet? E magari
anche quella che abilita il "dial on demand"?
Grazie per la collaborazione.

anche quella che abilita il "dial on demand"?
passo...
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

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

Sai indicarmi in maniera + precisa dove posso trovare l'APE?
l'Ape? Sul sito Piaggio! :-)
Chiedo scusa... ero sicuro di aver aggionato l'articolo...
La connessione predefinita la trovi, in Windows 98, nella chiave di
registro
HKEY_CURRENT_USER\RemoteAccess
alla voce "Default"


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

- uso Win2000...
mmm... attualmente non l'ho ancora trovata. In Win 2000 le RAS API sono
state profondamente riviste; appena ho un po' di tempo ci darò
un'occhiata e aggiornerò l'articolo...


 ha scritto nel messaggio
news:9ttgpt07b7h8o3n8r...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Stringa SQL con date

Ciao a tutti,
devo riempire una MSFlexGrid con dei record compresi tra due date e uso due
caselle di testo per inserirle.
Il problema è che le date mi vengono restituite nel "formato americano".
Queste sono le mie stringhe (non ho messo i ritorni a capo, perchè le
stringhe sono tutte su una riga):
mystringFrom = Me.txtFindFrom.Text
mystringTo = Me.txtFindTo.Text
mySql = "SELECT Stato, Macchina, Anomalia,
Format([Segnalazione],'dd/mm/yy'), Format([Fine],'dd/mm/yy') FROM [Foglio1$]
WHERE Segnalazione BETWEEN"
mySSql = "AND"
mySortSql = "ORDER BY Segnalazione ASC"
             '
 myDataSource = mySql & Chr(32) & "#" & mystringFrom & "#" & Chr(32) &
mySSql & Chr(32) & "#" & mystringTo & "#" & Chr(32) & mySortSql
Quando uso solo l'istruzione:
 "SELECT Stato, Macchina, Anomalia, Format([Segnalazione],'dd/mm/yy'),
Format([Fine],'dd/mm/yy') FROM [Foglio1$] "
i dati mi vengono restituiti in modo corretto, quindi il problema deve
essere il modo in cui inserisco il valore delle caselle di testo all'interno
della stringa.
Grazie in anticipo.
                                      Symi.

 stringhe sono tutte su una riga):
Io di solito le riformatto dopo....
A manina mi ciclo le celle della colonna e converto le date come mi pare.
E' un po' piů lento, ma considerando che caricare migliaia di record in un
flexgrid non ha senso, il ritardo č accettabile.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: GUID dell'applicazione

Ciao,
ho modificato un progretto e nella voce "Informazioni Assembly" sono
sparite tutti dati.
Poco male li ho reinseriti ma per il valore GUID come faccio?
Non so se c'entra ma mi sono accorto di questo in quanto in un form
vado a recuperare
ApplicationDeployment.CurrentDeployment.CurrentVersion.Major e
ApplicationDeployment.CurrentDeployment.CurrentVersion.Revision ma non
compare nulla mentre negli altri programmi funziona perfettamente.
Come posso fare per risolvere?
Grazie mille
Ciao BlackSun

 compare nulla mentre negli altri programmi funziona perfettamente.
Questo problema l'ho "risolto" ripubblicando il programma con
ClickOnce.
Ciao BlackSun

 Poco male li ho reinseriti ma per il valore GUID come faccio?
Guid? quale Guid?
Questo:
[assembly: Guid("02256225-d955-4ca2-839c-94940081147d")]
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 [assembly: Guid("02256225-d955-4ca2-839c-94940081147d")]
Si esatto. Nno so per quale motivo ma e' sparito.
La mia domanda e': come ne ricreo un altro e lo associo al programma?
Grazie mille
Ciao BlackSun


lo generi con uno dei millemila sw a disposizione (es, qui: 
http://www.somacon.com/p113.php
) e lo associ all'assembly scrivendo da 
qlche parte qlc del genere:
<Assembly: Guid(metti qui il tuo guid)>
-- 
  .A
GUISA - 
http://www.guisa.org
UGIdotNET - 
http://www.ugidotnet.org
Read my blog at: 
http://blogs.ugidotnet.org/pape

 <Assembly: Guid(metti qui il tuo guid)>
Ok grazie. Pensavo lo generasse lui.
Ciao BlackSun

 Ok grazie. Pensavo lo generasse lui.
nota di redazione, non ti serve a nulla se non per esporre i tipi al 
mondo COM.


Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto per internet

Come faccio a far scaricare al programma  una immagine di cui conosco
l'URL?

...


Grazie, ma forse non mi sono spiegato bene, intendevo che il programma
dovrebbe ottenere l'immagine dall'URL e visualizzarla in in una
casella immagine;
Non me ne intendo molto ma il tuo metodo non mi sembra molto pratico.
ciao,
Matteo
dell...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: IP risolti

Ciao a tutti.
Partendo da un elenco di IP in un file di testo cerco di ottenere lo stesso
elenco ma con gli IP risolti, cioč con i nomi di dominio che ci sono dietro.
Inserendo gli IP a mano uno ad uno su programmi come traceroute non avrei
problemi, peccato che l'elenco sia molto lungo e dovrei automatizzare il +
possibile la procedura. Ho provato con delle semplici dll trovate in rete,
come voltodns, ma una miriade di IP che traceroute mi risolve a questi
appaiono come sbagliati...
Qlc sa come procedere?
Grazie

 ha scritto nel messaggio
news:9mkom5$gvk$1...@fe1.cs.interbusiness.it...


 writes:
p> Ciao a tutti.
p> Partendo da un elenco di IP in un file di testo cerco di ottenere lo stesso
p> elenco ma con gli IP risolti, cioč con i nomi di dominio che ci sono dietro.
Ahem, sarebbero nomi di host.
p> come voltodns, ma una miriade di IP che traceroute mi risolve a questi
p> appaiono come sbagliati...
Cosa intendi con risolve ? Che tu vedi il nome o che ci passa attraverso ?
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )

 ha scritto nel messaggio
news:69mj7.69943$TS4.5...@news2.tin.it...


 elenco ma con gli IP risolti, cioč con i nomi di dominio che ci sono
dietro.
API GetHostByAddr. Trovi info ed esempi su
http://www.vbip.com/winsock-api/gethostbyaddr/gethostbyaddr-01.asp
Silv:o)

 wrote in message
9mkom5$gvk$1...@fe1.cs.interbusiness.it...

prova qui':
http://www.mvps.org/vbnet/index.html?code/network/hostnamefromip.htm
CIAO!

 > elenco ma con gli IP risolti, cioè con i nomi di dominio che ci sono


 elenco ma con gli IP risolti, cioè con i nomi di dominio che ci sono


Newsgroup: it.comp.lang.visual-basic
Titolo: VB variable, SQL, and Type Mismatch

Does anyone have any idea why the following code presents a "Type
Mismatch" error?  What I would like to do is take the maximum of the
numbers in the objectnumber column of the table add 1 to it and put
that number into the intObjectID variable.  I am fairly new to VB
programming.
Dim intObjectID As Integer
intObjectID = DB.Connection1.Execute("SELECT MAX(objectnumber) + 1
FROM table")
'P.S. objectnumber is a column of integers.
-Michael

FROM table")
Did you read the help about the return type of the Execute method, isn't it?
-- 
bye, hal
p.s. In this newsgroup we all speak italian: please do it you too ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DLL e VB

Ciao a tutti.
Scusate se la domanda può sembrare banale ma per me si tratta di un
argomento nuovo.
Avendo a disposizione dei file con estensione ".a" (credo siano file
archivio prodotti in C)
è possibile utilizzare con VB6 le funzioni in essi contenute ??
I file archivio sono stati realizzati in ANSI C su piattaforma Unix.
Ciao e grazie
Steama

 Steama

 >
Per finire uno straccio di firma alla tua risposta non farebbe male.
Saluti
Steama

 Steama


.....ironia esclusa, vero ?
Per me la scambio di post finisce qui.
Saluti
Steama

Newsgroup: it.comp.lang.visual-basic
Titolo: problema con uso di recordset

C'e' qualcuno che mi sa dire come si fa a testare se un dato recordset
non contiene nessun record (e' vuoto) ?
E' un problema in quanto i metodi tipo movefirst e simili nel caso il
recordset sia vuoto danno errore!
NB Vorrei evitare di gestire l'eccezzione con un error handler.
			Grazie in anticipo Corrado

Corrado Magnanini wrote:

   if recordset.bof and recordset.eof then
     ...
   else
     ...
   endif
P.S.: Eccezione si scrive con una sola "z"!

...


record contenuti nel recordset. Io personalemte gestisco l'errore.
Nicola  secondo me quello che dici tu funziona se vuoi conoscere
il numero totale di record, mentre appena tu crei un recordset 
la proprieta' recordcount vale 0 se esso e' vuoto oppure ha un 
valore >= 1 se esso contiene dei record.
Ho scritto molti programmi basandomi su tale tecnica e non ho 
mai ricontrato problemi! 
Ciao da Patrick

l'errore.
Caro Ettore, potresti indicarmi la documentazione Microsoft relativa a
tale bug?
Vorrei vederla per capire se questo problema e' legato a situazioni
particolari oppure potrebbe verificarsi in qualsiasi momento!
Grazie Patrick

.


non contiene nessun record (e' vuoto) ?
Semplicemente testa <recordset>.EOF non appena hai fatto la
OpenRecordset: se e' vuoto ti dà True.
MATRO

 non contiene nessun record (e' vuoto) ?


Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco un editor

Scusate, avrei bisogno di un editor per Visual Basic, da poter scaricare
liberamente (al max andrebbe bene anche una versione dimostrativa...) Dove
potrei trovarlo?
Grazie (e mi scuso se la domanda è già stata posta, ma sono nuova e ne ho
urgente bisogno!)
Manuela

 Manuela
se e quando va, ci ho messo le demo di vb4, 5 e 6.
http://members.xoom.it/vbup
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: Sfondo Command Button

Salve,
non riesco a modificare lo sfondo dei command button.
Qualcuno sa dirmi se e' possibile e come?
Grazie

 ha scritto nel messaggio
news:9k0smb$g4a$1...@nreadB.inwind.it...


 wrote in message
news:3XS87.21700$0Z1.8...@news.infostrada.it...


 Qualcuno sa dirmi se e' possibile e come?
posso solo dire che mi sembra una pessima idea. A cosa ti serve?
Newsgroup: it.comp.lang.visual-basic
Titolo: Usare da VB stored procedure in SqServer 2000

Ciao a tutti.
Devo iniziare un progetto abbastanza importante e abbiamo deciso di
utilizzare SqlServer 2000 come database.
Vorrei chiedere un consiglio a chi di voi ha giŕ utilizzato stored
procedure.
Secondo voi č meglio creare una stored procedure per ogni operazione di
database, anche per le piu' semplici?
Per inserimenti, modifiche, eliminazione di record in tabelle mi conviene
creare una sp per ogni funzione?
In questo caso avrei 3 sp per ogni tabella.
Ho visto poi che richiamarle da vb non č cosi' veloce come credevo (bisogna
definire tutti i parametri, con il loro tipo e la loro dimensione...)
Ho visto pero' che esiste anche il metodo refresh che crea automaticamente
l'elenco dei parametri necessari per una sp.
Posso usare questo metodo?
Oppure mi conviene scrivere il codice di inserimento, modifica,
cancellazione record nel sorgente di vb ed utilizzare le sp solo per query
piů complicate?
Grazie per i consigli.
Skysurfer

Il mio consiglio è:
Usa le S.P. solo per evitare quelle attività che altrimenti creerebbero
troppo carico di rete.
Ad esempio, noi abbiamo degli algoritmi di ricerca operativa (tipo T.S.P.),
che creano tabelle temporanee spaventose (possono arrivare a chiedere 2GB di
RAM sul server). Se gestissi questo in maniera tradizionale, ovviamente la
rete si pianterebbe, e l'elaborazione sarebbe lunghissima.
Il problema grosso delle S.P. è che non sono supportate da altri DB (ad
esempio Oracle), se non riscrivendole con un diverso SQL (SQL-Server usa
T-SQL), mentre se riesci ad utilizzare le operazioni atomiche fondamentali
direttamente da VB, magari sfruttando le potenzialità di Filter, Sort e Find
di ADO, hai un'applicativo facilmente migrabile ad altri DB, qualora ti
venisse richiesto, visto che la sintassi fondamentale è compatibile (ricorda
di usare sempre yyyyMMdd hh:mm:ss per le date, e sei in una botte di ferro.)
Ciao
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: listview e index

ciao
e' un'ora che sto cercando la proprietą che mi permette di  trovare l'index
dell'item selezionato,
ho una listview con all'interno delle foto  ho due tasti  con uno mi sposto
avanti e l'altro indietro
(tipo visualizzazione sequenza immagini in xp)
il problema che non riesco a trovare la proprieta' per sommare e sottrarre
1(avanti indietro)
mi dite per favore quale e'    oggi sono scoppiato
ciao
ilario

 dell'item selezionato,
ListView.SelectedItem.Index ti dice l'indice dell'elemento selezionato.
Okkio a settare ListView.MultiSelect = False
Per passare avanti/dietro fai:
Private Sub cmdAvanti_Click()
  Set ListView.SelectedItem = 
ListView.ListItems(ListView.SelectedItem.Index + 1)
End Sub
Private Sub cmdAvanti_Click()
  Set ListView.SelectedItem = 
ListView.ListItems(ListView.SelectedItem.Index - 1)
End Sub
Occhio però a non far eseguire il click sul pulsante 'Indietro' quando 
ci si trova sul primo elemento o il click sul pulsante 'Avanti' quando 
ci si trova sull'ultimo.
-- 
Quando noi ignoranti eravamo di più,
tutto era più bello...
(Adriano Celentano)

 End Sub
Ehm... la prima Sub č per il pulsante cmdAvanti, la seconda per cmdIndietro.
-- 
Quando noi ignoranti eravamo di piů,
tutto era piů bello...
(Adriano Celentano)

grazie mille
Ilario

Newsgroup: it.comp.lang.visual-basic
Titolo: evento da una procedura

Come si può far realizzare un evento all'interno di una procedura?
Per esempio l'evento Load, senza far ripartire il programma dall'inizio?
Grazie.

Per esempio l'evento Load, senza far ripartire il programma dall'inizio?
Scusa, non ti seguo... potresti essere piů preciso? Grazie..
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------


Ciao
se ho capito bene ...
Form_Load()
Ciao
Franco L.



Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione in RGB

 Dalla Commom Dialog ottengo un colore rapresentato da un nmero (13882323) e 
con questo devo colorare l'asse di un grafico che si aspetta un valore in 
RGB.
Come fare?
-- 
Greg 

 Come fare?
Usarlo direttamente pare brutto, è fuori moda, o non funziona ?
Bye, G. 


 Non è che non funziona, è che vuole 3 valori tra 1 e 255, mentre io ne ho 
solo uno e di tipo diverso :(
With MSChart1.Plot.SeriesCollection(1).DataPoints(-1)
            .Brush.FillColor.Red = CInt(Text1.Text)
            .Brush.FillColor.Green = CInt(Text2.Text)
            .Brush.FillColor.Blue = CInt(Text3.Text)
End With
-- 
Greg 

 End With
Allora il problema č con il MSChart, che non accetta un "normale"
colore RGB, che č un Long, ma separatamente i tre valori R, G e B.
Quello che ti serve sono queste tre funzioni, che suddividono il
RGB nei tre elementi colore:
************************
Public Function Blue(Colorref As Long) As Integer
      Blue = (Colorref \ &H10000) And &HFF
End Function
Public Function Red(Colorref As Long) As Integer
      Red = Colorref And &HFF
End Function
Public Function Green(Colorref As Long) As Integer
      Green = (Colorref \ &H100) And &HFF
End Function
************************
Le usi cosě:
************************
Dim QuestoColore As Long
CommonDialog1.ShowColor
QuestoColore = CommonDialog1.Color
With MSChart1.Plot.SeriesCollection(1).DataPoints(-1)
            .Brush.FillColor.Red = Red(QuestoColore)
            .Brush.FillColor.Green = Green(QuestoColore)
            .Brush.FillColor.Blue = Blue(QuestoColore)
End With
************************
Bye, G. 

"greg" <gre...@tin.it.invalid> ha scritto nel messaggio
news:f9l3dm$275$1...@tdi.cu.mi.it...

r = Hex(CByte(lngColor And 255))
g = Hex(CByte((lngColor And 65280) / &H100))
b = Hex(CByte((lngColor And 16711680) / &H10000))
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 b = Hex(CByte((lngColor And 16711680) / &H10000))
Fregato di 11 secondi :-PPP
Bye, G. 


Grazie a tutti e due :)
Mò provo
-- 
Greg 

 b = Hex(CByte((lngColor And 16711680) / &H10000))
E scriverlo in modo comprensibile?
r = Hex(CByte(lngColor And &HFF))
g = Hex(CByte((lngColor And &HFF00) / &H100))
b = Hex(CByte((lngColor And &HFF0000) / &H10000))
:)
Oppure a 'sto punto meglio l'operazione inversa di Paperino
r = Hex(CByte(lngColor And &HFF))
g = Hex(CByte(lngColor \ &H100 And &HFF))
b = Hex(CByte(lngColor \ &H10000 And &HFF))
ovviamente senza l'Hex() che va bene solo per verificare il valore in debug, 
e il CByte() di cui VB se ne frega :P
Ciao 

 ha scritto nel messaggio
news:46be2584$0$4788$4faf...@reader4.news.tin.it...

Scusa sono burino... e mi è uscito così...
Non ci prendo con le mascherature...
;-)


"Paperino" <non...@lo.dico.invalid> ha scritto nel messaggio
news:f9l58p$g29$1...@registered.motzarella.org...

Allora ho vito qualche cosa..?
;-)
Ciao


 ;-)
Ma dŕi!
E capisci meglio un 16711680 che un &HFF0000? :)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: ESPORTARE FUNZIONI DA UNA DLL

Ciao a tutti , dato che io sono programmatore principalmente in delphi non
ho molte conoscenze in visual basic. La mia domanda č questa io devo creare
una dll ex... miadll.dll dalla quale esportare  una funzione "dimmiciao" che
mi restituisca un stringa. come posso fare ?

mi restituisca un stringa. come posso fare ?
Con visual basic puoi solo creare dll activeX, quindi dovrai creare
almeno una classe pubblica che espogna un metodo pubblico che abbia
una String come tipo di ritorno.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Ambiente sviluppo VB-Like

Ciao!
Scusate se riposto ma non ho avuto risposte interessanti...
Volevo sapere se esiste un ambiante di sviluppo RAD come il VB ma free.
Un po' come il Borland C++ Builder per intenderci o come VB appunto :-)
La cosa migliore sarebbe che utilizzasse solo API e quindi che non si debba
portare dietro una voluminosa libreria (sempre come VB :-)
Ho provato lcc-win32 ma non conosco ancora bene tutte le API e siccome ero
abituato a usare VB o BCB per semplicità, non so cosa cercare...
Grazie a chi mi aiuta...
--
bye
Keeper - The Keeper of the Seven Keys





...forse


http://members.designheaven.com/~44/lino/index.html


 


loro dicono:






Experienced application 
  programmers and beginners, pay attention please: the history of programming 
  languages is going to change. LINOLEUM is the new programming language for 
  everyone who wants to 
be immune from future system changes
. Beta 
  testing is over, complete abstraction from the physical system is a reality. 
  LINOLEUM is the only one, the only real cross-platform assembler, the world's 
  fastest cross-platform programming language. 
Write your own routines 
  to manage video effects, use the included Pitagora 3D engine or write your own 
  3D engine for games and multimedia entertainment software, build your own 
  waveforms to play 44KHz stereo sounds and music, get out of your window and 
  take over the whole screen upto any resolution you need, discover what WYSIWYG 
  really means for printers, create reliable, small, compact, super-fast 
  stand-alone applications. Forget the API labyrinth, forget missing DLLs, 
  forget InstallShields, forget missing files: click the icon and let it run, no 
  matter how many support files your application is needing! And last but not 
  least, don't waste your time re-writing applications: LINOLEUM is forever! 
  Give your programs a chance to run from here to eternity. 







Stop hiding into Basic:
you know there's more.
Stop lying to 
yourself,
one day your system
will be obsolete.
Stop playing with 
toys,
be a programmer. 



 build your own waveforms to play 44KHz stereo
Il primo caso di "le routine di base fatevele da voi" che abbia mai visto.
;-)
Dire che è portabile su più piattaforme a patto che si scriva un layer di
traduzione è un po' un nonsense. Anche VB gira sotto Linux, se ci metti in
mezzo un emulatore Windows.
Ciao
*Roby*

: 

La seconda passata di compilazione (c2.exe) mi pare non funzioni ancora. 
L'IDE va alla grande, ma senza il compilatore te ne fai poco :)
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB5] Bitmap e DAO

Come fare per memorizzare in un database .mdb che contiene campi numerici e
di testo l'immagine (.bmp) di un PictureBox o dei dati relativi all'immagine
trasferiti nella ClipBoard?
Con Access non riesco a definire campi per formati grafici, non mi serve
vedere l'immagine da Access, mi basterebbe che esso contenga i dati relativi
alla .bmp per poi richiamarli e visualizzarli con VB.
Roby (quasi sempre bloccato)

...



Non ho approfondito più di tanto la cosa, ma ho in programma qualcosa
del genere e mi sono un po' informato.
Hai due possibilità:
1- Salvare le immagini in tanti files e memorizzare il nome del file
nel database. Suona meno bene ma mi sa che è la soluzione più pratica.
2- Salvare le immagini direttamente nel database. Sembra più elegante
ma hai due svantaggi. Il primo è che corre voce che l'accesso al
database rallenti paurosamente. Il secondo è che per visualizzare
l'immagine in un controllo devi salvarla in un file temporaneo e
impostare quel nome nel controllo.
Ciao
--------------------------------------------------------------------
Fulvio Senore
Eliminate "zz" dall'indirizzo e-mail per scrivermi (spammers...)
Remove "zz" from e-mail address to write me (spammers...)
--------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con i Datareport

Salve a tutti,
mentre relizzavo un'applicazione con Visual Basic... mi sono accorto che al
momento delle stampe.. il datareport ha delle limitazioni e non poche.. ma
il problema + grave e che non mi permette di inserite dati apparteneti a 3
tebelle diverse.
Mi spiego meglio...
utilizzo un dataenvironment per la connessione al db
ed ho creato un Command con procedure SQL in cui sono contenute due
sottocommand... quando creo il datareport non mi permette di utilizzare i
dati di tutte le tabelle... c'è un modo per fargliele vedere...?
Spero di si... altrimenti butto il vb...
Grazie anticipate a tutti coloro che vorranno darmi una mano.!
Fabio

 ha scritto nel messaggio
news:VZVua.45899$DN.11...@tornado.fastwebnet.it...


 ha scritto nel messaggio
news:b9ikfl$n3s$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Printer bug Vb5

I HAVE A PROBLEM THAT IS:
IF I WAN'T TO PRINT TO 2 DIFERENT PRINTERS WITH ONE PROGRAM, USING THE SET
PRINTER = PRINTERS(X) THE PRINTER OBJECT UPDATE, BUT PRINT ONLY IN DEFAULT
PRINTER! IN VB5, IN VB4 IT WORKS!
PLEASE HELP ME!
Steve...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Equivalente a metodo seek in ADO

Il mio problema è che in ADO non so ne come si fa a creare un indice ne come lo
si può usare.
Qualcuno mi sa dare delle spiegazioni?
grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


In Ado esiste il metodo seek, semplicemente ha un tot di presupposti:
- che sul recordset sia impostato un indice
- che l'indice esista
- che tu apra un recordset -direttamente- sulla table
- che il cursore sia lato server
- che il recordset non sia creato con clausola "withevents" (non c'è scritto
da nessuna parte ma è così)
- che il provider supporti l'index e il seek
fatti salvi questi presupposti, ti faccio un esempio __tratto direttamente__
da
un'altra risposta mia sull'argomento (leggasi cerca su google
http://groups.google.com/groups?q=ado+seek&btnG=Google+Search&meta=group%3Di
t.comp.lang.visual-basic)
Dim cnnTempor As New ADODB.Connection
Dim rsTempor As New ADODB.Recordset
ValoreRicercare = 1
 With cnnTempor
      .CursorLocation = adUseServer
      .Open "Provider=Microsoft.Jet.OLEDB.4.0;Data
source=c:\DB1.mdb"
 End With
  With rsTempor
        .Index = "Codcli"
        .CursorLocation = adUseServer
        .Open "offerte", conTempor, adOpenKeyset, adLockOptimistic,
adCmdTableDirect
        .MoveFirst
        .Seek ValoreRicercare, adSeekAfter
        If Not rs.EOF Then
            ' codice tuo
        End If
    End With
Per quanto riguarda la creazione dell'indice, dipende essenzialmente dal
tuo motore database, ma generalmente sono valide sia la soluzione SQL
"CREATE INDEX" sia lavorare sugli oggetti Adox, anche se, personalmente,
trovo più comodo e performante una buona connection.execute "create
index"...
Naturalmente, l'uso di un indice è sicuramente consigliato per tutti quei
campi
(oltre ai campi chiave) su cui vengono eseguite ricerche frequenti, ma non
deve
essere sposata come soluzione di utilizzo generale.
Indicizzare e manutenere un indice sono comunque operazioni onerose in
termini
di cicli di elaborazione da parte di un motore database e quindi devono
essere
limitate ai casi in cui l'utilità dell'indice è superiore al suo costo di
manutenzione.
I campi significativi in questo senso vengono generalmente già indicizzati
in
fase di disegno del database e non certo a runtime.
Meno che meno è sensato indicizzare "al volo" solo allo scopo di eseguire
una .seek:
meglio, in caso di uso sporadico di una certa ricerca una .filter sul
recordset.
ciao
ugo

GRAZIE

Newsgroup: it.comp.lang.visual-basic
Titolo: problemma con pacchetto istallazione

Salve a tutti,ho finalmente finito il programma(grazie ai vostri aiuti),ora
facendo il pacchetto di istallazione ho riscontrato un problema,cioč ho
inserito un file .ocx dentro i file da inserire nel pacchetto,ma quando lo
istallo vedo che viene inserito dentro il .exe e a me serve che sia
fuori,come fare?conviene farlo diventare un .txt inserirlo e poi all'avvio
del programma farlo ritornare .ocx?se si come faccio?
Grazie in anticipo
Ciao

fuori,come fare?
eh ? che cosa stai usando per fare il setup ?
Per .exe intendi il tuo programma o il setup autoscompattante ?
ciao, hal

Ciao hal;) per setuo uso,la creazione ai pacchetti di istallazione di visual
basic 6,per .exe intendo il mio programma
Hal Help me
Ciao

basic 6,per .exe intendo il mio programma
ok, ti garantisco che il pdw di vb6 non fa assolutamente una cosa del genere !
ciao, hal
(che forse non ha capito il tuo post)

Sai il fatto e questo e che quando mi chiede che file voglio aggiungere nel
pacchetto di istallazione,io aggiungo 2 file che sono i plugin di flash,cioč
SWFLASH.oca e swflash.ocx solo che quest'ultimo viene integrato dentro il
.exe mentre SWFLASH.oca rimane normale e me lo ritrovo dopo listallazione:(
Ciao


Secondo me non integra un bel niente, la verita' e' che ti prende uno solo dei due.
Inserisci solo il .ocx, il .oca lo generera' all' atto dell' installazione sul client.
ciao, hal

Ho provato,ma Fatta l'istallazione il .ocx non ce sta più:(senti sarà un
.ocx fantasma;)il fatto e che a me serve haverlo esterno,ma sono 2 le
cose,ho non lo mette proprio, o lo integra nel .exe e sai perchè lo
dico?perchè se uso il filesystem copy e dico di copiare il .ocx che non c'è
lui va a copiare il .exe quindi penso che sia al suo interno.
Ciao


No, il pdw, almeno per quel che ne so, non "patcha" gli exe.
Guarda un po' i file che genera (.lst, .ddf, tutto quello che c'e' nella
cartella support prodotta in automatico dallo wizard).
ciao, hal

 wrote in message
9cmeas$egpsp$1...@ID-56381.news.dfncis.de...


CI SONO RIUSCITOOOOOOOOOOOOO:) scusa ma sono troppo felice sono riuscito a
farlo partire come si deve
Ciao E grazie 1000

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] come trasformare un campo string in integer??

Salve a tutti,
come da oggetto ho un campo string che mando in una cella Excel però in qst
modo la funzione SOMMA di Excel non funziona perchè vede il  campo come
testuale .
P.S. anche modificando il formato della cella non funziona.
Per questo vorrei trasformare il campo testuale in intero prima di passarlo
alla cella Excel.
Grazie a tutti.
Paolo.

 wrote in message
9re07.25178$u%1.20...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: access2000 e VB6

so che questo è un vecchio problema ma chiedo ugualmente aiuto.
Ho recentemente installato Office 2000 e VB6. Sapevo che vi sono problemi di
"lettura" dei file .mdb, per cui ho installato anche SP3 per Visual Basic
(ho scaricato 5 files compressi per un totale di circa 54M ed ho seguito
attentamente le istruzioni di istallazione).
Con grande sorpresa continuo a ricevere il messaggio che VB6 non è in grado
di riconoscere il formato dei database di Access 2000.
Qualcuno può spiegarmi il mistero e darmi qualche consiglio??
Grazie a tutti in anticipo.
Dario Barbieri

 wrote in message
zLi55.275062$VM3.2...@news.infostrada.it...


 ha scritto nel messaggio
news:zLi55.275062$VM3.2...@news.infostrada.it...


 wrote in message


Prova con OLEDB.4.0 sullastringa di connessione, invice di OleDB-3.1


 ha scritto nel messaggio
news:8jgaat$m63$1...@serv1.albacom.net...

HO LO STESSO PROBLEMA MA NON SONO RIUSCITO A CAPIRE COME 
RISOLVERLO.SE
 PUOI
DARMI UNA MANO TE NE SAREI GRATO.
Johnny La Fata

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo simil-listbox

Ciao a tutti.
Mi chiedevo se esiste un controllo simile a listbox che consente di scrivere
"item" colorati (naturalmente di colori diversi) all'interno di esso. Nel
caso esistesse dove lo trovo? Se poi è possibile far questo anche con il
normale listbox vi chiedo come fare visto che non ci sono riuscito.
Grazie

 caso esistesse dove lo trovo?
Progetto - Componenti - Microsoft Windows Common Controls 6.0 (o 5.0)
utilizza l'oggetto ListView
Ciao
--
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: ? CommonDialog

Volevo sapere se è possibile da un CommonDialog settata a ShowOpen,
selezionare solo la cartella e non il file.
Ci ho provato ma se non seleziono il file non ritorna niente.
A me serve una dialogBox per avere il percorso di una cartella con
possibilità di crearne una nuova.
Ho usato SHBrowseForFolder con il flags BIF_USENEWUI ma funziona solo con
win 2000.
Ciao Carmelo

 ha scritto nel messaggio
news:djsA9.25510$Zn2.7...@twister1.libero.it...

direi di no, però mi sembra che tu abbia il problema opposto da quello
lamentato da skysurfer in un suo post dell'8/11/02. Prova a dare un'occhiata
a quel thread....
Salutoni
Sergio

 possibilità di crearne una nuova.
potresti crearti un tuo commondialog , credo sia semplice :
1 controllo dir e un list con le sole cartelle e sottocartelle
al clic su una cartella vedi se ci sono sotto cartelle
al clic su ok associ a myComodaDialog.filename la tua directory ^_^

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: Opzioni su CommanButton

Salve a tutti.. partiamo col presupposto che sono negata per questo
linguaggio di programmazione.
Avrei necessità di assegnare alla pressione di un pulsante
l'inserimento di riche di testo nella parte sottostante.
(il programma è per la gestione di uno stabilimento balneare e al clik
del bottone OMBRELLONE deve restituirmi sotto la scritta Ombrellone)
Sapete aiutarmi nell'esecuzione di questo programmino? Se qualche
anima pia volesse magari anche solo indicarmi qualche risorsa sulla
rete dove andare a parare ne sarei grato (visto che ci sono altre cose
nel programma che devo fare ce non mi sono chare)
Grazie sin d'ora



Se sotto hai una TextBox, nell'evento Click del Button inserisci
qualcosa tipo:
txtDescrizione.Text = "Ombrellone"
Oppure se devi compilare una lista, cerca nell'help l'utilizzo della
ListView
Ciao
Aran

 rete dove andare a parare ne sarei grato (visto che ci sono altre cose
"grato" quindi sei un lui... lei... lui... boh... ;)
mi è semblato di vedele un tloll! :P
Rayden.TrollCheck()

Newsgroup: it.comp.lang.visual-basic
Titolo: MSDE 2000 -> getting Started

Ciao a tutti, almeno a quei pochi rimasti....
Ho scaricato l'ultima versione di MSDE, che adesso si chiama Sql Server 
e qualcosa....
Quel che mi domando e dico,
come creo un db utilizzando cotal motore? Parlo di tutto quello che 
serve, utenti , permessi, tabelle, relazioni...
Ovviamente non pretendo affatto una soluzione "impiattata", almeno delle 
keyword da sottoporre al mio caro amico google.
Grazie.
-- 
Emanuele Torrenti

Grazie.
forse ... "MSDE interface" ? ;)
Ciao

Raimbaut de Vaqueiras ha scritto:

Grazie: dbaMgr2k č il prog adatto allo scopo.
-- 
Emanuele Torrenti
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa di una form

Probabilmente sono tutto balengo io...
Ho la mia bella form.
Disegno qualcosa sul suo hdc
    lp.lopnStyle = 0
    lp.lopnColor = RGB(0, 0, 0)
    lp.lopnWidth.x = 1
    lp.lopnWidth.y = 0
    k1 = MakePen(Me.hDC, lp)
    ''' disegna un rettangolo
    k = Rectangle(Me.hDC, 150, 150, 250, 300)
    k = DeleteObject(k1)
e va tutto bene.
Stampo la from:
form.print
Non mi stampa un c. di quello che ho disegnato con le API, ma solo gli
oggetti V (label, text, buttons...)
Commenti?
Grazie.


Devi impostare la proprietą Autoredraw del form su true e poi stampi
n.b. se imposti la proprietą autoredraw su true e ci disegni sopra devi
inviare anche il comando refresh se vuoi visualizzarlo sullo schermo, non č
necessario se vuoi semplicemente stampare.
Non ho ben capito cosa fa la funzione MakePen, in teoria il codice dovrebbe
essere
NewPen = CreatePenIndirect(lp)            ' creo la nuova penna
OldPen = selectObject(me.hdc,newpen)    ' seleziono la nuova penna nel
device
rectangle me.hdc,150,150,250,300    ' disegno il rettangolo
selectobject me.hdc,oldpen    ' ripristino il dc alla sua posizione
originaria
deleteobject newpen    ' cancello l'oggetto penna
Ciao Bruno




necessario se vuoi semplicemente stampare.
Tutto fatto.
A video viene una bellezza, su di una HP LJ viene quello che voglio,
sul c. di driver della stampante che mi serve non viene cio' che ho
disegnato con le API.
La stampante e' una termografica Privilege, per la stampa sulle carte
tipo-carta-di-credito, e il driver e' un po' farlocco (almeno la
versione che devo usare), e in passato ho avuto varie discussioni con
il fornitore per incompatibilità con determinati sw commerciali.
Boh? per intanto continuo con le API su printer.hdc, che va bene.
Newsgroup: it.comp.lang.visual-basic
Titolo: Database ADODB problema

ragazzi io devo fare una ricerca del valore di una variabile settata
con inputbox , uso connessione ADODB visto che il data mi va abbastanza
male x questa mia applicazione xkè non uso il controllo data ma dei
controlli combobox.
il codice skritto + o - e così (sicuramente sbagliato visto ke nn sono
praticissimo del ADO)
Vorrei solo capire il xkè qualsiasi nome io scrivo mi dice sempre ke
nn ci sta eppure dentro il db e presente.
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim stringa As String
Dim informazione As String
Private Sub Command1_Click()
informazione = InputBox$("ricerca il nome", "Ricerca")
       If informazione <> "" Then
stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
stringa = stringa & App.Path & "\Esempio.mdb"
       Set cn = New ADODB.Connection
       Set rs = New ADODB.Recordset
cn.open stringa
rs.open "Select * FROM Indirizzi where Nome Like '%informazione%'", cn,
1
      If rs.BOF <> 0 And rs.EOF <> 0 Then
    MsgBox "Nessun record"
Else
    rs.MoveFirst
    Do
        If rs.EOF Then Exit Do
        'Fai quel che vuoi del record corrente
        rs.MoveNext
        MsgBox "Trovato corrispondenza"
    Loop
End If
End If
End Sub

 nn ci sta eppure dentro il db e presente.
Non ricordo la sintassi di access ma se dovessi prendere come input una
txt fai l'ucase da entrambe le parti (ma forse ad access non interessa). 
Inoltre fatti una funzioncina che ti ripulisce le stringhe per darle al
database, ad esempio se text1.text="Mando' Angela" ti darà errore perchè
devi sostituire ' con '' (lo fai con replace(stringa,"'","''")
rs.source ="SELECT * FROM TABELLA WHERE UPPER(NOME)= '%" &
ucase(text1.text) & "%'"
rs.open
if not rs.eof then
	'tua roba
else
	msgbox "Nessu risultato"
endif
rs.close
set rs=nothing
-- 
Freccia@Bulldozer63 :D

 1
Ah forse l'errore è qui:
rs.open "Select * FROM Indirizzi where Nome Like '%" & informazione &
"%'"
Comunque valida sempre il campo che passi al Db, come ti ho detto.
-- 
Freccia@Bulldozer63 :D

:( mi continua a dare errori però se io invece di una variabile metto
direttamente il nome me lo trova dentro il db il problema quindi e
proprio la variabile ce qualcosa ke nn va io ho scritto così e mi da
ancora errore .
rs.open "Select * FROM Indirizzi where Nome Like '%" & informazione &
"%'"
se invece della papardella %" & variabile & "%'" ci metto direttamente
il nome per esempio Gianni me lo trova dentro il db..
Io mi spiego il xkè visto ke la var è statta del valore di un
inputbox$. Tramite il suo valore cioè a quello ke scrive ke in quel
caso è Gianni dovrebbe trovarlo o addirittura trovarmelo se scrivo Gia
ma niente mi dice sempre ke nn trova nulla sto impazzendo x capire il
xkè fa così.. C'è qualcosa di sbagliato nel sett della variabile.

Ok riuscito grz per l'aiuto la stringa esatta e questa
rs.open "Select * FROM Indirizzi where Nome Like '%" & informazione &
"%'", cn, 1
^^

 ha scritto nel messaggio 
news:1140358735.6...@g43g2000cwa.googlegroups.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Chi mi consiglia un buon Libro per VB6 ?

Chi mi consiglia un buon libro per imparare la programmazione in V.Basic 6?
Il piu completo possibile.
Grazie molte :)
-- 
Rimuovere GTC dall'indirizzo email
Bye, bye :-)

 wrote in message
01beb042$754a8260$6d936ec3@massimif...

Direi che il libro più completo che puoi trovare (che si mantenga in ambito
generale (e non si incentri, ad esempio, sul rapporto fra vb6 e i database o
vb6 e sql server etc etc) é sicuramente Il manuale del programmatore ( di
vb6 si intende!) della Microsoft Press edito da Mondadori informatica: un
bel tomo di 900 pagine che costa però 100£ alla pagina!
Bye
Marco

Dai un'occhiata al Sito COmune di questo newsgroup.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Direi che il libro più completo che puoi trovare 
Omissis

Newsgroup: it.comp.lang.visual-basic
Titolo: <no subject>

Ciao ragazzi...
scusate... sapete come scrivere del
testo direttamente in una picturebox???
grazie!!
ciauz
:):):):)
Pietro Bello
  PEPPUS
--
Posted from 
mail.archimedia.it
 [192.106.156.2]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
3.0.1.32.1999052...@archimedia.it...


Picture1.Print "Hai provato con Print??? ^__^"
dove Picture1 è il nome dell'oggetto Picture.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] XP-VB5 e le variabili di sistema

Salve a tutti,
nel mio applicativo uso l'API:
ExpandEnvironmentStrings
per ricavare il path contenuto dentro determinate variabili di sistema (ad
esempio %SystemRoot%) che si trovano in path letti dal registry.
In win2000 nessun problema funziona perfettamente ma in XP %SystemRoot% non
viene tradotta.
Qualcuno ha avuto la mia stessa esperienza?
grazie
Davide

 esempio %SystemRoot%) che si trovano in path letti dal registry.
ho trovato la soluzione scusate...
ciao
Davide

 ho trovato la soluzione scusate...
se posti la soluzione può essere utile anche agli altri  :)
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Clear di un treeview

Un treeview caricato con piu' di 30.000 nodi impiega un tempo enorme per
scaricarsi attraverso il metodo clear (quasi 8 volte il tempo impiegato per
aggiungere i nodi).
Esiste un sistema veloce per ottenerne lo scaricamento.
Grazie in anticipo a chiunque possa fornirmi info in merito.
Riccardo Bortolotto.

 wrote in
message 7labhb$mfa$1...@pinco.nettuno.it...

Mah, non ho mai provato ad avere 30knodi in un tree...
Proverei a crearlo dinamicamente runtime (con un Load) e
a scaricarlo con Unload (purtroppo che io sappia
unload non funziona con i controlli creati Design Time
ma solo con quelli istanziati Runtime, quindi occore
creare un controllo Tree "fittizio" con index=0, magari
con visible = false, quindi nel "Form_load" faccio un
bel "Load MyTree(1)" e quando lo voglio scaricare
un "Unload MyTree(1)" e di nuovo "Load MyTree(1)").
Forse cosě funziona meglio.
Saluti, Massimo.


Prova questo codice:
Private Sub Command1_Click()
   'Caricamento Nodi
  Set Nodx = TV.Nodes.Add(, , "RADICE", "X")
  For x = 1 To 30000
  Set Nodx = TV.Nodes.Add("RADICE", tvwChild, "KEY" & x, "X"& X)
  Next x
End Sub
Private Sub Command2_Click()
    'Scaricamento Nodi
  TV.Visible = False
  TV.Nodes.Remove "RADICE"
  TV.Visible = True
  MsgBox TV.Nodes.Count
End Sub
Ciao, Giorgio

Newsgroup: it.comp.lang.visual-basic
Titolo: E' adatto il WinSock?

Scusate,
avrei un problema da porvi: è possibile, tramite il winsock, realizzare un
programma che, installato sul server di una piccola rete, permetta ai client
che si connettono di accedere ad internet tramite una connessione presente
sul PC server?
Spero che possiate rispondermi.
Francesco
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
e-mail: 
mign...@libero.it
 
gsp...@indi.it
ICQ# 72075059
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Si, è possibile. Quello di cui parli è un Proxy e WinSock è quello che serve
Fabio Guerrazzi

Quello che sogno di fare è la seconda delle tue ipotesi, un proxy che
permetta ai client della mia "LAN" (due computer miseri miseri)  di accedere
ad Internet tramite la connessione internet sul server.
Però sto riflettendo sulla difficoltà di questo progetto, forse è eccessiva
per me.


 wrote in message
news:l0685.17610$2s6.2...@news.infostrada.it...


 wrote:
Se ti interessa su 
www.analogx.com
 c'è un proxy freeware e tante altre
cose moooolto carine...


WINGATE??? WINGATE??? HAI DETTO WINGATE??? GLI HAI CONSIGLIATO WINGATE??? HO
CAPITO BENE??? RIPETI UN PO' CHE HAI DETTO???
Io direi un semplicissimo Squid su Linux (se č solo per il web), Wingate č
*sconsigliato*, a dir poco


 Io direi un semplicissimo Squid su Linux (se è solo per il web), Wingate è

Newsgroup: it.comp.lang.visual-basic
Titolo: Domandina per tutti gli espertoni

Come faccio a creare con VB un servizio per WIN NT?

...



Ci sono alcuni modi, il metodo piu semplice (a parte il
fatto che VB non e' lo strumento ideale per scrivere
servizi per NT anche se va bene )
consiste nello scrivere la tua applicazione normalmente e
poi installarla come servizio con il comando instsrv e srvany
che sono contenuti nel Resource Kit di NT........
se hai bisogno di altre info sull'uso di queste utilità fallo sapere.....
Ciao
Roberto
tat...@hotmail.com

...



ed eccoci alle dolenti note .... il resource kit lo trovi in una
delle tantissime librerie , ma lo trovi anche nella distribuzione del
Microsoft Technet.......
Qualche cosa del RK (oramai c'e' il RKsupplement3) lo trovi cercando sul
sito della MS........ oppure da un amico che lo ha comperato.........
Ciao
--
Roberto
tat...@hotmail.com