mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: definire la dimensione della colonna in un dbgrid

Voglio utilizzare un dbgrid per visualizzare dei dati, ma come faccio a
personalizzare la dimensione delle diverse colonne ?

 ha scritto


 -runtime: dbgrid.columns(0).width=1500
Credo che desiderasse eseguire un resize in base alle dimensioni dei campi.
Avevo dato un'occhiata all'argomento tempo fa, optando per una soluzione
empirica veloce-veloce (ma stilisticamente bruttina...) per ovviare al
problema
della dimensione effettivamente occupata dai caratteri truetype.
Posto il codice scritto per una datagrid (ma dovrebba nadare anche con la
dbgrid):
Public Sub RedimCols(GridObject As DataGrid, rsBrowse as adodb.recordset)
    Dim FLD  As ADODB.Field
    Dim col As Object
    Dim nLarg As Long
    On error goto err
    nLarg = 0
    For Each col In GridObject.Columns
        Set FLD = rsBrowse.Fields(col.DataField)
        If FLD.Type = adVarWChar Then
            nLarg = FLD.DefinedSize * 100
            If nLarg > col.Width Then
                If nLarg < GridObject.Width Then
                    col.Width = nLarg
                Else
                    col.Width = GridObject.Width - 300
                    col.WrapText = True
                    GridObject.RowHeight = 270 * Int(nLarg /
GridObject.Width)
                End If
            End If
        End If
    Next col
    exit sub
    err:
        showerrmsg
End Sub
Ribadisco che la soluzione č sia "stilisticamente brutta" sia _estremamente_
empirica: era stata scritta di fretta per ovviare (in fretta) ad un problema
contingente!
Se qualcuno ha soluzioni piů pulite e corrette... č ben accetto!    ;-)
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Quesito MSDN

Giusto per capire più che per chiedere.
Ho dovuto re-installare tutta la macchina di sviluppo
tra cui vb6 + msdn
Cerco il CD di msdn e non lo trovo.
Ma ricordo male o l'msdn di vb2005/2008 è liberamente scaricabile?
e quella di vb6?
Simona


Questa è quella per aggiornata a dicembre 2008
http://www.microsoft.com/downloads/details.aspx?FamilyID=7bbe5eda-5062-4ebb-83c7-d3c5ff92a373&DisplayLang=it
francamente non so se contenga anche la documentazione vb6, dubito però 
che quella possa essere scaricata a parte (se non sei abbonata MSDN).
ciao
stefano


wrote:

Intanto grazie per la risposta.
Come è possibile che posso scaricare MSDN di un prodotto recente come
vb2008 e non di un datato come vb6.
mah?
ciao
Simona

 vb2008 e non di un datato come vb6.
Dalla versione 2005 in poi esiste anche la versione express degli 
ambienti di sviluppo e con loro sono stati rilasciati anche gli MSDN (in 
formato express), l'MSDN che ti ho segnalato dovrebbe però essere quella 
completa.
Considera che se hai il cd originale di VB6 l'MSDN è già incluso ... hai 
il cd originale, si?
ciao
stefano

 mah?
MSDN è grandicello da tenere online, e considera pure che VB6 come
ambiente di sviluppo non è più supportato ufficialmente da almeno 2
anni; inoltre già da un po' di tempo, le versioni recenti di MSDN non
hanno più il collegamento contestuale con VB6 (ovvero, la
documentazione c'è tutta, ma i link contestuali con F1 non vanno)

 documentazione c'� tutta, ma i link contestuali con F1 non vanno)
Comunque per la maggioranza delle volte viene meglio una ricerca in rete ce
su MSDN per vb6. Raramente vado a usare l'F1.

Il 14/10/2010 9.10, Simona ha scritto:

si è originale.
selo che msdn non sta nel cd originale di vb6.
quella che ho io sta su due cd ( msdn 1/2 )
li ho trovati nell'ultimo cassetto della cassettiera...
fiuuuu
Simona

su MSDN per vb6. Raramente vado a usare l'F1.
vero Andrea
ma ero andata in fissa con il cd.....

 li ho trovati nell'ultimo cassetto della cassettiera...
Meglio così :-)
buon lavoro.
ciao
stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca campo

Salve, con una input box ricerco un campo i una tabella digitando l'intera
parola mediante questo codice:
Data1.Recordset.FindNext "cognome='" & valore & "'"
Se volessi ricercare dei valori digitando solo una lettera iniziale della
parola ho provato ad usare questo codice
Data1.Recordset.FindFirst "[cognome]  Like " & Chr(34) & valore & " * " &
Chr(34)
ma non mi funziona. Potete suggerirmi perchè o altre impostazioni ? Grazie!

 ma non mi funziona.
Ma perché in FindNext la virgoletta semplice ' = Chr$(39)
e poi ti metti ad usare Chr(34) = "
Se usi il formato precedente sicuramente funziona, oppure
metti (39) al posto di (34).
Questo sempre che non ci siano cognomi con l'apostrofo!
In genere si usa sempre """ & & """"

 ma non mi funziona. Potete suggerirmi perchè o altre impostazioni ?
Grazie!
Se usi l'apice, Chr$(39), nel primo caso e ti funziona insisti anche nel
secondo ma, soprattutto, togli lo spazio prima e dopo l'asterisco, a meno
che tu non voglia veramente trovare qualcosa che inizi con valore seguito da
uno spazio...
--
Ciao.
Maurizio

 ma non mi funziona. Potete suggerirmi perchč o altre impostazioni ? Grazie!
-- 
Massimo Conter
<Consulenze Informatiche e Sviluppo Software>
email: 
emm...@laserinforma.com
email urgenti:	
03397...@posta.tim.it

Chr(34)
A me funziona perfettamente cosě:
Data1.Recordset.FindFirst "cognome Like " & Chr(34) & valore & " * " &
Chr(34)
Ciao
Robin

 ha scritto

Dipende da quello che cerchi... Posso capire lo spazio prima dell'asterisco:
ti fa trovare le parole che iniziano con "valore" seguito da uno spazio, ma
il secondo spazio a che serve?
I casi sono:
Like "*"   : tutte le parole
Like "A*"  : le parole che incominciano con A
Like "*A"  : le parole che finiscono con A
Like "*A*" : le parole che contengono A
--
Ciao.
Maurizio


Hai ragione, ma io non intendevo inserire alcuno spazio :-))
era cosě: "*"
Ciao
Robin

Newsgroup: it.comp.lang.visual-basic
Titolo: COME CARICARE UN FORM PRENDENTO IL NOME DA UN TEXT BOX

Devo lanciare un form in modo parametrico
Il nome del form deve essere inserito manualmente in una textbox
Come faccio ???
Massimo

 Il nome del form deve essere inserito manualmente in una textbox
