mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: inner join in ADO non va!!!!!????

INCREDIBILE!!!
e' MAI POSSIBILE CHE NON RIESCO AD APRIRE UN RECORSET      ADO LA cui
stringa SQL contiene una INNER JOIN.
HO DUE TABELLE: UNA DEI MIEI AMICI
ID_AMICO
COGNOME
NOME
EMAIL
TELEFONO
ID_COMUNE
E L'ALTRA DEI COMUNI
ID_COMUNE
CAP
DESCRIZIONECOMUNE
VOGLIO UN RECORDSET PER OTTENERE I MIEI AMICI CON L'INDICAZIONE DEL COMUNE E
DEL CAP
SELECT * FROM COMUNI INNER JOIN AMICI ON COMUNI.ID_COMUNE = AMICI.ID_COMUNE
BEH! MI DA ERRORE!!!!!


prova questa :
SELECT * FROM COMUNI ,AMICI where COMUNI.ID_COMUNE = AMICI.ID_COMUNE
ciao
Enrico
p.s.: non strillare cosi'.... ;)


Intanto potresti anche dare delle informazioni piu' utili a risolvere il tuo
problema:
- che database usi (Access? Oracle? MSSQLServer?)
- che OLE-DB provider usi?
- con quali paramentri apri la Connection ed il Recordset (o usi un
Command?)
- che cavolo di errore ti da?

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Salvare testo in una textbox

Salve.
Qualcuno mi puo' aiutare con  il seguente problema?
Ho una form che contiene  1 listbox (lstscelta) e 2 textbox (text1 &
text2).
Cliccando su un componente della listbox, in text2 compare una
descrizione (e fin qui tutto bene).
Ora vorrei che gli utenti che andranno ad utilizzare il mio prg,
avessero la possibilita' di scrivere delle note in text1.
Le note ovviamente devono cambiare a seconda dell'oggetto selezionato
nella listbox e naturalmente si devono poter memorizzare.
Visto che l'elenco della listbox contiene di cento voci, non vorrei
creare altrettanti text box! 
Grazie infinite a tutti quelli che mi daranno una mano.
Ciao
redsk...@hotmail.com

Probabilmente le 100 voci della lista, sono prese da un DB
Se è così, basta aggiungere un campo del db con le note scritte dall'utente.
Ogni volta che cambi listindex, ti aggiorna quello precedente.
Forse è meglio un DBList, così sai già in che record sei e ti basta un 
recordset.edit
...
recordset.update
Attento però che se cambi listindex cambi anche record, per cui ti devi giocare un po' con sta storia.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

 ---------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: combo: possibilità di editazione

Vorrei disabilitare la possibilità di editare un combo, ma lasciare
attiva la selezione con la lista a discesa. Sapete come si fa??

.Style = 2
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
---------------------------------------------------------------------------


oppure, se devi mantenere la caratteristica di "dropdown combo" (style = 0)
basta che sull'evento keypress del combo stesso tu scriva:
keyascii = 0
Ciao
Tommaso  ^__^

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT-?] Applicazioni Web

Mi scuso fino da ora per il messaggio OT ma sono affezzionato a questo
newsgroup e sono certo che ci sarà qualcuno che potrà darmi le risposte che
cerco.
Devo realizzare un'applicazione tipo client-server basata sul web. In
pratica si tratta di accedere a dei dati tramite pagine web. Il problema è
che i dati dovrebbero risiedere sulla macchina dell'utente e non sul server
che dovrebbe invece fornire le pagine.
Cosa devo usare? Ho necessità di garantire compatibilità con il maggior
numero di browser e SO. La mia domanda riguarda quindi il tipo di tecnologia
(protocolli, linguaggi ambienti di sviluppo, basi di dati) da utilizzare e
magari anche qualche consiglio su dove recuperare info (libri che fanno al
caso mio, documentazione on-line, ecc..).
Grazie a tutti per la disponibilità.
Ciao, Rick.

 caso mio, documentazione on-line, ecc..).
mah, se non è una grossa limitazione utilizzare _solo_ IE4/5 in ambiente
Win32 allora potresti utilizzare una serie di componenti ActiveX, magari
scritti in VC++ in modo da ottimizzare le dimensioni (nessuno ama i download
troppo lunghi...)
altrimenti prova con Java;
infine, se i dati da trattare sono pochi e non eccessivamente strutturati,
potresti anche lavorare con degli script lato client (VBScript o, meglio
ancora, Java Script)
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere una voce associata ad un programma sul menu tasto destro

Ciao,
vorrei aggiungere una voce al menu che appare cliccando col tasto destro su
un file, in modo che cliccandoci su, venga eseguito un programma scritto in
VB6.
Per capirci, se installo WinZIP, quando clicco col tasto destro su un file
qualsiasi (non .zip) mi appare la scelta "Add to zip file" la quale richiama
winzip.exe e associa il file selezionato.
Il mio programmino dovrebbe fare la stessa cosa. Se clicco col tasto destro
dovrebbe apparire una voce tipo "Calcola CRC" e selezionando dovrebbe
avviare crc.exe passando come parametro (%1) il path del file selezionato.
Non deve cambiare il programma di default (se è un .doc col doppio click
deve continuare a lanciare Word)
Qualcuno ha già fatto qualcosa del genere ?
Grazie
Rob

 VB6.
Vai sul sito comune (
www.it-lang-vb.net
) tempo fa avevo inviato un 
programma che fa anche questo: cerca ZipDir.
Ciao

 ha scritto nel messaggio
news:bivpoq$dmvva$1...@ID-184808.news.uni-berlin.de...


 
Cercato per nome di file?
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Jet Engine VB4 !!

"Elemento non trovato in questo insieme" è la sibillina frase che mi
compare (relativo errore 3265) quando cerco di associare una tabella
(tab1) ad un controllo data attraverso l'assegnazione della proprietà
recordsource, fatta tramite una semplice istruzione SQL: "SELECT * FROM
tab1".
Esistono anche tab2 e tab3.
Il problema è che l'engine non riesce a stabilire a quale tabella
accedere ?
L'errore, in effetti, riguarda proprio la difficoltà di reperire la
giusta sorgente.
Non è così ??
Come risolvo ??
Grazie.
--
'NzistiCaResisti

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto separatore decimali

