mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: PREGO URGENTE!! connessione al provider con VB 4.0

Per martedě prossimo devo scrivere del codice in VB 4.0 che:
1)Chiami la procedura esistente nella cartella di accesso remoto per
la connesione al provider.
2)Controlli che la connesione sia avvenuta e non ci siano ulteriori
errori creando magari un file di log
Ma la cosa piů importante č sapere come scrivere il codice per il
punto 1, Vi prego d'inviarmi il vostro codice di esempio altrimenti
non riuscirei a capire come fare solo con una spiegazioni di termini
specifici.
Ringraziandoti per l'invio
Gianluca

...


Il problema è come chiudere la connessione...........
Nelle Q&A in un sito vb ho trovato il seguente codice, non l'ho ancora
provato, ma promette bene:
How can I disconnect from the internet using VB?
If you want to terminate all connections to the internet using Visual Basic,
you can use the Remote Access Services Hangup function.  You first need to
tdeclare the following code in the declaration section of a form or module.
Declarations
Public Const RAS_MAXENTRYNAME As Integer = 256
Public Const RAS_MAXDEVICETYPE As Integer = 16
Public Const RAS_MAXDEVICENAME As Integer = 128
Public Const RAS_RASCONNSIZE As Integer = 412
Public Type RasEntryName
    dwSize As Long
    szEntryName(RAS_MAXENTRYNAME) As Byte
End Type
Public Type RasConn
    dwSize As Long
    hRasConn As Long
    szEntryName(RAS_MAXENTRYNAME) As Byte
    szDeviceType(RAS_MAXDEVICETYPE) As Byte
    szDeviceName(RAS_MAXDEVICENAME) As Byte
End Type
Public Declare Function RasEnumConnections Lib _
"rasapi32.dll" Alias "RasEnumConnectionsA" (lpRasConn As _
Any, lpcb As Long, lpcConnections As Long) As Long
Public Declare Function RasHangUp Lib "rasapi32.dll" Alias _
"RasHangUpA" (ByVal hRasConn As Long) As Long
Procedure
Public Sub HangUp()
Dim i As Long
Dim lpRasConn(255) As RasConn
Dim lpcb As Long
Dim lpcConnections As Long
Dim hRasConn As Long
lpRasConn(0).dwSize = RAS_RASCONNSIZE
lpcb = RAS_MAXENTRYNAME * lpRasConn(0).dwSize
lpcConnections = 0
ReturnCode = RasEnumConnections(lpRasConn(0), lpcb, lpcConnections)
If ReturnCode = ERROR_SUCCESS Then
    For i = 0 To lpcConnections - 1
    If Trim(ByteToString(lpRasConn(i).szEntryName)) = Trim(gstrISPName) Then
        hRasConn = lpRasConn(i).hRasConn
        ReturnCode = RasHangUp(ByVal hRasConn)
    End If
    Next i
End If
End Sub
Using the HangUp Procedure
Once you have copied all required code into your project, you can hang up
all connections to the telephone network by calling the procudure HangUp:
Call HangUp
Ciao, Silvio
Newsgroup: it.comp.lang.visual-basic
Titolo: atttendere attività di una finestra dos

Ho trovato questo post sul sito comune dove c'è questo modulo, ma non
riesco ad usarlo.
In effetti devo aspettare che l'esecuzione di una finestra DOS
termini:
******************************************************************************************
Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As
Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As
Long, lpExitCode As Long) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public Const STILL_ACTIVE = &H103
Public Const PROCESS_QUERY_INFORMATION = &H400
Sub Shell32Bit(ByVal JobToDo As String)         ' JobToDo is name of
program to run
Dim hProcess As Long, RetVal As Long            ' Next line launches
job as icon, captures process id
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, False,
Shell(JobToDo, 6))
Do
  GetExitCodeProcess hProcess, RetVal           ' Get status of
process
  DoEvents: Sleep 100                           ' Sleep command
recommended in addition to DoEvents
Loop While RetVal = STILL_ACTIVE                ' Look while process
is active
End Sub
******************************************************************************************
E poi se volessi vedere i risultati invece che nella finestra DOS in
una finestra Windows da me creata come faccio? in effetti questo
eseguibile deve partire, farmi vedere tutti i risultati che ottiene
invece della finestra dos in una finestra visual basic ed infine, a
procedura conclusa istruisco un msgbox che mi conferma l'avvenuta
funzione.
Thanks!!!

 
Prova a vedere questi link. Non sono esattamente cio' che vuoi, ma un 
punto di partenza ...
http://www.vb2themax.com/Item.asp?PageID=CodeBank&ID=174
http://groups.google.com/groups?hl=en&lr=&ie=ISO-8859-1&q=console&btnG=Google+Search&meta=group%3Dit.comp.lang.visual-basic
http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&threadm=Xns9236D5EAE409Djuliet%40127.0.0.1&rnum=10&prev=/groups%3Fhl%3Den%26lr%3D%26ie%3DISO-8859-1%26scoring%3Dd%26q%3Dconsole%2Bdos%2Bgroup%253Ait.comp.lang.visual-basic%26btnG%3DGoogle%2BSearch
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!
Newsgroup: it.comp.lang.visual-basic
Titolo: Sql e ado: Problema Selezione