NON si puo' ma...
Una soluzione sarebbe caricare tutte le form e quindi enumerarle (non
ricordo come si fa).
Si ricerca quindi la form da visualizzare tramite Object.Name=TextBox.Text
quindi fare lo show dell'oggetto trovato.
Valentino

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

Per qualche buon'anima :
Non riesco a far evidenziare tutta la riga di un dbgrid quando ci clicco
sopra (mi evidenzia solo un campo).
Aiutatemi !!!
Grazie a tutti per l'esistenza di questo group.
Ciao Luca

...


 wrote in message 7qh2ck$kqm$1...@nslave1.tin.it...


Grazie sia a Paolo che ad Andrea per la pazienza rivolta ad un neofita del
VB.
Luca

Aiutatemi !!!
Proprieta' --> Divisioni-->MarqueeStyle = 3-HighLight Row
Newsgroup: it.comp.lang.visual-basic
Titolo: Differenza tra 2 ore

salve a tutti, avrei bisogno si sapere come trovare la differernza tra 2
orari (uno di partenza e uno di arrivo)


cerca TimeSerial sulla guida. si puo' usare cosi':
a = TimeSerial(12, 15, 0)
b = TimeSerial(13, 10, 0)
c = Format(b - a, "hh:mm:ss")
CIAO! buc

 ha scritto nel messaggio
news:2HtM7.179149$sq5.8...@news.infostrada.it...


 orari (uno di partenza e uno di arrivo)
Il buon vecchio operatore "-" non funziona?
Ciao,
Carlo.

Rox ha scritto:

Gia', dopo tutte le prove che abbiamo fatto in questi giorni ;-)
-- 
ciao, hal

 Gia', dopo tutte le prove che abbiamo fatto in questi giorni ;-)
^______^
C.
Newsgroup: it.comp.lang.visual-basic
Titolo: vba: ordinamento crescente su excel

Buongiorno a tutti.
La mia domanda è la seguente: sto lavorando in un foglio excel stracolmo di
dati e dovrei riordinare i dati in base al valore scritto nella 11a colonna.
Dovrei quindi selezionare l'area nel foglio di lavoro (si fa così?)
worksheets("nome").activate
e ora dovrei dargli il comando di riordino valori (ovviamente deve spostare
tutta la riga, non solo il valore della colonna).
Aggiungo che sto lavorando (come avrete senz'altro intuito) in VBA (il VB
per applicazioni Microsoft)
Grazie a tutti e... spero in una vostra risposta.
Kevin
--------------------------------
Inviato via 
http://usenet.libero.it

 per applicazioni Microsoft)
    Da quel che dici sembra non tanto che tu non sappia farlo col Visual
Basic di Excel quanto con Excel addirittura. Sbaglio? Se le cose stanno
realmente cosi' e' opportuno che tu prima di tutto ti alleni con le funzioni
di ordinamento di Excel:
        Seleziona una cella compresa nell'elenco dati
        (meglio quella in alto a sinistra)
        Dati > Ordina...
        Dovresti a questo punto vedere che excel provvede a
        selezionare l'area dati dell'elenco
        Scegli la colonna e Ok
    Dopo qualche test dovresti essere in grado di eseguire la stessa
funzione col registratore macro attivato. Al termine interrompi la
registrazione quindi esamini il codice Visual Basic cosi' ottenuto.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione progetto da VB 6.0 Pro (SP5) a VB.NET 2003 (di Visual Studio .NET 2003 Enterprise Architect: errore 4002 !!!

Sono stato costretto a passare da VB 6.0 Pro (SP5) a  
VB.NET
 2003 (di Visual
Studio .NET 2003 Enterprise Architect) e per questo motivo ho tentato di
convertire a 
VB.NET
 2003 un mio progetto eseguito con VB 6.0 Pro (SP5) ma
compare dopo qualche istante un Msgbox che dice: quanto pi riportato nel
file *.log:
<?xml version="1.0" encoding="utf-8"?>
<UpgradeLog Upgraded = "True" >
    .....
    ....
    ....
    />
    <File
        OldPath = "C:\...\basGestioneErrori.bas"
        NewPath = "C:\...\Conversione.NET\basGestioneErrori.vb"
        FileType = "Module"
        Upgraded = "False"
    />
    <Issue
        Type = "Global Error"
        Number = "4002"
    >Impossibile caricare componenti con riferimenti: MSDERUN.DLL (Microsoft
Data Environment Instance 1.0 1.0.0),MSBIND.DLL (Microsoft Data Binding
Collection 1.0.0),MSCOMM32.OCX (1.1.0),MsComCtl.ocx (2.0.0),MSCOMCT2.OCX
(2.0.0),COMDLG32.OCX (1.2.0),MSHFLXGD.OCX (6.0.0),MSDATGRD.OCX
(1.0.0),MSADODC.OCX (6.0.0),RICHTX32.OCX (1.2.0) Si consiglia di installare
Visual Basic 6.0, completo di tutti i componenti con riferimenti, e
verificare che l'applicazione venga compilata ed eseguita prima di procedere
con l'aggiornamento.</Issue>
</UpgradeLog>
Ora non vorrei che installando VB 6.0 Pro (SP5) nello stesso PC nel quale ho
Visual Studio .NET 2003 Enterprise Architect abbia poi qualche problema,
magari con gli stessi OCX.
Che cosa mi consigliate
Grazie 1000
Mosca

 magari con gli stessi OCX.
Le due installazioni non si toccano, semplicemente perchè .net *non* usa
OCX.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 usa OCX.
Concordo, sul portatile ho sia VS6 che VS.Net e non mi ha dato problemi di
quel tipo.
Non è che nel progetto ocn .NET hai i riferimenti che usavi con VB6?
-- 
Alex
"La differenza tra un genio ed un idiota è che il genio ha i suoi
limiti" (Anonimo)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

>Non č che nel progetto ocn .NET hai i riferimenti che usavi con VB6?
Che cosa intendi dire esattamente?
Mosca

 Che cosa intendi dire esattamente?
Che quando tenti la conversione del progetto i riferimenti agli ocx non 
riescono ad essere convertiti correttamente e ti da quegli errori.
Ciao

file *.log:
[snipped]
Potresti provare ad installare l'add-in distribuito da Microsoft per
il controllo dei progetti da convertire a 
vb.net
Saluti

E' possibile installare VB 6 PRO (SP5) su Windows XP Pro?
Grazie 1000
Mosca

 E' possibile installare VB 6 PRO (SP5) su Windows XP Pro?
Certo, perchè no?
Io ci lavoro.