Ciao,
come faccio a dire a VB di usare nei valori decimali (da me inseriti
tramite textbox) il punto e non la virgola dato che poi dovro' leggere
tali valori con una WRITE??
Grazie
Marco
--
Posted from 
smtp3.libero.it
 [193.70.192.53] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 come faccio a dire a VB di usare nei valori decimali (da me
inseriti tramite textbox) il punto e non la virgola dato che
poi dovro' leggere tali valori con una WRITE??
Non capisco, hai letto la guida alla pagina "Istruzione
Write#"? C'e` scritto:
"Quando si utilizza la funzione Write # per scrivere dati in
un file, vengono adottati criteri universali che consentono di
leggere e interpretare correttamente i dati con l'istruzione
Input #, indipendentemente dalle specifiche di paese:
I dati numerici vengono sempre scritti utilizzando il punto
(.) come separatore decimale."
Uhm... aspetta... credo di capire... se vuoi scrivere dati
numerici, dati numerici hanno da essere! Dovrai quindi
convertire la *stringa* contenuta nella TextBox in un tipo
numerico, per esempio Currency:
    Write #1, CCur(Text1.Text)
Meglio ancora, usa una variabile e testa la congruenza dei
tipi prima della scrittura su file.
--
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: precedenza sulle azioni

ciao!
io ho il seguente problemino:
ho fatto un programma che utilizza il netsend, ma quando chiamo la
funzione che esegue netsend, questa mi parte prima dell'istruzione
precedente,
mi spiego meglio cosě :-) :
sub scirio
text1.text="attendere"
call netsend
end sub
in buona sostanza, prima mi chiama netsend e poi mi scrive attendere
il che non mi va bene xchč netsend a volte č lento e attendere serve
apposta x avvisare la gente :-)
qualcuno sa dirmi come mai succede ciň???
le ho provate tutte!

 end sub

le ho provate tutte!
Successo anche a me. Risolto con Me.Refresh

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ComboBox riempimento automatico

Avete una routine per "suggerire" il testo di una combo mentre si scrive,
prelevandolo dall'elenco (come in access in pratica)?
Grazie

 wrote in message
10muphi$hu7$1...@fe2.cs.interbusiness.it...


Potresti mandarla anche a me ?
Psa...@tisaclinet.it



Newsgroups: it.comp.lang.visual-basic
Subject: [!] auto-complete combo & text
Date: Mon, 14 Feb 2000 03:24:42 +0100
era abbastanza richiesto, direi:
http://www.scottandmichelle.net/scott/code/index2.mv?codenum=028
non l'ho provato, ma il sito e' magnifico e direi valga la pena guardare.


http://www.scottandmichelle.net/scott/code/index2.mv?codenum=028
  Com'e' che cliccandoci io trovo un esempio riguardante la gestione
dei CD? Comunque, e' bastato una ricerca con chiave "combobox" ed ho
trovato l'esempio giusto.
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

 ha scritto nel messaggio

Newsgroup: it.comp.lang.visual-basic
Titolo: Problem, inserting time database field in Crystal Reports

Hi!
    I have problem, in inserting a database field (which is of type
DATE/TIME, but I stored time in it). When I browse the contents of this
Database field in Crystal reports, to my suprise only a sigle Date value
is displayed.
  Please let me know, how to solve the above problem.
Thanking you in advance,
regards,
Praveen,
Sent via Deja.com 
http://www.deja.com/
Before you buy.

From the menu File --> Report Options
Here you select the kind of conversion you want.
If you want just the time select the conversion in Date Time and then change
the format of the field.
Bye,
Fabrizio

,



Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] Stampare una listView Report

Non riesco a stampare una listView in formato report con VB6.
Mi stampa solo l'intestazione delle colonne e non le righe dei dati che ho
inserito. Se nelle proprietà del controllo dico di non visualizzare
l'header, allora stampa solo il valore della prima cella di dati in alto a
sinistra. Notare che il resto del form viene stampato benissimo, così come
lo sfondo della listView (ho provato con una HP a colori).
Qualcuno ha qualche idea ???
Grazie
Stefò





Newsgroup: it.comp.lang.visual-basic
Titolo: colorare una listbox .. è possibile ??

 Anonimo

 è possibile?? chi mi potrebbe aiutare ??=
Con un list box normale non credo sia possibile.
Poi non so se ci sono ocx con list box che gestiscono testo rtf
Se per te e' importante realizzare questo effetto (la mamma e' sempre la
mamma ;-) ti consiglio di "simulare" un list box usando un richtextbox
Non dovrebbe essere troppo difficile.
Ti do qualche spunto.
Crei un richtextbox e attivi la sbarra verticale.
Crei un vettore di stringhe che simulera' la proprieta' .list del list box,
diciamo che lo chiameremo VetList() as string  con la variabile associata
CountList che contiene gli elementi
Poi scrivi qualche riga di codice per gestire la simulazione:
Quale esempio:
1) Per visualizzare i dati
with RichTextBox1
    .TextRTF = ""
    for i = 0 to CountList-1
        .TextRTF = VetList(i) & vbcrlf
    next i
end with
2) Per simulare la selezione di un'intera linea:
- Nell'evento RichTextBox1_Click() memorizzi la posizione della selezione
attuale, e conti tutti i caratteri vbCrLf dall'inizio fino a questa
posizione. Cosi' ottieni l'indice di VetList() della riga corrispondente e
puoi selezionarla tutta
- Per togliere il cursore, nell'evento GotFocus metti un SetFocus a qualche
altro controllo
- Per ordinare il "list box" ordini il vettore VetList e poi lo visualizzi
come nel punto 1
ciao
Paolo B.

 ha scritto nel messaggio
news:b37us8$1j0aq7$3...@ID-78415.news.dfncis.de...


 ha scritto nel messaggio
news:6lL5a.145190$ZE.41...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: manifest

Ciao ragazzi
ho visto che vengono usati per fare la grafica in stile windows XP dei file
.manifest...
Ho a disposizione il file come faccio per inserirlo nel progetto ed in tutti
i form per farlo funzionare???
Grazie e arrivederci!

Francesco 'Imperator' Ricci ha scritto:

Ciao.
Devi semplicemente inserirelo nella cartella del tuo file .exe 
rinominandolo come :
[nomeprogramma.exe].manifest
Il nome file del manifesto dell'applicazione 'myApp.exe', ad esempio, è 
'myApp.exe.manifest'.
-- 
Ciao.
Roberto Rossi
Web   : 
http://rsoftware.altervista.org

Newsgroup: it.comp.lang.visual-basic
Titolo: True Font Type

Avrei bisogno di interpretare un testo scritto in True Type per
ricavare le
coordinate dei singoli caratterei per riportarli nel mio programma di
grafica. Qualcuno mi sa dare delle indicazioni? (non so da dove
iniziare...). Grazie!

 ha scritto nel messaggio
news:1133434271....@f14g2000cwb.googlegroups.com...

VB.Net o VB6?
In entrambi i casi se il font è installato dovrebbe essere sufficiente
caricarselo (classe Font per .net, API GDI per VB6: CreateFont,
GetTextMetrics ecc...) e leggerne le caratteristiche.
Ciao
--
Reporting tool: 
http://www.neodatatype.net

Newsgroup: it.comp.lang.visual-basic
Titolo: applicazione invadente

Lanciando un applicazione da me realizzata e parcheggiandola per lavorare
su altre finestre si riapre automaticamente ed insistentemente finché non
decido di chiuderla definitivamente: a cosa è dovuto ? 
Stefano
sme...@tin.it
--------------------------------
Inviato via 
http://usenet.iol.it

decido di chiuderla definitivamente: a cosa č dovuto ? 
ad un errore nel codice che non ci hai postato. Siamo programmatori, mica indovini! :-))
A parte gli scherzi, cerca di essere piů preciso... magari semplicemente qualche controllo riceve il
fuoco, ma se non posti il codice incriminato non possiamo tirare ad indovinare...
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
---------------------------------------------------------------------------

---------------------------------------------------------------------------
--------------------------------
Inviato via 
http://usenet.iol.it
 

Avrai messo un SetFocus a tempo, o in un evento "LostFocus". Di più non
possiamo INDOVINARE...
Newsgroup: it.comp.lang.visual-basic
Titolo: ItemData in Combobox

Salve,
in vb6, in un controllo combobox carico un set di record
con testo e id nella proprietà item data.
es
Descrizione1
  itemdata(54)
Descrizione2
  itemdata(55)
 
e così via. Se richiamo il form da un'altra finestra che
contiene l'id della descrizione richiamata, vorrei che la combo
mi evidenziasse l'elemento richiamato, ma non riesco a capire come fare.
La ItemData di descrizione1 è 54 che corrisponde alla listindex(0).
C'è un sistema o devo attivare un cliclo per verificare il valore
della proprietà?
 
Grazie
 

 ha scritto nel messaggio 
news:jinrpr$11g$1...@speranza.aioe.org...

Devi fare un ciclo di tutti gli elementi nella combobox leggendo la 
proprietà ItemData, quando la trova leggi la proprietà ListIndex e imposti a 
quel valore ListIndex la ComboBox 
 
 


Grazie per il suggerimento.
In realtà, ho agito diversamente: Al load del form, durante il quale
carico la combo con i nomi presi dall'archivio, visto che il ciclo lo 
deve compiere per forza, è in questo frangente che verifico se 
l'itemdata corrisponde al codice cercato, e prendo il riferimento
della listindex. Risparmio un passaggio e in termini di tempo
è ovviamente piu rapido.
 
Grazie ancora

Newsgroup: it.comp.lang.visual-basic
Titolo: cartella esiste ?

come faccio a sapere se una cartella su disco esiste ?
e se non esistesse...come faccio a crearla ?
grazie a tutti voi come al solito.


  If Dir(NomeDir, vbDirectory) <= "" Then
        MkDir (NomeDir)
  End If
 Ciao
Enrico

 wrote in message
news:a76u1t$1c1vj$1...@news02.it.net...


 ha scritto nel messaggio
news:10165241...@server.darkside.it...


   End If
Domanda tecnica: Cosa può essere < di ""? Un Null, forse? Grazie.

 ha scritto nel messaggio
news:wjNl8.42979$%g7.13...@twister2.libero.it...

Niente è solo l'abitudine di tradurre "not >" (cobol) :-)

mi spiego meglio (spero di riuscirci):
spesso mi trovo a pensare le if  come se scrivessi in cobol
    if pippo not > space ( test passato per pippo=spazio o pippo=hex(0000))
scrivendo lo "converto" come
   if pippo <= ""
E' una deformazione tutta mia (niente di tecnico).
Ciao
Enrico

Newsgroup: it.comp.lang.visual-basic
Titolo: Carattere " & "

Come inserirlo, ad es. in una label?
Grazie.
Gregor.

 Grazie.
&&

 ha scritto nel messaggio
news:9rs0pb$vhhgk$1...@ID-51318.news.dfncis.de...

Come detto chiaramente dall'help di "Caption".
Ciao

 wrote in message
news:9rs0pb$vhhgk$1...@ID-51318.news.dfncis.de...

Grazie javalab!!!
Gregor.
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo esistenza di un file

Salve a tutti,
dovrei fare un controllo se esiste un file in un dischetto.
Ho provato a fare una dir, ma se non è presente il discetto mi da un errore,
se invece è presente il dischetto ma non c'è il file mi da una stringa
vuota. Io vorrei gestire anche l'assenza del dischetto come posso fare?
Grazie!

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

 wrote in message


 wrote in message
news:8t7fbb$7i6$1...@phobos.ibnetwork.net...


 > > se invece č presente il dischetto ma non c'č il file mi da una stringa


 Ho provato a fare una dir, ma se non è presente il discetto mi da un
errore, se invece è presente il dischetto ma non c'è il file mi da una
stringa vuota. Io vorrei gestire anche l'assenza del dischetto come posso
fare?
Un modo potrebbe essere questo:
Option Explicit
Private Sub Command1_Click()
  Dim s As String
  s = Text1.Text
  If Len(s) = 0 Then Beep: Exit Sub
  Command1.Enabled = False
  If DriveExists(s) Then
    If FileExists(s) Then
      MsgBox s & vbCrLf & "File trovato."
    Else
      MsgBox s & vbCrLf & "File non trovato."
    End If
  Else
    MsgBox "Drive " & UCase$(Left$(s, 1)) & " non pronto."
  End If
  Command1.Enabled = True