Un saluto a tutti
Ho il seguente problema:
devo accodare dei record in  una tabellaA (in base a dei dati prelevati da
un'altra tabellaB), solo se il valore inserito dall'utente in una texbox non
e' presente in un determinato campo della tabellaA. In particolare il campo
in questione e' di tipo data (formato gg/mm/aaaa) mentre il valore inserito
dall'utente e' un anno in formato "aaaa" (e fin qui nessun problema in
quanto utilizzo la funzione "year"). Naturalmente basta che un solo record
della tabella presenti lo stesso anno per evitare l'accodamento. Mi spiego
meglio con il seguente esempio
TabellaA (Campo1, campo2,....., Campo5)
 'Dove campo5 e' di tipo data (gg/mm/aaaa)
supponiamo che il campo5 per una serie di record sia: 30/03/2000 (non e'
presente nessun record con data successiva a questa)
Supponiamo che l'utente nella textbox digiti: 2001
in questo caso debbo fare l'accodamento dei record
supponiamo che il campo5 per una serie di record sia: 30/03/2001 (non e'
presente nessun record con data successiva a questa)
Supponiamo che l'utente nella textbox digiti: 2001
in questo caso non debbo fare l'accodamento dei record
spero di essermi spiegato....!! Riporto di seguito il codice (sicuramente
errato.....), probabilmente sbaglio l'istruzione sql e non entro mai
all'interno dell'if :
(naturalmente la connessione al db e' gia' attiva e perfettamente
funzionante)
Private FA As ADODB.Recordset
Private FB As ADODB.Recordset
Set FA = New ADODB.Recordset
Set FB = New ADODB.Recordset
FA.CursorLocation = adUseClient
FB.CursorLocation = adUseClient
FA.Open "select * from tabellaA where  year(campo5)= ' & anno & '", cnn,
adOpenForwardOnly, adLockOptimistic
If Not (FA.EOF) Then
      ' presente, non effettuerò l'accodamento
    Exit Sub
Else
        'accoda i record
        ..............
End If
FA.Close
FB.Close
Set FA = Nothing
Set FB = Nothing
nell'istruzione sql "anno" è passato come val(text1.text)
Grazie a tutti anticipatamente per le dovute correzioni
e.

 adOpenForwardOnly, adLockOptimistic
prova a togliere gli apici :
FA.Open "select * from tabellaA where  year(campo5)= " & anno , cnn,
adOpenForwardOnly, adLockOptimistic
year(campo5) è un valore numerico
ciao
Enrico
Newsgroup: it.comp.lang.visual-basic
Titolo: andare a capo in una label

salve, ho una domanda stupidissima da farvi, ma di cui non posso proprio 
farne a meno.
vorrei sapere se c'è un carattere di controllo speciale da scrivere 
nella caption di un controllo label (impostato non a runtime) in modo da 
scrivere il testo seguente al rigo successivo.
cioè mi serve qualcosa del tipo "pippo[?]pluto" in modo che la label 
risulti:
pippo
pluto
ringrazio in anticipo
--
avast! Antivirus: In partenza messaggio pulito.
Virus Database (VPS): 0530-3, 29/07/2005
Controllato il: 01/08/2005 11.35.06
avast! - copyright (c) 1988-2005 ALWIL Software.
http://www.avast.com

 pluto
In prima istanza proverei a sostituire quel [?] con un vbcrlf.
mialabel.caption = "pippo" & vbcrlf & "pluto"
ma non so se funziona.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ma non so se funziona.
A design-time (come chiedeva l'OP), secondo me non funziona...
Alberto
-- 
Autore di
"Petting for Dummies"

 A design-time (come chiedeva l'OP), secondo me non funziona...
Devo essermi aggrovigliato un attimo mentre leggevo velocemente il post...


 ma non so se funziona.
non funziona, ci avevo già provato :(
credo che ripiegherò su una stringa da assegnare alla label
--
avast! Antivirus: In partenza messaggio pulito.
Virus Database (VPS): 0530-3, 29/07/2005
Controllato il: 01/08/2005 15.49.23


 credo che ripiegherò su una stringa da assegnare alla label
Cioè?


Newsgroup: it.comp.lang.visual-basic
Titolo: background & regioni...

riposto il messaggio perchè ho problemi nel ricevere le risposte...
se qualcuno mi vuole aiutare risponda anche in privato, grazie!
ho sentito dire che quando si sposta un picturebox su un form,
windows:
- ripristina l'immagine di fondo
- disegna il controllo nella nuova posizione...
però sembra che prima ancora windows riempia con un colore la regione del
controllo nella vecchia posizione
è effettivamente così?
se si come faccio a non far visualizzare la regione monocolore? (centra
niente la proprietà "ferase"?)

 niente la proprietą "ferase"?)
Prova a giocare con le proprietą Autoredraw e ClipControl
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione con ACCESS

Qualche anima pia mi puo' spiegare come far riconoscere un database fatto
con ACCESS 2002?
Per la connessione uso ADO.
Il VB6 è aggiornato al SP5
Ci sono dei riferimenti particolari da usare nel programma?
Vi ringrazio
-MAD-

 ha scritto nel messaggio
news:IgjZ8.77806$Jj7.2...@news1.tin.it...

Risolto.... usavo il vecchio Ms.Jet ecc ecc invece del 4.0
-MAD-
Newsgroup: it.comp.lang.visual-basic
Titolo: VB & machintosh

Innanzitutto auguri a tutti di buone feste e anno nuovo.
Qualcuno sa indicarmi come posso portare un programma visual basic in
machintosh??
La domanda è generica ma il mio problema è :
presumo che esista il vb per Mac ma io non ho Mac.
E' possibile convertire il programma o esiste un compilatore??
Saluti.

 machintosh??
L'unica possibilità che conosco è usare Virtual PC sotto Mac.
Qui c'è un articolo in italiano che ne parla:
http://www.macitynet.it/macity/aA07597/index.shtml
Qui c'è il sito del produttore: 
http://www.connectix.com/products/vpc5m.html
Ciao
*Roby*

 ha scritto

a parte che lo spelling sarebbe m-a-c-i-n-t-o-s-h, hmmm...
mi sembra se ne fosse parlato, e ci fosse una specie di vb per mac e
win, suggerito forse da gbc (non mi inzulti se sbaglio :).
non so se qualcuno l'ha poi testato, cmq proverei a cercare su google
groups le parole magice basic-macintosh.
ciao

http://www.realbasic.com/
--
Andrea Garbagnoli
garb...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Macro Excel

Salve a tutti e scusatemi se sono OT, ho realizzato una macro in excel,
dovrei distribuirla a diversi utenti,assumendo che tutti abbiano excel
installato, come faccio a realizzare qualcosa che assomigli ad un pacchetto
d'installazione?
grazie.
--------------------------------
Inviato via 
http://usenet.iol.it


Io ho già fatto qualcosa del genere
avevo un file XLA con le funzioni da me sviluppate
l'ho compresso con un programma che crea un eseguibile autoscompattante
ponendo la directory di default (per la decompressione)
c:\programmi\microsoft office\office\xlstart
naturalmente questo sistema non verifica (quindi considera scontata)
la presenza di office
la relativa installazione su sistema operativo in italiano (dir "programmi"
e non "programm files")
il non intervento dell'utente durante l'installazione allo scopo di cambiare
la directory di default
Se vuoi vedere come funziona
www.cerretosoft.it/download
sezione miscellanea
nome CSLib
Mauro
Newsgroup: it.comp.lang.visual-basic
Titolo: Puntatore ad handle

Ciao,
	capitato mai di lavorare con le api? ... se si capirete il soggetto e
problema annesso.
ho una funzione che chiede una variabile vuota ed in c++ si presenta come
&hAPI
come faccio a tirar fuori l'handle(cioe' hAPI)? 
grazie anzitempo.
--
Posted from 
IDENT:ro...@deepspace.cline.it
 [212.39.2.130] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 come faccio a tirar fuori l'handle(cioe' hAPI)?
cioè? in VB?
Il VB utilizza per default il passaggio per indirizzo dei parametri attuali
alle funzioni; il che si traduce nel fatto che se la tua funzione dichiara
un parametro formale come puntatore, basterà che da VB gli passi il nome
della tua variabile:
call tuafunz(miavar)
al ritorno miavar conterrà quello che deve.
Se invece il C si aspetta un passaggio per valore (come è suo solito), in VB
dovrai forzarlo specificando il parametro ByVal.
Ciao.
--
Princi, 
princ...@programmer.net
--------------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,
finché arriva uno sprovveduto che non lo sa e la inventa." A.E.

allora il problema e' questo
la situazione in c++ e' la seguente:
io ho 
typedef HANDLE  SVAPI_HAPI;
un attributo m_hAPI che e' di tipo SVAPI_HAPI
la funzione in questione vuole come argomento &m_hAPI
Come lo "traduco" in Vb
P.S. mi scuso per l'oggetto usato la poca chiarezza di prima
ciao e grazie
--
Posted from 
deepspace.cline.it
 [212.39.2.130] 


 Come lo "traduco" in Vb
Ma COSA devi tradurre?
1. Solo il passaggio del parametro attuale? Esattamente come ti ho detto
prima!
Ipotiziamo che tu ti sia creato in vb una classe "myclass" in cui hai un
membro pubblico "m_hAPI"; chiamenrai la tua funzione che vuole un puntatore
(che ovviamente sarà scritta in C) e gli passerai direttamente il membro
m_hAPI:
ex: risultato = FunzioneInQuestione(myclass.m_hAPI)    // questo è già un
passaggio per indirizzo.
2. La funzione che ha come parametro formale un puntatore? NON PUOI! O
meglio: ne abbiamo parlato pochi giorni fa ed è saltato fuori che si può
fare ma non ho ancora provato e cmq non ti consiglierei mai di implementare
funzioni che fanno uso di puntatori in VB. Questo non credo abbia alcuna
gestione dell'aritmetica dei puntatori e dovrai gestirti la tipizzazione
completamente a mano!. Lascia la tua funzione in C ed infilala in una DLL.
In ogni caso esiste la funzione VarPtr() implementata nei runtime di VB che
ti permette di ottenere il puntatore ad una variabile:
Declare Function VarPtr Lib "msvbvm60" (ptr As Any) As Long
passerai quindi VarPtr(myclass.m_hAPI) e ne recupererai il contenuto tramite
la CopyMemory() delle win32.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Copiare files da remoto

Ciao ragazzi,
vi propongo una disquidizione tecnica. Il mio software si aggiorna da remoto
dal mio sito Web, vedendo quali files sono stati aggiornati tramite un file
XML. Questo file XML contiene l'elenco, opportunamente strutturato, di tutti
i files che costituiscono la mia app. Ad ogni file ha una versione, che
viene verificata per vedere se quel file necessita di aggiornamento oppure
no.
Ok, adesso, mettiamo il caso che il file Stampa.rpt debba essere aggiornato.
Il software scarica il file Stampa.rpt dal mio sito Web e lo DEVE copiare in
C:\Programmi\NomeApp\Reports.
Pensavo di:
1) Usare Inet (o qualcosa più efficiente) per il download del file/s in una
directory temporanea
2) Copiare tramite Filecopy i files nella directory giusta dell'applicazione
Domanda: c'è qualche situazione in cui la copia potrebbe fallire? Posso
evitarlo in qualche modo?
Il mio software gira su diversi OS, da Win98 a WinXP, quindi potrebbero
verificarsi casi anomali.
Ad esempio:
- Utente che non ha i permessi necessari
- Qualche altro motivo che ora mi sfugge
Mi chiedo, per esempio: come fa LiveUpdate di Norton a garantire SEMPRE
l'installazione del nuovo file di def dei virus? C'è un modo per fare in
modo che l'operazione riesca sempre?
A parte ovviamente motivi più gravi, come directory non esistente, oppure
spazio esaurito e così via.
Consigli e/o idee?
grazie, good coding!!!
--
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

 Posso evitarlo in qualche modo?