Hai particolari accorgimenti da seguire in fase di installazione e uso che
ti senti di consigliarmi?
Grazie 1000
Mosca
Newsgroup: it.comp.lang.visual-basic
Titolo: Help !! Invio Fax !!

Aiuto non riesco ad inviare via Fax un file Ascii !!!! Utilizzo VB5 !!!!!


To: "'Fax...@ElectraSoft.com'" <Fax...@ElectraSoft.com>
Subject: VB Code to batch send faxes
Date: Fri, 13 Feb 1998 12:58:06 -0600
Thanks for your help. I hope this will be of interest to you or your
customers.
Michael Walter
mwa...@luminet.net
(507) 454-3830
"Nenio superas similia troajxo"
 
 Case "Newfax"
        'Send Faxes to Customers
        'Assumes that 32BF Convert to Fax is already selected
        'as the default printer
        frmProduction.lblmessage.Caption = "Converting and sending Fax
Files..."
        frmProduction.lblmessage.Refresh
        Dim myfile As String
        Dim printline As String
        Dim SRCFILE As String
        Dim DESFILE As String
        Dim MYCHAR As String * 1
        For x = 1 To 50
            SRCFILE = "Z:\FAXES\FAX" & x & ".TMP"
            myfile = Dir(SRCFILE)
            If myfile <> "" Then
                'found a fax so copy correct DEL file
                FileCopy "Z:\BatchFiles\FaxBatch" & x & ".txt",
"C:\32BITFAX\SEND2FAX.DEL"
                'NOW CONVERT TO FAX FORMAT
                Open SRCFILE For Input As #1
                Do While Not EOF(1)
                    MYCHAR = Input(1, #1)
                    If MYCHAR <> Chr(13) And MYCHAR <> Chr(10) Then
                        printline = printline & MYCHAR
                    Else
                        If printline <> "" Then 'because of chr(13)
and chr(10)
                                                'code above, we will
be printing
                                                'a blank line. In
effect double spacing.
                                                'This will prevent
that.
                            Printer.Print printline
                        End If
                        printline = ""
                    End If
                Loop
                Close #1
                Printer.EndDoc
                Do
                DESFILE = Dir("C:\32BITFAX\SEND2FAX.DEL")
                '    'MUST KEEP LOOPING UNTIL THE SENDFAX
                '    'FILE HAS BEEN DELETED
                   If DESFILE <> "" Then
                    Else
                        Exit Do
                    End If
                Loop
            End If
        Next x
        frmProduction.lblmessage.Caption = ""
        frmProduction.lblmessage.Refresh
=======================
         Kind Regards, 
         Jon Krahmer, ElectraSoft
 Get newest version of [FaxMail for Windows], [FaxMail Network for Windows]
 or [32bit Fax], free trial: 
http://www.ElectraSoft.com/
 To read what users are saying about ElectraSoft's fax software, go to 
 
http://www.ElectraSoft.com/10GoodReasons/
Newsgroup: it.comp.lang.visual-basic
Titolo: Resize e salvataggio immagini JPG

Come da oggetto, dovrei poter aprire un immagine, fare un resize (o meglio,
un resample) della stessa e poi salvarla nuovamente in formato JPG.
Qualcuno puo' indicarmi del codice o un OCX, possibilimente free, per
raggiungere tale scopo..? :?

 ha scritto

vai sul sito intel e cerca jpeg.
c'e' una dll free.
nb: non l'ho provata.

 wrote in message
8u5vsc$cqg$1...@fe1.cs.interbusiness.it...


 nb: non l'ho provata.
Grazie, appena ho un minimo di tempo la provo. Piu' che altro temo che su
processori AMD non voglia girare..

 processori AMD non voglia girare..
mal che vada dovrebbe girare su nt, ma io la proverei anche sulla famiglia
9. non sarebbe la prima volta che un team di sviluppo fa qualcosa fuori
della cornice prevista da chi paga, cfr gnutella se non sbaglio.

Io ho provato la dll di intel, la vecchia versione (non dll ocx) funziona
perfettamente su 95, 98, nt, amd, intel ecc.
potete scaricarne gli esempi anche su vb accelerator.
Ciao a tutti.
Axel
p.s. avete notato che molti programmi scritti in vb salvano le bmp in jpg
semplicemente.... combiando l'estensione..... ma allora sono tutti furbi!!!
i cretini siamo noi che aumentiamo i tempi di sviluppo....
Newsgroup: it.comp.lang.visual-basic
Titolo: Mi presento

Salve,
Mi chiamo Daniele Iaconi, sono uno sviluppatore VB e lavoro per una
software house milanese. Conosco il linguaggio ormai da diversi anni e
ne o seguito le evoluzioni. Ancora prima ho lavorato in QuickBasic e
Microsoft Basic 7.0. Al momento uso VB6.
Da oggi mi piacerebbe prendere parte alle discussioni di questo NG con
la sicurezza di poter imparare molto da tutti voi.
A presto
Daniele

 wrote


Ti ringrazio molto,
ma ho paura che, per quanto mi rigurda, la definizione "Persona esperta" sia
in po' lontana dalla realta'.
Ho, pero', una grandissima voglia di crescere e imparare, cosi' sono io a
ringraziarvi per quello che farete per me.
Ciao
Daniele
PS. Dove posso reperire il manifesto del NG, e quale e' il sito comune?
Grazie ancora.


 Grazie ancora.
a te della fiducia,
ciao, a.
--
---> search for it in / cerca nel sito comune del ng:
http://www.murialdo.it/it_lang_vb/
---> 1k vblinks in:
http://www.comune.modena.it/cittadini/apal/html/

 wrote in message
387EF7F8...@tiscalinet.it...


Wow grande !!
Nelle prossime settimane avro' un gran da fare con un vecchio programma
fatto in QuickBasic 7.1 Expert, e cosi' so chi chiamare in caso di aiuto !!
Ma perché mentre tutte le ditte di informatica del mondo progrediscono...
...proprio dove lavoro io devono regredire ?? per ora sono arrivato ai
livelli di VB1.0 , e come ho detto in futuro dovro' modificare dei programmi
in QuickBasic.. argh
Vi prego.. ditemi che non esiste nessun linguaggio ancora piu' vecchio del
quickbasic.. senno' mi sparo, perché so che prima o poi il capo lo verra' a
sapere..
Ciao e benvenuto Daniele !!
DaVe


 wrote in message
85obdr$3qg$2...@bw107zhb.bluewin.ch...


Benvenuto!
Michele
--
Rag. MURA Michele
Ingegnere Software
mm...@computerhouse.pisa.it





 >


 wrote in


 
il QuickBasic e' gia' un linguaggio 'tardo' 
solo tra i Basic con i PC venivano forniti il BASICA che era anche la
versione su ROM dei primi PC e il GWBASIC

Grazie a tutti.
Daniele

 versione su ROM dei primi PC e il GWBASIC
GWBASIC, che tempi ! E' vero che vuol dire "Gates William - Basic ?
Ciao
sandro

> GWBASIC, che tempi ! E' vero che vuol dire "Gates William - Basic ?
A me risultava che GW stesse per GeeWiz.
Avevo chiesto ad una amica americana che vive in italia da molti anni una
traduzione corretta del termine e lei mi disse che era una esclamazione di
vecchio stampo, un po' desueta, come potrebbe essere la nostra "Oh la
peppa!".
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] NET e metodo Find