End Sub
Function DriveExists(ByVal d As String) As Boolean
  If Len(d) = 0 Then Exit Function
  On Error Resume Next
  Dir Left$(d, 1) & ":\"
  DriveExists = (Err.Number = 0)
End Function
Function FileExists(ByVal FullPathName As String) As Boolean
  FileExists = Not (Len(Dir(FullPathName)) = 0)
End Function
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Usare oggetti word in Visual Basic

Salve sto realizzando un'applicazione in VB e devo riempire un file
word, in pratica lo apro con
Dim myword          As Word.Application
Set myword = New Word.Application
myword.Documents.Open "dddd.doc"
poi uso le funzioni come
    myword.Selection.WholeStory
    myword.Selection.Copy
    myword.ActiveDocument.Close
     myword.ActiveDocument.SaveAs App.Path & "\" & strNomeFile
    '"Fine.doc"
    myword.ActiveDocument.Close
    myword.Quit
    Set myword = Nothing
Il problema è che se ho aperto un documento word prima dell'esecuzione
non succede nulla, ma se lo apro mentre eseguo il codice inizia a
copiare il tutto dentro il word e poi lo chiude ecc.
qualcuno ha qualche consiglio??? creare un istanza protetta di word e
usare solo quella.
Marco


Prima di aprire una istanza puoi controllare se ce né già una aperta con i 
GetObject, altrimenti passi ad aprirne un'altra con il CreateObject...
http://msdn2.microsoft.com/en-us/library/e9waz863(VS.80).aspx
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio
news:988d5a99-16b6-4802...@p69g2000hsa.googlegroups.com...



    myword.Selection.WholeStory
    myword.Selection.Copy
    myword.ActiveDocument.Close


Marco
Oltre a quanto ti ha suggerito Sergio Mazza, vorrei consigliarti di evitare
di usare le referenze alla libreria di Word e di usare invece il LateBinding
che
ti mette al riparo(nel caso di distribuzione) da eventuali difformità nelle
versioni
installate.
Il LateBinding lascia gestire all'interprete l'istanza dell'applicativo OLE
in base a quello
installato:
Questo è EARLYBINDING
Dim myword          As Word.Application
Set myword = New Word.Application
Questo è LATEBINDING
Dim myword          As Object
Set myword = GetObject(....)
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione Oggetti in Run Time

Come faccio a creare oggetti in modalità run-time?
cioè io devo crere un richtextbox per ogni file aperto; quando da run
time io apro un file cosa devo fare per creare ( istanziare )un nuovo
oggetto richtextbox da run time , o che è lo stesso edit box o simili,
possibilmente aggiungendolo ad una matrice di controlli?

 ha scritto nel messaggio
news:810d6b9c.02042...@posting.google.com...

Crea il tuo oggetto "padre" con Index=0 e poi fai Load...
Newsgroup: it.comp.lang.visual-basic
Titolo: DBGrid e DataGrid

Qualcuno può spiegarmi xchè in VB6 non esiste più la Data Bound Grid?
Quella DataGrid che c'è in VB6 non funziona con il controllo DATA1?
Come si fa ad usare questa nuova Griglia? Se entro in RecordSource mi dice
di selezionare le proprietà ADO o qualcosa del genere (ora non ho sottomano
il Pc dove c'è VB6 e il msg non me lo ricordo)
Ora mi domando: per chi ha sviluppato un'applicazione in VB5 e vuole
portarla in 6, come fa se c'è dentro una DBGrid?

>il Pc dove c'è VB6 e il msg non me lo ricordo)
La DBGrid continua ad esserci. Cercala tra i componenti.
la DataGrid si appoggia ad ADO e quindi a ADOC oppure a Recordset aperti con ADO da codice oppure a classi definite come DataSource.
Antonio

Newsgroup: it.comp.lang.visual-basic
Titolo: DB in VB!!!

Ho la necessità di creare un programma in VB5 che mi permetta di creare un
DB Access (*.mdb) comprese le tabelle e i campi che contengono.
Qualcuno sa dirmi come posso fare?
Grazie anticipatamente.

Ho adattato delle function che uso per la spiegazione, per cui qualcosa
potrebbe essere sbagliato ma il senso dovrebbe essere chiaro. Leggi  bene
gli help di VB connessi ai metodi e agli oggetti che ho usato
Buon lavoro Stefano.
CREAZIONE File .MDB
______________________________________________________________________
    Dim wrkPredefinita As Workspace
    Dim dbsnuovo As Database
    Dim prpCiclo As Property
    ' Ottiene l'area di lavoro predefinita.
    Set wrkPredefinita = DBEngine.Workspaces(0)
    ' Assicurarsi che non esista già un file con il
    ' nome del nuovo database.
     If Dir(nuovodb) <> "" Then Kill nuovodb
    ' Crea un nuovo database cifrato con l'ordine di
    ' confronto specificato.
    Set dbsnuovo = wrkPredefinita.CreateDatabase(nuovodb, dbLangGeneral,
dbEncrypt)
    dbsnuovo.Close
CRAZIONE TABELLA in file .MDB
____________________________________________________________________________
è
    Dim MioDB As Database
    Dim tdfNuovo As TableDef
    Set MioDB = OpenDatabase(PathNomeDB)
    ' Crea un nuovo oggetto TableDef.
    Set tdfNuovo = MioDb.CreateTableDef(NomeTabella)
    Dim fld As Field     'Variabile locale che contiene la struttura del
campo
    Dim I As Integer
    'Crea un nuovo oggetto Field
    ' questa parte puo' essere inserita in un ciclo di creazione dei tutti i
campi necessari
  Set fld = tdfNuovo.CreateField()
  'Inserisci i dati nell'oggetto Field
  With fld
    .Name = NomeCampo
    .Type = TipoCampo '  vedere istruzioni su Help VB
    .Size = DimensioneCampo
    .Attributes = AttributiCampo ' Vedere istruzioni su Help VB
  End With
  'Tenta di aggiungere il campo
  tdfNuovo.Fields.Append fld
 ' inserire eventuale fine ciclo inserimento campi
  MioDb.TableDefs.Append tdfNuovo
  MioDB.Close
CREAZIONE  Query in file .MDB
___________________________________________________________________
    Dim MioDB As Database
    Dim qdfMiaTabella As QueryDef
    Set MioDB = OpenDatabase(NomePathmioDB)
    Set qdfMiaTabella = MioDB.CreateQueryDef(NomeQuery,IstruzioneSQL)
    MioDB.Close
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto su text multiline

Ho un piccolo problema non riesco a visualizzare su unica riga il contenuto
di un text multiline. Alla fine di ogni rigo c'e' un ritorno a capo. Esiste
qualche sistema ?
Ciao

 ha scritto nel messaggio
news:9hhthq$neo$1...@pegasus.tiscalinet.it...

Ehm.... e di settare la proprietą text1.multiline = false e scrivere tutto
su una riga?


Si, usa la funzione Replace per sostiutire il carattere VbCrLf (il carattere
di ritorno a capo) con nulla o con uno spazio.
Ciao!

 ha scritto nel messaggio
news:9hhthq$neo$1...@pegasus.tiscalinet.it...

se ho capito bene, potresti risolvere impostando la proprietą ScrollBars
del TextBox a 1
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere record

Devo fare un programma vb che gestisca un database Access, per l'inserimento
di un nuovo record ho fatto due bottoni: il primo che fa
data1.recordset.addnew
e il secondo che prima passa tutti i valori delle text (collegate al
database) sui campi del record e poi fa
data1.recordset.update.
Come posso fare a riunire tutto in un pulsante, perchè ho notato che se
metto addnew sul secondo pulsant mi pulisce tutte le text e quindi va a
scrivere un record vuoto.
Grazie.
Mario

 wrote in message
8p29nc$dmq$1...@fe2.cs.interbusiness.it...


Come posso fare a riunire tutto in un pulsante, perchč ho notato che se


Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] Bitmap...strane?