Temo che l'unico modo per essere certi che il file è regolarmente pervenuto
in locale, sia quello di verificarne (oltre che l'esistenza) gli elementi
caratteristici (lunghezza, versione, qualche CRC particolare?) dopo il
download...

modo che l'operazione riesca sempre?
Immagino che il LiveUpdate giri come servizio con un proprio utente
munito dei diritti amministrativi opportuni.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Ma perchè? (Image.picture)

Perchè
Image1.Picture = "C:\windows\desktop\rado\img3d\" & Trim(Str(cont3d)) &
".jpg"
mi da questo errore:
-------------------------
errore di run-time '424':
Necessario oggetto
--------------------------
Il file esiste..
Vi ringrazio, sono in attesa dell'MSDN per trovare qualche informazione.
Ciao
Renzo

Il file esiste..
Hai provato con 
Image1.Picture = LoadPicture(nomefile)
?
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
---------------------------------------------------------------------------

 ?
Ti ringrazio infinitamente
Ciao
Renzo
Newsgroup: it.comp.lang.visual-basic
Titolo: Prova (non leggere)

Questa e` solo una prova per vedere se funziona l'indentatura di risposta
con Outlook in Ascii
=============================
Riccardo Bartolini
Loc. Valle di Lazzaro 226
57037 Portoferraio
Email: 
r...@elbalink.it
=============================
--
Automatic posted from [195.110.108.6]
via Mailgate Server - 
http://www.mailgate.org

Sono io che mi rispondo per vedere se la risposta si indenta.
Sto usando OutLook in modalita` solo testo.


Newsgroup: it.comp.lang.visual-basic
Titolo: Il componente ActiveX non può creare l'oggetto ... errore 429

ciao, devo risolver eurgentemente questa situazione: nella mia applicazione
ho la seguente parte di codice:
.......
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\test.txt", True)
a.WriteLine("Questa è una prova.")
a.Close
...........
fino a un'ora fa, tutto bene non mi veniva sollevato alcun errore, adesso
invece mi si presenta l'errore:
"Errore di run-time '429'
Il componente ActiveX non può creare l'oggetto"
L'errore viene sollevato dalla prima riga di codice che ho riportato (Set fs
= CreateObject("Scripting.FileSystemObject")). Perchè ?? Ma soprattutto come
risolvo la cosa.
Nel tempo trascorso tra qunado tutto funzionava correttamente e l'errore ho
disinstallato Norton Antivirus perchè mi dava problemi... Può essere stata
quella la causa ??
grazie.

 ...........