Salve a tutti
Ho un dataset che viene caricato da un dataadapter.selectcommand="select
codice_fornitore,nominativo,indirizzo from fornitore" doce codice_fornitore
č la chiave primaria impostata sul db che č access.
Io devo ricercare un valore contenuto in questa tabella ed allora:
Suggerito da "Programmare 
ado.net
" della Wrox
dim dr as datarow
dr=ds.tables("fornitore").rows.find(32)    ' dove 32 č il codice_cliente che
mi interessa cercare
come eseguo questo codice, mi si presenta un errore la cui descrizione dice
che la tabella non ha una chiave primaria.
Esempio di MSDN
dim valore as objecct
dim dr as datarow
valore=32
dr=ds.tables("fornitore").rows.find(valore)
stesso messaggio del precedente.
Io credo di aver omesso qualcosa oppure di non aver capito la logica del
metodo.
Potete aiutarmi
Ciao
Fabio

 che la tabella non ha una chiave primaria.
Credo tu debba impostare una chiave sulla DataTable ds.tables("fornitore"),
che *non* identifica la tabella fisica del DB, ma solo i dati contenuti, e
quindi risulta priva di chiave.
Prova impostando ds.tables("fornitore").PrimaryKey
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net


Ti ringrazio, farň questo tentativo.
Che tu sappia con al metodo find posso passare solo valori di chiave
primaria?
Ciao
Fabio

 primaria?
E' scritto chiaramente come *prima* riga della documentazione di
DataRowCollection.Find


Perche non usi un DataView?
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

 Perche non usi un DataView?
Ho solo la necessità di fare una ricerca e non ho pensato ad usare il
dataview.
Ciao
Fabio

Il dataview ha oltre al metodo Find (che e' legato alla proprieta' Sort
dello stesso e non alla PrimaryKey) un metodo FindRows che ti puo essere
utile se la ricerca non e' univoca.
HTH


 utile se la ricerca non e' univoca.
Grazie
Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: VISUAL BASIC6





SONO INTERESSATO ALLA PROGRAMMAZIONE IN 
VISUAL


BASIC6 E VORREI SAPERE SE E UN LINGUAGGIO DI 
DIFFICILE COMPRENSIONE TENENDO CONTO CHE SONO


ALLE PRIME ARMI E A CHE PREZZO E 
ACCESSIBILE



...


Newsgroup: it.comp.lang.visual-basic
Titolo: ESPERTO CERCASI !!!

Devo creare degli shortcut da una MDI child form per lanciare delle sub
routine.
Intercettare i caratter dagli eventi KeyDown e KeyPress e' una soluzione ma
dovrei ripetere il tutto in ogni evento KeyDown e KeyPress di ogni controllo
della form.
Gli eventi KeyDown e KeyPress della form non vengono attivati in quanto sono
sempre i controlli ad avere il fuoco.
Qualcuno ha idee da proporre ?
Grazie a tutti.
Ciao

> Gino Cecchettin:

Microsoft propone:
    <NomeForm>.KeyPreview = True
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: Filtrare dati con VB5

Ciao, sto usando degli archivi :
 Set DbMar = OpenDatabase("marche.mdb")
 Set RsMar = DbMar.OpenRecordset("marche", dbOpenTable)
 Set DbTab = OpenDatabase("tabelle.mdb")
 Set RsTab = DbTab.OpenRecordset("tabelle", dbOpenTable)
 RsTab.Index = "tabelle"
 RsMar.Index = "marche"
In particolare il file tabelle e' come si dice parametrico, in base al
contenuto di tab_par il file contiene dati IVA quindi con l'uso di
tab_per, o altrimenti
contiene dati Categoria e Gruppo, con l' uso del solo campo tab_des.
Il problema e' questo :
Quando con un Option Button seleziono il parametro , non devono essere
visibili (quando sfoglio avanti e indietro) i dati che non rispettano
tale parametro
insomma dovrei impostare un filtro, evitando pero' rallentamenti
pesanti.Ovviamente vorrei evitare di filtrarli manualmente
tralasciando
quelli che non mi
interessano.
Grazie.
P.S. Se non sono stato chiaro la mia e-mail e' 
te...@floating.com


Esistono svariati modi.....
Primo di tutti on usare dbOpenTable, ma DbOpenDynaset che ti permette di
usare il Metofo FindNext..
RsTab.FindFirst mycriteria
do until RsTab.NoMatch
.    ..... (operazioni varie
.    RsTab.FindNext mycriteria
Loop
Un'altro è creare una query temporanea o definitiva (dato che sono tabelle
parametri fisse ti converrebbe forse di creare le query fisse direttamente
nel database...)
Set Rs = OpenRecordset(mycriteria)
Set Rs = OpenRecordset(MyQuery)
Una Domanda... Perchè usi due database diversi ??? ciò non è assolutamente
necessario...
Flavio
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] NORME DI BUONA FABBRICAZIONE

Devo fare un semplice software per un farmacista che ha anche una sua 
piccola produzione.
Mi ha chiesto che questo software si occupi anche di gestire le norme di 
buona fabbricazione (NBF).
Vorrei sapere se qualcuno di voi avesse già affrontato un problema del 
genere o conoscesse qualche software
che se ne occupa...così sbircio...
Saluti....
IAK 


Potrebbe essere utile dare un'occhiata ad un "Manuale della Qualità" di una
qualunque azienda che abbia ottenuto una certificazione di qualità?
--
Greg


Forse non mi sono spiegato bene...
Partendo dal presupposto che so cosa sono le NBF....
Qualcuno di voi ha già affrontato il problema di dover creare una parte di 
software
per le NBF?
Sinceramente non so bene da che parte cominciare, anche perchè la normativa 
è piuttosto
estesa...e non so come organizzare il lavoro...
Spero adesso di essere stato chiaro!!!!
IAK
Newsgroup: it.comp.lang.visual-basic
Titolo: EXE non parte