Ciao a tutti, ho il seguente problema:
Se da codice faccio creare una nuova bitmap non mi crea una bitmap valida,
mentre se modifico una bitmap esistente e la salvo esce un formato valido.
Il codice utilizzato è il seguente:
Per modificare e salvare:
sub RiScrivi()
    Dim Prova As New Bitmap("C:\prova.bmp")
    Dim X%, Y%
    For Y = 0 To Prova.Height - 1
        For X = 0 To Prova.Width - 1
            Prova.SetPixel(X, Y, Color.Black)
        Next
    Next
    Prova.Save("C:\Risultato.bmp")
End Sub
Per creare una nuova bitmap:
Sub Scrivi()
    Dim Prova As New Bitmap(100, 100, Imaging.PixelFormat.Format32bppRgb)
    Dim X%, Y%
    Try
        For Y = 0 To Prova.Height - 1
            For X = 0 To Prova.Width - 1
                Prova.SetPixel(X, Y, Color.Black)
            Next X
        Next Y
        Prova.Save("C:\Scrittura.bmp")
    Catch eAs Exception
        Console.WriteLine(e.Message)
    End Try
End Sub
Ciao e grazie
    Mavimo

        Prova.Save("C:\Scrittura.bmp")
Qui gli va specificato il formato:
Prova.Save("C:\Scrittura.bmp", System.Drawing.Imaging.ImageFormat.Bmp)
-- 
ciao, hal

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

ho creato un TextBox e abilitato ScrollBars=both ma non barre di
scorrimento.
come faccio ad ottenerle?

 come faccio ad ottenerle?
forse ti manca MultiLine = True ...
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Lame Error

Salve a tutti,
stavo cominciando a usare la beta 2 sp2 di Visual Basic Net, e mi compare
uno stano errore quando cerco di creare nuovi progetti o cerco di aggiungere
nuove form ad un progetto sempre create con la versione NET di Visual Basic.
L'errore č:
File or assembly name System, or one of its dependencies, was not found
Qualcuno sa dirmi cosa puň aver causato il problema e come risolverlo
grazie!

 wrote in message
news:9pki63$50s$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Programmi in Esecuzione

Ho bisogno Verificare se uno specidico programma e' in esecuzione e nel caso
negativo eseguirlo (e questo e banale) in quello positivio dagli il Focus.
Inoltre Come posso passare un parametro ad un eseguibile e gestirlo in base
al suo contentuto??
Es:
"Prova.exe 3"
Il parametro 3 indica l'utente.
L'equivalente di scrivere "notepad.exe prova.txt"
cioe' apro il file prova.txt con Notepad.
Spero qualcuno possa aiutarmi.
Grazie

 cioe' apro il file prova.txt con Notepad.
per questo guarda la funzione (istruzione?) Command (dollaro o non dollaro)
--
Salutoni
un Sergio dubbioso

 Grazie
Andrea

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

 Grazie  a tutti!
ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] - trovato sito in italiano con sorgenti (www.iswapcode.com)

Ciao raga, ho trovato un sito con un elenco di sorgenti in Visual Basic ...
per gli interessati:
http://www.iswapcode.com
:o)

Complimenti per la faccia di bronzo ...
... e dillo che il sito e' il tuo, no ?
A proposito: abbiamo gia' ricevuto due volte ieri questo messaggio,
ora stai dando fastidio, perche' la pubblicita' ipocrita qui e' _molto_
malvista.
hal

Bravo bravo..perň dopo un pň.....
--
__________________
www.sasim.cjb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione Visual Studio .NET

 Salve ragazzi sto cercando di installare il pacchetto della Visual Studio
.NET, ma appena parte l'installazione compare un messaggio che mi dice che
sul mio pc alcuni componenti di windows non corrispondono alle versione
richieste per Visual Studio. NET , allora do il mio consenso per scaricare
una nuova versione di tali componenti, ma mi dice che devo inserire il cd
Windows Component UpDate ed io tra i 7 cd dell'installazione non ho questo
disco, come posso fare per risolvere questo problema? Grazie a chi vorrą
aiutarmi

 Se installi il framework sdk prima forse č meglio
Non riesco ad installarlo, perchč mentre sto proprio installando Microsoft
.NET Framework SDK 1.1 , mi compare il messaggio che dice prima di
installare gli strumenti del Framework SDK 1.1 devo installare Microsoft
.NET Framework SDK 1.1, cavolo come faccio ad avere il framework sul pc se
mentre lo installo mi dice che per installarlo devo avere prima il
framework? ....


 aiutarmi