Puoi risolvere così:
Dim NFile As Integer
NFile = FreeFile()
Open "c:\test.txt" For Output As #NFile
    Print #NFile, "Questa è una prova."
Close #NFile
<g>
[ Se proprio vuoi usare il FSO, controlla che scrrun.dll esista e che
sia correttamente registrata ]
--
Faber

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

salve, non so se sono OT, ma volendo modificare delle immagini JPG con vb
volevo chiedere se qualcuno di voi sa percaso se su internet si puo' trovare
da qualche parte come è fatto esattamente un file JPG: es come si fa per
trovare i byte dove sono indicati i colori dei vari punti ecc.


wrote:

C'e' una libreria DLL che ti permette di fare tutto con i JPEG (e non
solo, anche con i TIFF, i BMP...) la versione non limitata e' a
pagamento (25$) ma ti consiglio di darci un occhiata perche' li vale
tutti
http://www.smalleranimals.com/imgdll.htm
Ciao

trovare i byte dove sono indicati i colori dei vari punti ecc.
Sul Sito Comune puoi trovare un progetto in VB che Apre, Decompatta,
Visualizza, Compatta, Salva i files JPEG, tutto italino e tutto in VB.
http://members.xoom.com/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb


---------
Ciao!
Guarda sul Sito Comune dei programmatori VB,
http://members.xoom.com/it_lang_vb
.
Alla prossima
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

 trovare i byte dove sono indicati i colori dei vari punti ecc.
La documentazione su tutti (o quasi) i formati di immagini, documenti, ecc, ecc. la trovi su 
http://www.wotsit.org/
Ciao
Riccardo
Newsgroup: it.comp.lang.visual-basic
Titolo: data report formato pagina

Sapete come si puņ stampare in orizzontale un data report, non ho trovato
nessuno comando che mi permetta di cambiare l'orientamento; se utilizzo
l'oggetto printer.orientation = 2, non ha alcun effetto sul report.
Grazie Tante

 Sapete come si può stampare in orizzontale un data report, non ho trovato


...






 Sapete come si può stampare in orizzontale un data report, non ho trovato


 un report in Orrizontale.
Si puņ fare tranquillamente tramite l'API.
Occorre utilizzare le funzioni esportate dallo spooler (winspool.drv),
in particolare SetPrinterA, passandoglio una struttura DEVMODE
preimpostata. Se non riesci a venirne fuori, preparo un esempio.

 Sapete come si può stampare in orizzontale un data report, non ho trovato


Se vuoi risolvere il tuo problema postami un e-mail al mio indirizzo,
ti spedirò un Dll che permette, ti spiegherò come, di stampare in orrizzontale
un DataReport.
Non sono la tua anima Pia come dice Pal

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema Vb

Stavo realizzando un programmino che prendendo come input un numero
intero deve restituire il corrispondente numero binario,
sembra che ho scritto tutto bene ma in realtà nn restituisce alcun valore.
Guardate qua:
Private Sub Command1_Click()
Dim num, temp, temp1, resto As Double
num = Val(Text1.Text)
If IsNumeric(num) And num > o Then
num = Int(num)
While temp > 1
num = num / 2
resto = num Mod 2
temp1 = resto & temp1
temp = num + 0
Wend
Label2.Caption = temp1
Else
Label2.Caption = "Errore: Il valore deve essere maggiore di 0 e un numero
naturale intero"
End If
End Sub
Dov sbaglio? L'ho fatto anke col do until , ma niente, qualcuno di voi mi
potrebbe aiutare?

> If IsNumeric(num) And num > o Then
uhm... *spero* sia un errore di battitura.....
num > 0 , non o (lettera)
ZERO, non O (come lettera dell'alfabeto) :-)
Ciao

prova questa!!!
Private Sub Command1_Click()
    Dim num As Long
    Dim temp1 As String
    Dim resto As Integer
    'Avevi dichiarato tutti VARIANT tranne l'ultimo!!
On Error GoTo Errore
num = CLng(Text1.Text)  'Conversioni esplicite più efficenti,
                        'tengono conto del paese
                        '(per decimali e separatori migliaia)
'Guarda che avevi scritto num > o (vocale o!!!)
'E poi l'if non serve
'Se il num non è valido dà errore alla conversione
'If num > 0 Then
Do
    resto = num Mod 2
    temp1 = CStr(resto) & temp1
    'Le conversioni esplicite sono sempre consigliabili
    num = (num - resto) / 2
Loop While Not num = 0
MsgBox temp1
Exit Sub
Errore:
MsgBox "Errore: Il valore deve essere maggiore di 0 e un numero
naturale intero"
End Sub

MHmhmhmhh...
2 dritte per il NG... e alla fine leggi la risposta... ;)
Questo é un messaggio di risposta standard e quindi impreciso, viene inviato
in genere a chi si é da poco affacciato al NG e potrebbe non contenere le
risposte in maniera diretta...
1)  Controlla il subject! Subject tipo: "Aiutooooo", "!!!", "Non ci sto più
dentro", "Sto impazzendo" sono subject che vengono filtrati da quasi
tutti... (Escluso il sottoscritto ancora per un po') e quindi non vengono
nemmeno letti dal 90% dei partecipanti (forse meno, ma comunque tanti)
2) Prima di postare sul NG sarebbe bene seguire un certo iter:
    a) Cercare nell' Help (alias MSDN ove possibile)
    b) Cercare nei vecchi post... Se ne hai pochi... non c'é problema, qui