Ho compilato il mio programma VB e non riesco a farlo partire.
quando lancio l'exe mi da il messaggio :
ERRORE DI RUNTIME 91 - VARIABILE OGGETTO O VARIABILE DEL BLOCCO WITH NON IMPOSTATA.
iL PROGETTO PARTE PERO' CORRETTAMENTE SOTTO vb6
QUALCUNO UO' AUITARMI???
GRAZIE . ROBY

 QUALCUNO UO' AUITARMI???
Eh?
termoPilucco

 iL PROGETTO PARTE PERO' CORRETTAMENTE SOTTO vb6
[...]
Sulla stessa macchina o su macchine differenti? Puoi _urlare_ un po' più
forte non ti sento! <BG>
Prego. Alessandro

...


 in xml.
infarcisci il codice di msgbox, allo scopo di individuare esattamente quale
è la riga che ti genera quell'errore.
quando lo avrai scoperto avrai qualche elemento in più per capirci qualcosa,
e se non ci riesci da solo cercheremo di darti una mano.
senza questa informazione la cosa è più adatta ad un aruspice che ad un
informatico
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

...


 riesco a capire qual msg viene fuori per primo).
sicuramente il msgbox "load". vuol dire che l'errore si verifica dopo, e che
fino a quel momento lě tutto stava andando bene.
cosa succede, subito dopo?


"Errore di runtime 91 ..." 
?Error$(91)
Object variable or With block variable not set
-- 
ciao,
hal

Newsgroup: it.comp.lang.visual-basic
Titolo: ListBox Trasparenti

Vorrei sapere se è possibile creare Listbox trasparenti e ovviamente se
possibile come si fa.
Ho trovato i controlli per ComboBox,Pulsanti,... trasparenti ma non le
ListBox.
 Leonardo

...

Scusami se mi intrometto, ma non avresti per caso trovato il modo per avere
dei
RichtextBox trasparenti, per caso?
Ti ringrazio
Jiz

 wrote in message 8gr47h$i75$1...@nslave2.tin.it...


 ListBox.
purtroppo per le ListBox non ne ho idea, sai come si può fare per le
TextBox?
Ciao e grazie in anticipo
Faber

 wrote in message 8h0h11$p11$1...@nslave1.tin.it...


 proprietà BackStyle su Trasparente.
grazie mille dell'info. esiste un modo per ottenere lo stesso effetto senza
aggiungere nuovi controlli?
Ciauz
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Valori booleni e DBgrid

Desidererei far apparire in controllo DBGrid i valori Si/No invece degli
equivalenti Yes/No, On/Off, True/false. In alternativa mi accontentere dell
quadratino con
spunta alla maniera di Access. Qualcuno č cosě gentile da fornirmi una
risposta.
Grazie

Desidererei far apparire in controllo DBGrid i valori Si/No invece degli
myDBGrid.Columns(Index).NumberFormat = "\N\o;\S\i"
buon lavoro
Sig

 wrote in message
8h8fm7$pt2$1...@nslave2.tin.it...

Grazie mille

Newsgroup: it.comp.lang.visual-basic
Titolo: Piccolo Aiuto

Vorrei lasciare abilitato solo il pulsante di riduzione a icona e di
ingrandimento e disabilitare la X in un form. Non ci riesco.
Avete suggerimenti.
Grazie


Non so come si faccia a nasconderlo, ma per disabilitare la chiusura del
form
puoi fare
Sub Form_Unload (Cancel As Boolean)
    Cancel=True
End Sub
Ciao, Fabio Guerrazzi

Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda combo

Salve, non riesco a fare una cosa in maniera semplice: voglio mettere in una
combo tutti i record di una colonna di una tabella di una database. L'ho
fatto aprendo il database e scorrendo tutti i record inserendoli con il
comando list nella combo. Non c'e un modo più diretto per associare una
combo ad una tabella?
Grazie in anticipo
Puzz

...


 wrote in message
01bee3f7$11ba4580$4700a8c0@luigi...


Newsgroup: it.comp.lang.visual-basic
Titolo: file I/O

Hi:
I am doing a project in VB.net. I would like to write file at the run time. 
I know System I/O. But I need this file is big. what can I do?
thank you

uuhm... What's the matter if the file is big?
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Creazione di Plugin

Ciao a tutti!
Ieri sera ha scaricato il programma TweakAll
(
www.abtons-shed.com/tweakall/tweakall.htm
) e dopo averlo installato mi sono
accorto che con tale programma non potevo fare nulla. Ho scoperto dopo
qualche minuto che dovevo scaricare dei Plugin per attivare varie
funzioni...
Ho pensato: bella cosa! In questo modo ti installi solo le parti che ti
servono realmente!
Ed ecco il punto. Secondo voi, con VB6 qual'è il miglior modo per creare
un'applicazione a cui poter aggiungere dei Plugin e in particolare in che
forma dovrebbero/potrebbero essere questi Plugin (EXE Standard, EXE ActiveX,
DLL ActiveX, Controllo ActiveX, ...)?
Qualcuno ha qualche esempio o qualche link da postare dove poter prendere le
basi per un progetto sifatto?
Grazie!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come Creare matrici di controlli ( Vb.Net )

 il Vb6 bastava il copia ed incolla.... ma nel .Net tale metodo nn funziona
+
Non si fanno matrici di controlli in 
vb.net
, non ce n'č bisogno:
1) č possibile aggiungere e togliere controlli al run time
2) č possibile gestire gli eventi di piů controlli con la stessa routine,
tramite le istruzioni AddHandler
Salutoni
Sergio


Se il motivo della creazione di una matrice di controlli è la gestione di un
evento per tutti i controlli, questo si fa con gli handles di vb net.



 il Vb6 bastava il copia ed incolla.... ma nel .Net tale metodo nn funziona
+
Di seguito alla parola chiave Handles aggiungere il nome del componente con
il relativo evento;
Esempio di una matrice di tre pulsanti con nomi diversi presenti nella
maschera:
Evento utilizzato Click:
  Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button3.Click, Button4.Click, Button5.Click
        Dim o As Button
        o = DirectCast(sender, Button)
        If o.Name = "Button3" Then
            MessageBox.Show(o.Name)
        ElseIf o.Name = "Button4" Then
            MessageBox.Show(o.Name)
        ElseIf o.Name = "Button5" Then
            MessageBox.Show(o.Name)
        End If
    End Sub
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Autorun di CDcon VisualBasic........??????





Vorrei sapere come si crea un'applicazione in vb che non 
necessiti del modulo VBRun affinche possa essere usata come autorun durante 
l'avvio di un CD.
Grazie da Luca
 
Bye 
Bye



purtroppo....non si puo' fare !


...