nella confezione di Visual Studio che hai acquistato _deve_ essere presente
anche un CD intitolato "Windows Component Update". Se cosě non fosse, chiama
il servizio clienti di MS Italia (02/70398398) e ti invieranno gratuitamente
il CD che manca.
-- 
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://www.ugidotnet.org/4.blog

 framework? ....
Comunque ora ho installato il framework , ma mi da sempre lo stesso tipo di
messaggio, ovvero che alcuni componenti di windows non corrispondono alla
versione richiesta da Visual Studio .NET


 aiutarmi
Con VB4/5/6 tutti si dimenticavano di farsi copiare i CD di MSDN, adesso
tutti si dimenticano di farsi copiare il CD dei prerequisiti...
Ragazzi, se volete roba pirata, per lo meno fatevela fare bene, senza venire
a farvi sgamare da tutta internet.
(se questo post sembra un incitamento alla pirateria ricordo prima di tutto
che le nuove leggi sono piuttosto severe)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Compatibilità vb5 con office 2000: urgente, grazie...

Salve a tutti, sono nuovo del newsgroup e pure di visual basic...
Volevo subito chiedervi una cosetta che probabilmente è una cosa ovvia a
tutti, ma non riesco a risolvere:
- lavoro su Visual Basic 5, provando dei collegamenti da una form ad un
database in Access 2000, eseguendo il programma, mi dà errore di formato
database non riconosciuto. Non me lo dà se converto il database nella
versione precedente di Access.
Pensavo che non ci fosse problemi di compatibilità di VB con versioni
successive di Office; ho provato ad aggiornare il più possibile VB con
service pack e aggiornamenti vari, ma non risolvo.
Potete darmi una mano??
Mille grazie,
Fabrizio


Non specifichi come accedi al db, comunque...
se usi DAO devi referenziare nel prj la versione 3.6.
se usi ADO referenzia almeno MDAC 2.5 e
utilizza come provider Jet.Oledb.4.0 con
una stringa di connessione del genere :
StrConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyPath\Mydb"
Ciao
 valter

Grazie della risposta...
A dir la verità non so se uso DAO o ADO (senti a che livello sono...):
- immetto un database control in cui referenzio direttamente il mio
database
in Access 2000 e, in effetti, un semplice listbox o flex grid mi
riconosce
i campi e i riferimenti, ma poi mi dà errore in esecuzione...
Grazie ancora,
Fabrizio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:af524c2e7379ffa35bc...@mygate.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: Terminare un ciclo