ci sono quelli degli ultimi 6 anni (circa):
 
http://groups.google.com/advanced_group_search
    c) Cercare sul sito comune 
http://www.it_lang_vb.net
...Comunque almeno i post vecchi, MSDN e il subject sono vitali...
Non sarà prestazionalissima, ma...
Io ho fatto una funzione che converte in qualsiasi base... Può tornarti
utile: la trovi qui:
http://groups.google.com/groups?hl=it&threadm=9ffm5l%243o2e2%241%40ID-67444
.
news.dfncis.de
&rnum=1&prev=/groups%3Fq%3Dgroup:it.comp.lang.visual-basic%2Bi
nsubject:base%2Bauthor:Allanon%26hl%3Dit%26rnum%3D1%26selm%3D9ffm5l%25243o2e
2%25241%
2540ID-67444.news.dfncis.de
Newsgroup: it.comp.lang.visual-basic
Titolo: Materiale di studio

Gentili partecipanti,
sto' incominciando a studiare il linguaggio di programmazione VB.
Ho acquistato i seguenti libri:
Sams teach yourself VB 6.0 in 21 days autore Grag Parry
Sams teach yourself more VB 6.0 in 21 days autore Grag Parry
Teach yourself VB 6 autore Patricia Hartman
Practical VB 6 autori Bob Reselman and Richard Peasley
Oggetti e Visual Basic autore Debora Kurata
Visual basic 4.0 passo per passo Mondadori informatica
Conoscete titoli e/o autori,
ogni feed back e' gradito.
Grazie Marco.



Si sta traslocando da VB6 a 
vb.net
 , è il primo caso che mi capita di
trasloco a ritroso.
giuseppeD

 ha scritto nel messaggio
news:3c1b4f0c$0$20822$afc3...@news.optusnet.com.au...


Newsgroup: it.comp.lang.visual-basic
Titolo: DirectX in VB5

Ciao a tutti, vorrei creare dei piccoli giochini in VB5 tramite le
DirectX di Windows.
Qualcuno sà come potrei usarle? Devo per forza imparare il C++? Dovrei
usare le API?
Ringrazio chiunque mi dia dei consigli sull'argomento.
Gabriele
--
Posted from qmailr@[212.239.77.11]
via Mailgate.ORG Server - 
http://www.mailgate.org

 Ringrazio chiunque mi dia dei consigli sull'argomento. Gabriele
se non sbaglio, sui miei vb links cerca patrick scribe e in genere "dx".
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
Newsgroup: it.comp.lang.visual-basic
Titolo: Modifica ocx textbox

Salve a tutti,
il mio obiettivo è creare una textbox universale e flessibile.
Ho cominciato nel diversificare il tipo di dato in entrata.
Nel caso di una data, voglio che :
una volta che inserisco il giorno, in automatico mi inserisca /
una volta che inserisco il mese, in automatico mi inserisca /
Nell'evento keypress ho inserito:
Case Data
    If (KeyAscii < 48 Or KeyAscii > 57) Then KeyAscii = 0
    If Len(txtTextBox) = 2 Or Len(txtTextBox) = 5 Then txt=txt & "/"
ma non va perchè tutto quello che inserisco, dopo l'inserimento 
automatico di /, viene inserito all'inizio.
es.
12/05
0512/
Soluzioni ??

    If Len(txtTextBox) = 2 Or Len(txtTextBox) = 5 Then txt=txt & "/"
Per risolvere il tuo problema basta dirgli dove mettersi dopo aver aggiuto 
il carattere
    If Len(txtTextBox) = 2 Or Len(txtTextBox) = 5 Then
            txtTextBox.Text = txtTextBox.Text & "/"
            txtTextBox.SelStart = Len(txtTextBox.Text)
    End If
Considera però che come la stai facendo non ti è permesso cancellare :-D
Ciao Giuseppe 

 di /, viene inserito all'inizio.
Beh, definirla "universale" mi pare un azzardo :)
Comunque, usa un DateTimePicker e vivi felice.
Ciao 

Giuseppe ha scritto:

Mi dai il link di questa textbox universale ?
Ho cercato ma non ho trovato quella che accorpa tutto quello che mi serve.
A me occorre un controllo ocx che sia più completa di quella standard.
Premetto che sto parlando di vb6.
Per più completa intendo che abbia una proprietà che mi identifichi il 
tipo di dato che deve contenere, che abbia la proprietà mask,
che mi permetta una gestione grafica migliore di quella standard: Ad 
esempio la modifica del colore del bordo in edit piuttosto che in 
visualizzazione, etc. etc.
Se conosci una textbox, gratuita, possibilmente con codice sorgente, 
dammene informazioni.
thanks.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] WHERE DATA > #01/12/2000 00:00:01# non va!

In un database non riesco a visualizzare i dati utiliuzzando e comprendenti
i segni > e < riferiti ad un campo DATA con appunto le date formato
xx/xx/xxxx xx:xx:xx.
Seleziono il criterio da mandare all'esecuzione SQL e scrivo:
WHERE DATA > #01/12/2000 00:00:01#
Mi visualizza tutti i dati dal 1.1.2000 in avanti e non solo da dicembre ad
oggi.
WHERE DATA > #01/12/2000 00:00:01#
Non visualizza nulla di nulla
WHERE DATA LIKE '01/12/2000 00:00:01'
Correttamente mi elenca quelli del 01/12 correttamente
ma con > e < non riesco... dove sbaglio?
GRAZIE PER l'aiuto!
Franko

 
ciao
	maxx


WHERE DATA > #12/01/2000 00:00:01#
o
WHERE DATA > #12/01/2000#
con i DB si usa mm/dd/yyyy
quindi "#" & Format$(Date(), "mm/dd/yyyy") & "#"
Ciao