ÿþ< ! D O C T Y P E   H T M L   P U B L I C   " - / / W 3 C / / D T D   H T M L   4 . 0   T r a n s i t i o n a l / / E N " >  
 < H T M L > < H E A D >  
 < M E T A   c o n t e n t = " t e x t / h t m l ;   c h a r s e t = u n i c o d e "   h t t p - e q u i v = C o n t e n t - T y p e >  
 < M E T A   c o n t e n t = " M S H T M L   5 . 0 0 . 2 3 1 4 . 1 0 0 0 "   n a m e = G E N E R A T O R >  
 < S T Y L E > < / S T Y L E >  
 < / H E A D >  
 < B O D Y   b g C o l o r = # f f f f f f >  
 < D I V > < F O N T   f a c e = T a h o m a   s i z e = 2 > I o   h o   r i s o l t o   c r e a n d o   l ' a u t o r u n   c o n   V b 3   e   m e t t e n d o    
 s u l   c d   l a   v b r u n 3 0 0 . d l l   e   t i   a s s i c u r o   c h e   f u n g e   b e n i s s i m o . < / F O N T > < / D I V >  
 < D I V > & n b s p ; < / D I V >  
 < D I V > < F O N T   f a c e = T a h o m a   s i z e = 2 > C i a o < / F O N T > < / D I V >  
 < D I V > < F O N T   f a c e = T a h o m a   s i z e = 2 > C o r r a d o < / F O N T > < / D I V > < / B O D Y > < / H T M L >  
 

 >


Stracca
Veramente? Che dll bisogna includere? Mi interessa molto la cosa.....
Mi direste il nome del thread che vado a rileggermelo? (ho scaricato
1000 mex di questo ng + 5000 di altri ng..... Per favore, non
torturatemi dicendomi di cercarmelo da solo! :))))))
Un grazie infinito a chiunque mi aiuterà........ 
ByeZ!
Alkondor
Togliere NOSPAM per rispondere in e-mail
*****************************************************
Riesco a resistere a tutto fuorichè alle tentazioni! 
*****************************************************


Cerca tra i vecchi msg su 
www.deja.com
 (ma quando hai intenzione di leggerti
il Manifesto del NG?)
--
Roal Zanazzi
z...@iol.it

il Manifesto del NG?)
Quando verrà pubblicato nel ng! :)
Hai ragione.. ora vado a leggerlo...


Hai ragione.. ora vado a leggerlo...
Azz!
Dov'è il manifesto?
Non lo trovo... :(


 Non lo trovo... :(
Sito Comune... 
Ciao
:-) Hd (-:
p_di...@freemail.it
  (okkio, non è politico ^_^)
hd...@azienda.net
Sito Comune:
www.murialdo.it
\it_lang_vb
----------------------------------------------------------------------------
Quando l'ultimo pesce sarà catturato, l'ultima fiamma sarà 
spenta, l'ultimo fiume avvelenato, solo allora capirete che non 
si può mangiare solo denaro.
-----------------------------------------------------------------------------

 Non lo trovo... :(
Vabbe, ancora per questa volta...
http://www.murialdo.it/it_lang_vb/docs/Manifesto.txt
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

 Non lo trovo... :(
Sito comune, Luke, Sito comune


Letto.......

Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare le impostazioni grafiche della title bar.

Ho la necessità di impostare graficamente a run time (in un progetto visual
basic 6 sp6) la barra del titolo (cioè la caption della mia form attiva).
Nel mio progetto, p.e. a seconda del tipo di articolo che l'utente
seleziona, devo aprire una form con impostazioni grafiche della titlebar
che, ad impatto visivo immediato, diano la sensazione dell'apparteneza di
quell'articolo ad una certa classificazione.
M hanno suggerito di dare un'occhiata alle API
SetWindowText  - per cambiare la caption
SetSysColor  - per cambiare i colori di sistema
SetWindowLong  - per cambiare alcune caratteristiche della tua finestra
ma sono riuscito a combinare ben poco.
Vi chiedo di aiutarmi e/o farmi vedere del codice che fà al caso mio:
cambiare run time il colore, la size e la font della caption della mia form.
Grazie.

 cambiare run time il colore, la size e la font della caption della mia form.
La via IMHO piu' semplice e' disegnare un Form senza barra del titolo.
Al posto di quest'ultima metti una picturebox o anche una semplice label
e gestisci questa.
Poiche' avresti il problema di far trascinare un form senza barra
del titolo, puoi risolvere solo quest'ultimo con quanto suggerito
nella knowledge base:
How To Move a Form that Has No Title Bar (32-Bit)
http://support.microsoft.com/kb/q173773/
-- 
ciao, hal

 ha scritto nel messaggio
news:sjWre.8606$bc....@tornado.fastwebnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Api Si - Api No

In molti casi si ricorre all'uso delle Api quando, a causa delle sue
limitazioni, il VB non permette di svolgere una particolare funzione.
In altri casi e' vantaggioso usare le Api per evitare di aggiungere al
progetto componenti che appesantirebbero il gia' voluminoso pacchetto di
file di installazione.
Quello che non mi e' molto chiaro e':
Sostituire un oggetto VB standard (tipo il timer) con una procedura Api
quali vantaggi porta migliora sempre le prestazioni dell'eseguibile, ha
altri vantaggi, oppure e' la stessa cosa?
Roby


---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---

In generale si deve considerare questo compromesso:
API = migliori prestazioni e maggior codice da scrivere
VB = minori prestazioni ma maggior semplicità
Comunque dipende da caso a caso: l'esempio che hai citato del timer, per
esempio, ti garantirebbe una maggiore precisione del controllo timer di VB.
Infatti la minima precisione del timer VB non mi pare riesca a scendere
sotto i 55 ms, mentre in linea teorica dovrebbe essere di 1 ms.
In questo caso l'utilizzo delle API di sistema ti garantisce miglior
precisione con una complessità del codice irrilevante.
Altre volte riesci magari ad ottenere buone prestazioni, ma a scapito di una
notevole complessità di codice in confronto alla stessa soluzione
implementata con gli strumenti del VB.
A te giudicare volta per volta quale sia il miglio compromesso.
Inoltre, leggi sempre bene la (rara) documentazione sulle API per farti
un'idea più chiara di cosa ti serve per implementare la soluzione
"alternativa" al VB.
--
________________________________
Raffaele Tripodo
E-Mail:              
raff...@conmet.it
MSN Messenger: 
px...@hotmail.com
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

 Sostituire un oggetto VB standard (tipo il timer) con una
procedura Api quali vantaggi porta migliora sempre le
prestazioni dell'eseguibile, ha altri vantaggi, oppure e' la
stessa cosa?
E come si fa a rispondere? Bisognerebbe vedere caso per caso,
giustamente ne citi uno in particolare ma su quello non so
rispondere.
A naso, generalmente dovrebbero migliorare le prestazioni, ma
molto dipende dalle nostre capacita`.
Trovo utile farlo quando o si vogliano implementare una parte
soltanto delle caratteristiche del controllo che si va a
sostituire o quando si voglia ampliare, estendere,
personalizzare tali funzionalita`.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

 wrote in message
8lonki$h22$1...@fe2.cs.interbusiness.it...


Pienamente d'accordo.
Personalmente mi sono creato una serie di moduli BAS con una serie di
funzioni che richiamano le API suddivisi per categorie: accesso al registro,
grafica, file, controlli comuni...
Quando mi servono, le API sono lì, "incapsulate" in una funzione.

Newsgroup: it.comp.lang.visual-basic
Titolo: Contatore!

Ciao a tutti, come posso, in um modulo, far contare il numero di record
di una tabella?
Grazie e buona pasqua a tutti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:1a5e026a9c730e06881...@mygate.mailgate.org...


 di una tabella?
Scrivi una funzione, normalmente, come se non fosse un modulo! :-)

Io scrivo:
NOMETABELLA.recordcount
If recordcount > 100 then
DoCmd.Close
Else
End If
 
Perchè non funziona?


 Io scrivo:
DAO? ADO? Cursore lato server? In ogni caso per avere un valore
"attendibile" di recordcount devi prima spostarti sull'ultimo elemento del
recordset!
Ciao

 Perchè non funziona?
mmm io per pararmi il culo usando il recordcount facevo cosi e mi
ritornava sempre il numero esatto dei records
Dim db as Database
Dim rs as Recordset
set db=opendatabase("c:\db1.mdb")
set rs=db.openrecordset("Tabella")
rs.movefirst
rs.movelast
rs.movefirst
if rs.recorcount<>0 then
    'codice
end if
questo lo facevo con DAO su DB Access 97, perche se nn ti scorri prima
il DB con movefirst e movelast il recorcount potrebbe ritornarti -1 (ossia
nessun record)
Ciauz
Fabio

Perchč non mi funziona NIENTE con questo codice????
Private Sub ApriGenerale_Click()
On Error GoTo Err_ApriGenerale_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim db As Database                 ------------NON
FUNZIONA--------------
Dim rs As Recordset
Set db = opendatabase("c:\db1.mdb")------------NON
FUNZIONA--------------
Set rs = db.openrecordset("Clienti")
rs.MoveFirst
rs.MoveLast
rs.MoveFirst
If rs.RecordCount <> 0 Then
    clienti.RecordCount            ------------NON
FUNZIONA--------------
    If RecordCount > 100 Then
    DoCmd.Close
    Else
    End If
End If
    stDocName = "Generale"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End If
.....



Ripeto la domanda di Lord Rayden: che motore usi? DAO? ADO? Cosa?
Puoi fare così:
1) usare una ORDER BY nella SELECT
oppure
2) fare una MoveLast, MoveFirst prima di valutare la RecordCount.
Un MoveFirst subito dopo la OpenRecordset è inutile, primo perchè la O.R. si
posiziona sul primo record, e secondo, perchè se anche non lo facesse la
MoveLast la rende comunque inutile.
Ciao

 End If
Ciauz
Fabio

 ha scritto nel messaggio
news:1a5e026a9c730e06881...@mygate.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: consiglio su programma installazione

quale programma mi consigliate per creare pacchetti di installazione
grazie

 grazie
Prego,
Andrea

 grazie
Newbie totale ....quello che c'è insieme a VB
......appena sali un attimo
INNO SETUP
...esigenze professionali
a) InnoSetup
b) InstallShield (terribilmente costoso)