Ciao a tutti,
sono una newbie di VB e ho questo tipo di problema: nella form principale
della  mia applicazione ho un pulsante Start che quando viene premuto ripete
un ciclo (do while... loop) (ovvero il ciclo viene eseguito all'interno
dell'evento Start_Click() ). Questo ciclo dovrebbe essere interrotto
premendo il pulsante Stop della form principale.
Come posso fare?
Grazie
Barbara Inverardi
http://www.geocities.com/ResearchTriangle/Thinktank/3213

 wrote in message
8askdf$tbb$1...@pegasus.tiscalinet.it...


 
http://www.geocities.com/ResearchTriangle/Thinktank/3213
prova qc come
Option Explicit
Dim GoLoop As Boolean
Private Sub Command1_Click()
    Static j
    While j < 1000000000
        j = j + 1
        If Not GoLoop Then Exit Sub
        Caption = j
        DoEvents
    Wend
End Sub
Private Sub Command2_Click()
    GoLoop = Not GoLoop
    Command2.Caption = IIf(GoLoop, "vero", "falso")
End Sub
Private Sub Form_Load()
    GoLoop = True
End Sub
e giocherella un po' coi due cmd.
hth, pal
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

Come posso fare?
Cosě dovrebbe funzionare:
Crea una variabile pubblica (basta a livello di modulo di form, se
entrambi i pulsanti appartengono alla stessa form) chiamata "Cond"
Nell'evento Click del pulsante Start:
Cond=False
Do
	......
	'Fai quello che devi fare
	......
	DoEvents
Loop Until Cond=True
Nell'evento Click del Pulsante Stop
Cond=False
Cosě facendo, grazie a DoEvents il controllo viene ritornato
all'utente che puň cosě, cliccando su Stop, modificare la variabile
che permette la realizzazione della condizione necessaria all'uscita
dal ciclo.
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
---------------------------------------------------------------------------

Sono riuscita a risolvere il problema inserendo un timer sulla form
principale: invece di specificare un ciclo nella funzione principale, ho
generato l'evento Timer, cosě che se il pulsante stop non č stato premuto
esegue la funzione principale altrimenti arresta l'applicazione.


Grazie
OK, ma il timer č molto, molto piů pesante..... se riesci ad utilizzare il metodo consigliatoti
(suona male....) o magari un altro sarebbe "tecnicamente meglio".......

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione pacchetti

Qualcuno sa come mai durante la creazione dal pacchetto per la 
distribuzione, qualunque sia il progetto che vado ad assemblare,mi si ferma 
sull'errore: "Si è verificato l'errore imprevisto 429:Il compponente ActiveX 
non può creare l'oggetto".
    Ho provato anche a reistallare Visual Basic 6 col service pack 3 ma non 
è cambiato niente.
    Chi sa cosa può essere il problema ?? Grazie
Pietro 

 ha scritto nel messaggio
news:%43Wd.62334$QG6.1...@twister2.libero.it...

Si stoppa perchè non l'hai referenziato
durate la creazione del file cab.
Ciao


Scusa la mia ignoranza , cosa vuol dire , o come si fŕ a referenziare un 
progetto ? 


 sull'errore: "Si è verificato l'errore imprevisto 429:Il componente
ActiveX non può creare l'oggetto".
L'ActiveX è un OCX che hai creato in vb oppure no?
Utilizzi funzioni tipo CreateObject ? oppure set x = New Class ???
con una classe implementata da te?
Ciao

 non può creare l'oggetto".
Questa e` una delle cose che detesto di Microsoft: messaggi
di errore incompleti :-(
Nel tuo caso potrebbe essere andata a pallino la registrazione
di pdwizard.ocx o di alcuni dei componenti che utilizza:
mscomtcl.ocx, mscomct2.ocx, msflxgrd.ocx.
Probabile che qualche uninstall fatto coi piedi ti abbia deregistrato,
se non addirittura rimosso, qualcuno di questi.
-- 
ciao, hal

 se non addirittura rimosso, qualcuno di questi.
argh... il solito dll hell..
l'installazione non prevede il ripristino dei files?
se non ricordo male c'č...
-> GbC|
www.gbcweb.com

 se non ricordo male c'č...
sembrava anche a me, ma l'OP ha detto di avere reinstallato.
boh!
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Campo data nostalgico

Sto usando una DBGrid collegata ad una normalissima tabella mdb (ma succede
anche con una tabella DBF)
collegate mediante un controllo data.
TabAction 2(Grid Navigation) con WrapCellPointer...
Ebbene, il comportamento č alquanto strano, si direbbe che il campo data sia
affetto da nostalgia...ogni tanto, non riesco a capire quando e perchč,
mentre navigo su una "nuova" riga (introduzione nuovi dati) nel campo data,
compare da solo, cosě "bellamente", anche senza il focus sulla cella
relativa: 30/12/99
Qualcuno riesce ad immaginare o ne sa qualcosa ?
Grazie.
--
Gulp ! Forse mi sono perso qualcosa !
Per rispondere via E-mail togli la x da 
xd...@cyberjunkie.com

 Qualcuno riesce ad immaginare o ne sa qualcosa ?
Prova un:
    debug.print format$(cdate(0),"dd/mm/yy")
e vedi se ti si accende una lampadina... :-)
Bye, G.

 e vedi se ti si accende una lampadina... :-)
Ciao Paperino, ben ritrovato.
...macchè è ancora buio!
Ho visto soltanto il "Print" della data suddetta,ma non collego e non saprei
cosa fare per non essere disturbato da quell' inserimento non voluto,
inopportuno e fastidioso.


 inopportuno e fastidioso.
vediamo di interpretare.....
paperino ti ha suggerito di verificare a che cosa corrisponde, in formato data,
il valore 0.
Ti ricorderai, spero, che il tipo di dati "date" non è altro che un valore
numerico, in precisione doppia, nel quale la parte intera indica il numero di
giorni trascorsi da una data convenzionalmente fissata come "data 0", che, se
non ricordo male, è proprio quella che tu "vedi" nella tua tabella.
Mettendo insieme questi elementi, si evince che il campo del database è
inizializzato a zero, ed esso viene quindi formattato come 30/12/1899 (notare le
quattro cifre).
La possibile soluzione è quella di assegnare il valore Null come default per
quel campo.
(bonk)(rumore dei sassi lanciati dal lupo, che odia il null)
Salutoni
Sergio

 (bonk)(rumore dei sassi lanciati dal lupo, che odia il null)
Veramente odio anche i campi date ... ;-)

 (bonk)(rumore dei sassi lanciati dal lupo, che odia il null)
Il problema era di non provocare la scrittura nella tabella di database di
tale data al momento del cambio riga
della DBGrid,ma mi sembra di capire che in ogni caso non verrà immessa....
oppure ho capito male !?
In ogni caso se usando Null, Lupo si arrabbia... potrei fare così:
dim oldata as Variant
oldata= Data.Columns.Text
if oldata = "30/12/99" then
Data.Columns.Text=""
end if
Oppure peggioro la situazione?
Grazie a tutti.


 Oppure peggioro la situazione?
beh, sei assolutamente sicuro del fatto che la data 30/12/99 non ti servirà mai,
all'interno della tua applicazione (oltretutto, scritta così credo che venga
interpretata come 1999, potenziali casini a scatafascio)
Il mio consiglio e quello di utilizzare serenamente il null, poi vedi tu che
cosa fare
Salutoni
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: [MEETING] solo una...

Ma... solo una ragazza?
Ne uscirà distrutta! :)
Ma le altre dove sono? Ma ci sono?
Ciao

Ma le altre dove sono? Ma ci sono?
Ci sono ci sono :))
Saluti...



allora avvertile di compilare il modulo...
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
---------------------------------------------------------------------------

Ci sono ci sono :))
Devi avere fede, non si vedono ma ci sono .... ops ..... parlavi degli
angeli?
Salve
                Dbg

allora avvertile di compilare il modulo...
In codice nativo o PCode?
Ciao

 In codice nativo o PCode?
supermegaultraROTFL con capriola e tuffo carpiato
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud



In P Code, ovvio!!!! Sennò, come faccio a decompilarlo per estrapolare i numeri di telefono e le
e-mail????? ;-PPPPPP


Newsgroup: it.comp.lang.visual-basic
Titolo: Guida certificazione MCSD

Ciao, ri-scusate il disturbo ma sono stato sul sito di Microsoft Italia per
scaricarmi la guida per le certificazioni, un file zippato dal nome
guida.zip ma il server di 
microsoft.com
 non riesce a farmi scaricare niente.
Non è che per caso potete spedirmela per email?
Grazie.
Il mio indirizzo è lordal...@NOSPAMDELCAZZOlibero.it
levate le quattro Z oltre al resto :-)
Grazie mille.
BUONA PASQUA.

Salve,
qualche tempo fa io ho chiamato la MS e loro mi hanno spedito, in pochissimi
giorni, un bel CD con tantissimi MB di informazioni al riguardo la
certificazione, ovviamente gratis.
Marco.


Ah, ma poichè sul loro sito c'è una bella guida è un peccato non potersela
scaricare no??
Cmq che numero devo fare?
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Come mandare output su console DOS ?

Salve!
Utilizzo Vbasic 5 e win98.
Ho provato a recuperare l'handle della console DOS da cui lancio
la mia applicazione con
  Const STD_OUTPUT_HANDLE= -11&
  hStdin = GetStdHandle(STD_OUTPUT_HANDLE)
ma mi ritorna -1.
Come posso scrivere del testo sulla finestra DOS?
(se prima chiamo AllocConsole() poi GetStdHandle() funziona, ma
 mi trovo a scrivere su un'altra finestra DOS, non quella da cui
 ho lanciato l'applicazione).
Massimo
-- 
Posted from 
mail-1.tiscalinet.it
 [195.130.225.147] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto
nel messaggio news:01C0E86E.EE0DC3E0@massimo...


 ha scritto
nel messaggio news:01C0E86E.EE0DC3E0@massimo...


non lo puoi fare.
No, non č vero.
Puoi gestire un'applicazione "DOS" con le Console API (Console, tutto
attaccato :) e non sta nemmeno per "consņlati").
Io ho fatto una crasse per questo (incompleta... che faccio... la mando sul
NG?), perņ ti crei una App console nel tuo processo.
Con l'effetto collaterale che se chiudi la finestra dos ti si termina
l'applicazione.
Non puoi perņ agganciarti a finestre DOS esterne :(
L'idea della classe Console mi č venuta dopo un post di Pontara Mauro
sull'argomento.
Ciao

  ho lanciato l'applicazione).
C'è stato un 3ad proprio pochi giorni fa il titolo era "[?] standard input - difficile?",
comunque la soluzione al tuo problema dovrebbe essere in questo link postato
da Luca Dormio:
Writing Console-Mode Applications in Visual Basic
http://www.vb-world.net/api/console/index.html
Bye, G.

Puoi ma devi PRIMA compilare il programma, poi convertirlo in Win32 Dos
Executable.
Ho a casa una demo su come fare questo convertitore ma non ho ancora avuto
tempo di studiarci...

...

Acc... quotare prego!
A quale capoverso del mio post ti stai riferendo?
Ciao

ops, scusa
parlavo su come scrivere nella finestra Dos da cui ha lanciato il programma:
è fattibile ma se reindirizzi l'output segnala errore; sembra però (sembra,
appunto perché ho trovato un esempio ma non lo ho ancora provato) che se
trasformi l'exe in un win32 Dos Executable poi funziona......

Newsgroup: it.comp.lang.visual-basic
Titolo: mi serve l'IDPROG del controllo immagine kodak (imgedit)

devo aggiungere dinamicamente il controllo in oggetto e ho bisogno di
conoscere
l'IDPROG. qualcuno lo conosce??
Grazie 1000
Carlo

 l'IDPROG. qualcuno lo conosce??
Imaging.EditCtrl.1
In genere li puoi ricavare direttamente con un piccolo trucco: basta provare
ad aggiungere il controllo con <Server>.<Classe> , ad esempio
Me.Controls.Add "ImgeditLibCtl.ImgEdit" ...
ed eseguire il programma, viene visualizzato un messaggio di errore che
pero' ti segnala il ProgID corretto da usare.
Ciao
--
Luca Dormio
luca....@tin.it

Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: gif trasparente ??

mi sapete dire se esiste un modo per inserire una gif trasparente su di una
form ??
grazie.
--------------------------------
Inviato via 
http://usenet.libero.it


usa un image1.picture = tuaimmagine
ciao ilario
Newsgroup: it.comp.lang.visual-basic
Titolo: R: System tray

 per miniminzzare un'applicazione nella system tray, come si fa?


Sempre sul Sito Comune di questo NG (quello suggerito da pal), c'e' un
articolo che spiega bene come fare.
Lo trovi su:
http://www.murialdo.it/it_lang_vb
sezione "Piccole Perle" -> Articoli -> "Come Inserire e gestire un'icona
nella Tray-Bar"
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

 articolo che spiega bene come fare.
Lo spiegherà bene ma non funziona!!! E l'esempio nella zona dei sorgenti
nemmeno, mi si inchioda tutto e le icone non vanno più via


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] nascondere tutte le unità

Mi è capitato sotto mano un pc di un ente statale.
All'avvio parte un programmino che nasconde tutte le unità di rete.
Nel senso che non esiste più disco C, neanche da prompt di Dos....
Come ha fatto?
Conoscete il modo per nascondere tutti i dischi (anche floppy) via codice?
Grazie a tutti in anticipo.

Risolto: occorre settare policies (anche con vb, basta inserire delle chiavi
nel regedit).
A chi interessa trova il tutto con un search in 
msdn.microsoft.com
.

Newsgroup: it.comp.lang.visual-basic
Titolo: Passare matrice di controlli a sub

Ciao,
supponiamo di avere una matrice di controlli e che la voglia passare
ad una sub.
Quale deve essere la dichiarazione del parametro nella sub?
Al momento ho risolto cosě:
Public Sub cmd_Abilita(b As Object, Valore As Boolean)
    For i = 0 To b.ubound       ' passo tutta la matrice di controlli
        b(i).Enabled = Valore
    Next
End Sub
dove b "dovrebbe" rappresentare la matrice di controlli.
La chiamata e':
cmd_Abilita cmdMatrice, False
con cmdMatrice il nome di una matrice di controlli CommandButton
E' corretto?
Grazie,
teddy...@hotmail.com
ICQ 7044062
Como - Italy

dovrebbe essere cosě:
 Public Sub cmd_Abilita(b() As Object, Valore As Boolean)
     For i = 0 To Ubound(b)       ' passo tutta la matrice di controlli
         b(i).Enabled = Valore
     Next
 End Sub
Fabio Guerrazzi

Newsgroup: it.comp.lang.visual-basic
Titolo: Uso del menu

Buongiorno a tutti.
Ho un form che contiene un menu creato con l'apposito editor.
Vorrei fare in modo che, dopo avere eseguito il codice assegnato ad una 
certa voce di menu, il programma mi restituisse il menu non "chiuso", ma 
posizionato sulla stessa tendina e sulla stessa voce di menu che ho cliccato 
per ultima.
Come fare?. Grazie 


ciao,
nn ho ben capito cosa vuoi fare..
ti puoi spiegare un po' meglio???

 ti puoi spiegare un po' meglio???
Ho un menu a tendine in un form (VB6).
L'operatore lancia, supponiamo, la terza voce della seconda tendina.
Vorrei che, eseguito il codice, ritrovasse la seconda tendina visualizzata e
la terza voce selezionata, come le aveva lasciate, in modo che gli basti
digitare <enter> senza dovere nuovamente "aprire le tendine".
Ho visto che posso ottenere il risultato con l'istruzione sendkeys, ma forse
c'č un sistema meno macchinoso.
Grazie.

 c'č un sistema meno macchinoso.
Sě, usare qualcos'altro, tipo una combobox o una listbox.
Ciao