GRAZIE MILLE... quello della data inglese proprio non me lo ricordavo !!! e
ne ho buttato dentro di tempo... miseriaccia...
vedo se posso modificarlo come scritto da Z.-> TNX!
:-)))
GRAZIE!!! e BUON ANNO A TUTTI!
Franko
Newsgroup: it.comp.lang.visual-basic
Titolo: Il mio indirizzio IP tramite codice visual basic

Ciao a tutti come da oggetto qualcuno conosce un codice che mi restituista
il mio
indirizzo ip in un programma visual basic ?
grazie adriano

 indirizzo ip in un programma visual basic ?
Inserisci nella form un componente *Microsoft Winsock Control *
Private Sub Form_Load()
   MsgBox (Winsock1.LocalIP)
End Sub
Regards,
Antonio Cangiano
--
"I grandi spiriti hanno sempre incontrato violenta
opposizione da parte delle menti mediocri."
A.Einstein

 ha scritto nel messaggio
news:1_TU8.104533$Kt3.2...@twister2.libero.it...

Posso far diventare questa risposta la mia signature?
Non è per fare sempre polemica, hai fatto benissimo
a rispondergli però potevi anche dirgli di cercare
nei vecchi post di google questa domanda è stata
posta almeno 30 volte nell'ultimo mese.
                                                danilo

Come sai Danilo, capita spesso che postino roba stra-risposta anche a
distanza di poco tempo. Spesso "riprendo" la persona, ma talvolta in maniera
*magnanima* :o)) rispondo direttamente se è una cosa veloce, e alla prossima
segnalo la cosa all'interessato.
:o))
Ciao...
-----------------------SIGNATURE-----------------
Posso far diventare questa risposta la mia signature?
Non è per fare sempre polemica, hai fatto benissimo
a rispondergli però potevi anche dirgli di cercare
nei vecchi post di google questa domanda è stata
posta almeno 30 volte nell'ultimo mese.
----------------------------------------------------------
ROTFL :o)))

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto !!! GetDiskFreeSpaceEx

Qualcuno può gentilmente inviarmi il codice per utilizzare la funzione in
oggetto?
Notate che ho specificato 'GetDiskFreeSpaceEx' e non 'GetDiskFreeSpace' .
Grazie in anticipo

 wrote in message
stYQ3.2797$yQ.3...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: immissione dati

Salve amici, sono Antonio.
Secondo voi esiste qualche controllo griglia capace di contenere come cella
una casella combinata per inserire dati?
(Lo spero altrimenti è la fine!!!!)

 Grazie
non capisco i due post. se gia' sai quali sono i controlli che servono al
caso tuo...
comunque, tutti quelli che hai elencato si comprano.
vsflex *forse* l'avevano data fuori free con pcplus, se vuoi provare direi
sia
http://pcplus.co.uk
da qualche parte nel sito c'erano molti dei sw che danno su cd, compresi prg
da alcune decine di mb. normalmente non demo, ma versioni complete.
ovviamente non le ultime.
per il resto, direi
truedbgrid -> 
www.apexsc.com
c.r. -> 
www.seagate.com
magari hanno versioni lite free
in alternativa, se cerchi in
 
www.deja.com
 -> usenet
    "grid" + "combo" (e simili) + questo ng,
la domanda e' stata posta e risposta parecchie volte.

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET

ho scritto il seguente codice
sub main()
    dim frm1 as new form1()
    frm1.show()
end sub
form1 è senza codice.
e sub main è in avvio come prima procedura.
appena fa lo show del form il programma si chiude senza dare nessun errore.
Cosa sto sbagliando?
Grazie

 ha scritto nel messaggio
news:5ygO8.33119$TS.9...@news1.tin.it...

cerca questo subject : [!][.NET] Working with Multiple Forms
di hal; è di ieri ... mica tanto lontano !
Saluti

Cosa c'è che non va?
sub main()
    dim frm1 as new form1()
    frm1.show()
end sub
la sub main è la procedura di avvio del progetto e la  form non contiene nè
codice ne controlli.
appena chiamo il metodo show la form si vede per una frazione di secondo e
poi il programma si chiude.
Come mai?
grazie

 ha scritto nel messaggio
news:eBiO8.42807$5i1.1...@news2.tin.it...


 ha scritto nel messaggio
news:eBiO8.42807$5i1.1...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzo DirectX 5.x

Ciao
Ho la necessita' di far suonare piu' files .WAV contemporaneamente. Ho
saputo che con le DirectX e' possibile utilizzando DirectSound ma il
problema e' che non so come fare.
Qualcuno di Voi ha gia' avuto a che fare con queste librerie?
Saluti,
    David
--
E-mail: 
d...@iol.it

 Qualcuno di Voi ha gia' avuto a che fare con queste librerie?
 
Puoi trovare un po' di cose interessanti su questo sito....
http://www.geocities.com/SiliconValley/Heights/6429/
La zorro VB fun page.
Newsgroup: it.comp.lang.visual-basic
Titolo: adodc recordset query

Oi!
Devo associare ad un controllo adodc un recordset che sia generato con
una query:
SELECT * FROM tabellapolizza WHERE ID_Contraente= text9.text
Solo che non funziona, penso non accetti l'assegnazione finale al
contenuto della textbox. 
Come si fa?
Grazie mille e 
Axč!


Fai cosě:
Adodc1.recordsource = "SELECT * FROM tabellapolizza WHERE ID_Contraente = "
& text9.text
adodc1.refresh
se il campo ID_Contraente č di tipo testo allora fai cosě
Adodc1.recordsource = "SELECT * FROM tabellapolizza WHERE ID_Contraente = '"
& text9.text & "'"
adodc1.refresh
Buon lavoro


wrote:

Si, ma dove dovrei metterlo?
E poi adodc1.refresh mi dŕ errore...
Axč!

 E poi adodc1.refresh mi dà errore...
Dovresti inserirlo nel punto in cui modificare la recordsource (tipo
quando vuoi fare una ricerca o applicare un filtro), e comunque
dovresti sapere dove immetterlo, proprio lì dove ti serve...
Che errore ti restituisce? Parametro mancante? 3426? 
Fammi sapere

Che errore ti restituisce? Parametro mancante? 3426? 
No, mi dà un generico 'metodo refresh dell'oggetto adodc non riuscito'
Che vuol dire?
Axè!