> b) InstallShield (terribilmente costoso)
Io ci aggiungerei anche terribilmente complicato.
Cioč con l'help prima o poi ci arrivi ... ma il problema
č che spesso e volentieri l'help non documenta tutto ... e ti
scontri con cose che non sai come fare ... tipo me adesso
che sto tirando giů santi dai calendari a tutto spiano.
Ciao
Andrea

 quale programma mi consigliate per creare pacchetti di installazione
Io uso da sempre quello di VB, e non ho mai avuto problemi.
Da quello che ho capito, chi ne ha avuto lavora con i database,
cosa che io evito, se posso.
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: ftp e versioni file

Ho scritto un'applicazione che tramite ftp si collega un remoto ad un
server, controlla le versioni delle dll in locale e in remoto, e se la
versione locale è più vecchia scarica la versione remota. Il problema è che
x confrontare la versione delle DLL in remoto non riesco... devo memorizzare
il numero della dll in un file e confrontare questo numero memorizzato nel
file con la versione del file locale. Non esiste un modo x estrarre tramite
ftp il n. di versione della dll remota?
grazie 1000
davide

 ha scritto nel messaggio
news:a3dj3n$17h610$1...@ID-73094.news.dfncis.de...

Penso proprio di no (almeno non direttamente da remoto).
Dovresti avere un processo host. potresti farti un piccolo exeActivex da
istanziare in remoto ...
avresti sempre il problema di come controllare la versione dell' exeAX :)
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Verificare se form è già aperto...

In un'applicazione non MDI prima di aprire un form vorreri verificare se è
già aperto.
Come posso fare ?
Grazie mille.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Come posso fare ?
In VB6 puoi guardare se lo trovi nella collection Forms. In .Net non so se
c'è qualcosa di simile
Dim frm As Form
For Each frm In Forms
  if frm.Name=tuonome then
  ...
Next
-- 
DBMS Firebird
VB6 + Ado

Per le forms figlie puoi scorrere:
For Each frm As Form in me.MdiChildren
   ..
Next
per aprire una form child testando prima che non sia nella lista:
Public Sub ShowChild(ByVal FormType As Type)
Dim TargetForm As Form = Nothing
For Each child As Form In Me.MdiChildren
If child.[GetType]().Equals(FormType) Then
TargetForm = child
End If
Next
If TargetForm Is Nothing Then
TargetForm = DirectCast(Activator.CreateInstance(FormType), Form)
TargetForm.MdiParent = Me
End If
TargetForm.Show()
End Sub
-- 
-----------------------------------------------------------------
Bastianello Luciano - MBS CP Development
Software Consultant - Apprentice Sorcerer
MSN: 
cte...@hotmail.com
 - ICQ: 209754422
http://community.visual-basic.it/LucianoB/
-----------------------------------------------------------------
"Andrea" <nos...@invalid.invalid> ha scritto nel messaggio 
news:42vhifgpbqth.k...@40tude.net...


 Come posso fare ?
dalla versione 2.0
----
My.Application.OpenForms Property
http://msdn2.microsoft.com/en-us/library/eh13dca9.aspx
----
Ciao
-- 
Giorgio Rancati
[Office Access MVP]
Newsgroup: it.comp.lang.visual-basic
Titolo: Combobox