Newsgroup: it.comp.lang.visual-basic
Titolo: Need Help In Code.

Hi,
    I'm new in Visual Basic. I like to know how can i write some
instruction into system registry that will load my program whenever
windows 95 start. And how can i code the program to copy itself or
certain program to some specific location in the hard disk?
PS: i'm trying to make a schedule program for my own use and i want it
to load a checking function when ever my windows load.
Thanks first....
If possible, please send a copy of your reply to me via e-mail. cause i
seldom get message from news ground.
OJ

The Easiest way to do this is once you have created and made your program
exe is to place it in the startup menu
Newsgroup: it.comp.lang.visual-basic
Titolo: Select ok SQLserver7, no access2000

ciao a tutti
non riesco a fare una select tipo:
select tab1.campo1, tab2.campo2, tab3.campo3, tab2.campo5 from tab1
left join tab2 on 
tab2.id
 = 
tab1.id
left join tab3 on 
tab3.id
 = 
tab2.id
................................
ecc.... ecc............
grazie in anticipo

 ha scritto

Mi sembra che la left join non sia suportata da Access

 Mi sembra che la left join non sia suportata da Access
Ma hai letto l'intestazione del messaggio?
Ciao
Alfonso

 ha scritto
| [...]
| > Mi sembra che la left join non sia suportata da Access
|
| Ma hai letto l'intestazione del messaggio?
Ti dirņ: ora che lo fai notare e' ambiguo!


Scusate la forma.
ripropongo la domanda
perche le query in SQL SERVER 7 funzionano, con tutte le sue LEFT JOIN
,RIGHT JOIN, e tutto quello ů
che ne puň venire;
mentre in Access 2000 appena inserisco piů di una LEFT JOIN mi da errore....

 mentre in Access 2000 appena inserisco piů di una LEFT JOIN mi da
errore....
azz, Jabba avevi ragione tu!
alfonso.precipitoso

 ha scritto
| azz, Jabba avevi ragione tu!
|
| alfonso.precipitoso
Ehi, non me l'ero mica presa! Capita di sbagliare!
(e io ne commetto tanti di errori!)
:-)))))

Sempre che commentate errori degli altri
ma una risposta soddisfacente non l'avete data
Giovanni
Jabba The Hutt <Jabba....@Alderaan.SW> wrote in message
gfcP7.6172$0T3.1...@news2.tin.it...


 ha scritto
| Sempre che commentate errori degli altri
| ma una risposta soddisfacente non l'avete data
Si, hai ragione Giovanni... riposta il quesito che qualcun altro che abbia una soluzione lo trovi...


A me sembra che Roal ti abbia risposto. Hai provato a mettere le parentesi
come dice lui, o era troppo faticoso? forse volevi che ti scrivesse lui la
query, così dovevi fare solo copia e incolla? Oppure hai provato e non ha
funzionato, nel qual caso potresti anche gentilmente farlo presente, così
nel caso si può pensare a qualcos'altro...
e comunque la risposta soddisfacente non siamo _obbligati_ a dartela, nel
caso è una gentilezza che ti facciamo, quindi vedi di essere un po' più
educato.
Ciao
alfonso
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare report in orizzontale???

Un Report fatto kon data Report è possibile stamparlo in orizzontale???
SI....... e io perkè non ci riesko...... mi date una mano????
Grazie.
Kris.

 wrote in message
8js8cs$c4v$1...@nslave1.tin.it...


 Aggiorna VB6 con la patch SP4 che puoi scaricare dal sito microsoft
OK l'ho fatto ma non riesko a akapire kome si fa a stampare in orizzontale,
kosa devo impostare???
Grazie ankora.
Kris.

 wrote in message
8jsmar$t0m$1...@nslave1.tin.it...

In +, visto ke ci sono, è possibile stampare su formatio diversi dall'A4...
e kome???
Grazie.
Kris.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema !!

Ciao a tutti !
Mi accade una cosa particolare.
Stavo modificando un programma su cui spesso metto mano. Faccio partire il
debug e VB mi dice :
"Per la funzione o l'interfaccia sono state impostate delle restrizioni
oppure utilizza un tipo di automazione non supportato in Visual Basic"
Io non ho toccato niente, non ho modificato o aggiunto componenti o
librerie, insomma, non ho fatto nulla e di punto in bianco mi fa questo
scherzo!
Il programma compilato invece non ha nessun problema.
Il messaggio è generico quindi non posso capire se si è scassata la chiave
nel registro di qualche componente..
Qualcuno a qualche idea??
Grazie mille.
Ciao.
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.330 / Virus Database: 184 - Release Date: 28/02/2002

Il problema è l'oggetto del tuo post! Cerca di essere più chiaro se vuoi che
qualcuno ti prenda in considerazione e ti consiglio di leggere il manifesto
del newsgroup.
Una volta ho avuto un problema del genere, ma siccome dalle tue spiegazioni
non ho capito se poi effettivamente il progetto viene caricato o il VB va in
errore, il mio consiglio è quello di creare un nuovo progetto e reimportare
tutti i form, moduli, classi ecc... e vedere se da lo stesso errore.
Ciao, Vincenzo

 del newsgroup.
Perchè devo leggere il manifesto?? Non mi pare di essere ot!!
Succede questo :
- carico il progetto e tutto ok.
- quando lo lancio da VB mi da quell'errore!!
Io non ho toccato niente.
Il progetto già compilato funziona utilizzando ovviamente tutti i componenti
e le librerie del progetto.
Non riesco a spiegarmi questo fatto. L'help è troppo genericop e non dice
nulla di più del messaggio di errore.
Ciao e grazie.


 Ciao e grazie.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: incompatibilità DLL

Ho (finalmente) convertito un mio programma da VB3 a VB40 (sono arrivato
alla preistoria) ma una DLL impiegata per gestire archivi indicizzati su
disco e scritta in C non funziona più correttamente e da prove i
problemi si manifestano dopo aver dimensionato variabili dinamiche
grandi come ad esempio nel seguente spezzone di codice:
Declare Function RoutineDLL(byval stri as string) as integer
....
Redim grande(1000)    'array di un qualsiasi tipo di dato
esito%= RoutineDLL(stringa)      'questa chiamata passando la stringa
non funziona
Che ci possa essere qualche problema con le specifiche
DATA e CODE contenute nel file .DEF della DLL in questione ?
C'è qualcuno che è in grado di darmi qualche informazione.
Grazie.

 wrote in message
news:37238ED2...@netbusiness.it...

Quale versione di VB usi, a 16 o 32 bit?
La dll è a 16 o 32 bit?
Qual'è il prototipo della dll?
Bruno

Newsgroup: it.comp.lang.visual-basic
Titolo: Stabilire il percorso di una DLL

Ho "immagazzinato" alcune funzioni in una DLL ActiveX (uso VB5). Se la devo
mettere (per esempio la cartella system č in d: anziché c:) in un posto
diverso da quello indicato in riferimenti, che faccio?
Grazie
Francesco

 wrote in message
10lnvt2$lvm$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: intercettare i download

Ciao, č possibile magari anche tramite qualche API, intercettare le
richieste di download http (non necessariamente inviate dal browser) di
determinati tipi di file? La risposta dovrebbe essere si, visto che download
accelerator ad esempio si accorge quando si tenta di downloadare certi file.
La domanda vera č: come si fa?
Grazie
Ciao
Alex

Per quanto ne so io servirebbe uno sniffer che, al momento del download,
intercetti la richiesta che quindi funga anche da firewall visto che
dovrebbe passarla al server facendosi vedere come interlocutore.
Lo sniffer non č difficile da fare in VB. Il firewall invece č piů
complicato e dovresti usare il C o la piattaforma .NET
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Windows 8 installazione SP6

Se a qualcuno servisse per installare Vb6 su Win 8 x64 c'è una procedura un 
pò diversa rispetto w7 e xp x64.
L'installazione di Vb6 è la stessa ma il processo va in blocco durante la 
fase di registrazione che và abortita.
Vb6 si installa ugualmente e funziona regolarmente ma mancando alcune 
registrazioni non sarà possibile installare il SP6.
A tale scopo bisogna inserire le chiavi di registro relative 
all'installazione di Vb6 mancanti e quindi si può procedere
con l'installazione del SP6 regolarmente.
 
 
 
 

Il 15/11/12 09:57, rg ha scritto:

Sarebbe buono sapere sapere quali sono queste chiavi mancanti e loro 
valori; magari un file aggiornamento registro messo sul sito comune
 
 
-- 
Greg

 valori; magari un file aggiornamento registro messo sul sito comune
 
Dipende dalla versione che usi, questa che cito � per quella Enterprise in 
inglese, per altre versioni come quella Professional in italiano cambiano 
alcuni valori come la cartella che � 1040 e non 1033 e la descrizione, io 
consiglio di fare una copia delle chiavi dal programma installato in windows 
7.
 
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\MS Setup (ACME)]
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\MS Setup (ACME)\Table 
Files]
"Visual Basic 6.0 Enterprise Edi...@v6.0.0.0.0626 (1033)"="C:\\Program 
Files (x86)\\Microsoft Visual Studio\\VB98\\Setup\\1033\\setup.stf"
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Visual 
Basic 6.0 Enterprise Edition]
"DisplayName"="Microsoft Visual Basic 6.0 Enterprise Edition"
"UninstallString"="\"C:\\Program Files (x86)\\Microsoft Visual 
Studio\\VB98\\Setup\\1033\\Setup.exe\""
 
 


Le chiavi di registro su Win8.1 (Ita) per VB6 Pro (Ita) sono le seguenti:
 
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\MS Setup (ACME)]
 
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\MS Setup (ACME)\Table Files]
"Visual Basic 6.0 Edizione Profes...@v6.0.0.0.0826 (1040)"="C:\\Program Files (x86)\\Microsoft Visual Studio\\VB98\\Setup\\1040\\setup.stf"
 
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Visual Basic 6.0 Edizione Professional (ita)]
"DisplayName"="Microsoft Visual Basic 6.0 Edizione Professional (Italiano)"
"UninstallString"="\"C:\\Program Files (x86)\\Microsoft Visual Studio\\VB98\\Setup\\1040\\Setup.exe\""

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per modifica al REGEDIT

Ciao a tutti, avrei bisogno di un consiglio, vorrei sapere come modificare
una voce qualsiasi del regedit usando vb.
Grazie
Marco



 wrote in message
news:8jcofg$s8n$2...@serv1.iunet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [.net 2005] errore improvviso di compilazione

Ciao!
Ho fatto una modifica innoqua al mio progetto, inserimento di una label, 
compilo e bum:
Il file immagine specificato non conteneva una sezione risorse. .
che errore è? e poi perchè salta fuori di colpo!?
A qualcuno è già capitato?

 ha scritto nel messaggio 
news:0lLAg.62968$zy5.1...@twister1.libero.it...


Graziano ha scritto:

Si non le ho cambiate!
Non so davvero cosa fare mi sembra assurdo!

Newsgroup: it.comp.lang.visual-basic
Titolo: su datagrid visualizzare solo record in relazione con record attuale

Oi!
Grazie in anticipo vi pongo un'altra domanda magari stupida.... :)
Ho un datagrid e voglio che su questo datagrid vengano visualizzati
solo i record in relazione con quello visualizzato da un data control.
Il data control č su una tabella e il datagrid su un'altra, quindi
dalla tabella del datagrid (che poi č collegato ad un adodc) voglio
selezionare e visualizzare solo quegli elementi in relazione con il
record visualizzato.
Qualcuno sa dirmi come si fa per piacere?
Grazie e 
axč!

Qualcuno sa dirmi come si fa per piacere?
Allora, ho settato 
id = CInt(text9.text)
ove text9 è un controllo non visible che contiene l'ID che voglio
'memorizzare'.
Aperta l'altra form, però non so dove usare questo valore per far
visualizzare al mio datagrid solo quei record con "ID contraente" = ID
Comunque l'istruzione sopra mi dà tra l'altro l'errore '13' tipo non
corrispondente.....
Qualcuno può aiutarmi, per piacere?
grazie mille e 
Axè!

 Qualcuno può aiutarmi, per piacere?
i componenti sono tutti su una form o su due form ?
giuseppeD

i componenti sono tutti su una form o su due form ?
sono su due form diverse. :)
Grazie mille e...
Axè!