Ciao Ragazzi sono Manuele e da circa un anno che mi diletto con VB e grazie
alla lettura dei vecchi post e del sito comune mi avete risolto un bel po'
di problemi.
ora ho un problema:
ho 2 combobox
la prima mi elenca una
serie di variabili
la seconda elenca delle variabili legate ad una
selezionata nella prima combobox;per esempio combo1 = Fiat,Ford,Citroen,etc
selezionando fiat automaticamente combo2= Punto, Bravo,Marea,etc....
Io
non riesco a visualizzare i risultati della ricerca nella seconda combo.
Come potete aiutarmi?
Ciao e grazie.
Manuelec
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
news:193Z42Z167Z18Y1...@usenet.iol.it...


"Non dico mai non si può
fare."
Grazie Molto della tua risposta.
vorrei capire meglio in che
senso gestire le combo da Db.Facendo una select Sql?oppure caricarmi i dati
quando carico la form?
Ciao e grazie ancora.


Grazie Molto della tua risposta.
Figurati
vorrei capire meglio in che
senso gestire le combo da Db.Facendo una select Sql?oppure caricarmi i dati
é strettamente correlato alla mole di dati che hai da gestire se sono
nell'ordine di pochi dati crea un file asci o crea variabili come dicevi tu.
Guarda nel mio sito per esempio ti spiega come caricare una combo da un
recordset.
Ti crei un recorset Ado che contiene i dati della tua tabella che dovra
essere così: PRODUTTORE MODELLO
QUando l'utente clicca sulla prima combo che tu hai provveduto a caricare
con tutti i produttori, procedi a fare filter sul tuo recorset come ti ho
detto nel post precedente e poi con un ciclo riparti a riempire le combo.
In realtà sarebbe più professionale usare i i list control come ti ho detto,
i quali listano i contenuto di un recorset in automatico, pero a volte mi
sembrano pesanti
quando carico la form?
Si o se no quando è necessario in base a come è articolata la tua
applicazione


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

Ok risolto con una select distinct.
ma per allinearli tutti alla stessa
maniera nella combo?
P.E. ora è cosi Fiat       cod.35
ford cod. 46
                mercedes-benz cod.52
io vorrei cosi':   Fiat
cod.35
                   Ford                  cod.46
mercedes-benz         cod.52
Ciao e grazie


Dichiara l'api GetComboBoxInfo ,SetWindowLong
e il Type COMBOBOXINFO e la costante WS_EX_RIGHT e GWL_EXSTYLE.
Dim CBI As COMBOBOXINFO
   CBI.cbSize = Len(CBI)
'ottieni l'handel della list dentro la combo
  Call GetComboBoxInfo(combo1.hwnd, CBI)
   hList= CBI.hwndList
' stiele della combo
nStyle = nStyle Or WS_EX_RIGHT
         SetWindowLong hList, GWL_EXSTYLE, nStyle


Dim CBI As COMBOBOXINFO


Scusami ma non so dichiarare le Api.
Scusami e grazie


http://digilander.iol.it/vbsegreti
sezione esempi>Api>allinea combo
Saluti


Scusami se non l'avevo visto nel tuo sito.
Grazie Mille e complimenti per
il sito.
Ciao
Manuelec


Scusami P,
ho un dubbio: perche quando carico la form e riempio la prima
combo, il prg dopo che ha finito di caricarla mi va nell'evento
combo1_click? E' un errore mio o è proprio cosi'?eventualmente come si puo'
risolvere?
Ciao e grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Load e unload

Oi!
Chiamo attraverso un bottone di form1 il Load di Form2.
Successivamente faccio visualizzare da questa una msgbox e se si
clicca un bottone viene visualizzata form2, altrimenti procedo con
unload me.
Mi dà errore 364, l'oggetto è stato scaricato. Ma me lo dà dopo che ha
fatto tutto, quando l'esecuzione torna a form1. 
Qualcuno può spiegarmi perchè per piacere, e dirmi come risolvere plz?
Grazie mille !
Axè!

Quasi sicuramente hai un oggetto dentro a form1 che punta
in maniera esplicita al tuo form2 ormai scaricato.
Controlla e cerca di utilizzare sempre gli argomenti e mai
i riferimenti espliciti.
-- 
Saluti
Andrea Moro

 fatto tutto, quando l'esecuzione torna a form1.
Non puoi fare l'Unload Me nell'evento Load
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Non puoi fare l'Unload Me nell'evento Load
P.S.: bastava premere il tasto "?" sulla finestra dell'errore.


Newsgroup: it.comp.lang.visual-basic
Titolo: come visualizzare file .DOC ?

Ho la necessità di consentire 
LA SOLA VISUALIZZAZIONE di documenti che in origine sono .DOC
(ovvero non devono essere stampabili)
L'unica soluzione che vedo e' una macro che converta i .doc in .rtf e
successivamente fare una applicazione che legga tali .rtf
Qualcuno conosce una via più elegante? magari un
ocx-faccio-tutto-io-e-sono-gratis ?
ciao a tutti e grazie
   Nicola Tornieri
   ----------------------------
  Manens Intertecnica srl
  tornieri[at]
manens.com
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

 Qualcuno conosce una via più elegante? magari un
ocx-faccio-tutto-io-e-sono-gratis ?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 wrote in message
39f6dd4d...@192.168.30.240...
|
|
| Ho la necessità di consentire
| LA SOLA VISUALIZZAZIONE di documenti che in origine sono .DOC
| (ovvero non devono essere stampabili)
|
| L'unica soluzione che vedo e' una macro che converta i .doc in .rtf e
| successivamente fare una applicazione che legga tali .rtf
|
| Qualcuno conosce una via più elegante? magari un
| ocx-faccio-tutto-io-e-sono-gratis ?
|
| ciao a tutti e grazie
Scusa l'ignoranza probabile, ma io sapevo che i doc sono internamente uguali
agli rtf (esempio stupido rinomina un file da doc a rtf)... di conseguenza
suggerirei una bella (?) richtextbox che xò non ho mai usato... :) Ciao!

 suggerirei una bella (?) richtextbox che xò non ho mai usato... :) Ciao!
non sono uguali. doc direi sia binario, rtf e' testo:
stesso doc:
16/09/2000  08.45               19.456 accendere il gruppo.doc
26/10/2000  16.30                6.965 accendere il gruppo.rtf
quanto al viewer, c'era un ocx che lo consentiva, ma non era affatto
gratuito, anzi. se serve cerco l'url (ci metterei un po' a trovarla).

Scusate lo sbaglio!

 wrote in message
news:8t81i0$m9pua$5...@ID-52090.news.dfncis.de...
