Article View: free.it.visual-basic
Article #3349database
From: stefano
Date: Thu, 29 Aug 2002 20:31
Date: Thu, 29 Aug 2002 20:31
42 lines
2622 bytes
2622 bytes
Avrei alcune domande da fare:
1) Perch� se tento di eseguire una query sql su un qualunque file di
database aperto con il controllo data non funziona? Mi dice di impostare
"with" , ma se scrivo with data1 (...) end with comunque mi da lo stesso
errore.
Mentre se apro il file "manualmente" via codice, tutto funziona
regolarmente.
Codice: (funzionante)
Dim MioDb As Database
Dim MioRs As Recordset
Dim miofl As Field
Set MioDb = OpenDatabase("C:\dbase\MAG.MDB", True, False)
Set MioRs = MioDb.OpenRecordset("SELECT * FROM azienda WHERE
nome_azienda='ormac'")
Set miofl = MioRs.Fields("nome_azienda")
2) Perch� non riesco ad aprire un file dbIII via codice? Mentre con l'ogg.
data non ho nessun problema ad aprirlo? L'oggetto data non dovrebbe eseguire
la stringa DAO "OpenDataBase("C:\pass.dbf", False, False, "dBASE III;")"?
Codice: (non funzionante)
Dim MioDb As Database
Dim MioRs As Recordset
Dim miofl As Field
Set MioDb = OpenDataBase("C:\MAG.DBF", False, False, "dBASE III;")
Set MioRs = MioDb.OpenRecordset("SELECT * FROM MAG WHERE
nome_azienda='ormac'")
Set miofl = MioRs.Fields("nome_azienda")
P.S. Poco cambia non indicare il nome del database.
3) A quanto ho capito (sono in attesa che mi arrivi il libro "Visual Basic 6
programmare Database della Apogeo) fino ad ora, i database access (mdb)
possono contenere diverse tabelle (ma potrebbe anche essere una) , mentre i
file dBIII contengono sempre e solo una tabella. Potete confermarmi questa
frase? :)
Grazie dell'aiuto, quando mi arriva il libro spero di poter postare solo per
argomenti + complessi e professionali!
Technical Details
Message-ID:
<2xvb9.37670$pX1.1120053@news2.tin.it>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news2.tin.it.POSTED!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: ITALIAN,ASCII X-Google-Thread: f94ee,54157672046c8a82,start X-Google-Attributes: gidf94ee,public X-Google-ArrivalTime: 2002-08-29 13:35:37 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news2.tin.it.POSTED!not-for-mail From: "stefano" <stefalem@tin.it> Newsgroups: free.it.visual-basic Subject: database Lines: 46 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.50.4133.2400 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Message-ID: <2xvb9.37670$pX1.1120053@news2.tin.it> Date: Thu, 29 Aug 2002 20:31:58 GMT NNTP-Posting-Host: 212.171.70.203 X-Complaints-To: newsmaster@tin.it X-Trace: news2.tin.it 1030653118 212.171.70.203 (Thu, 29 Aug 2002 22:31:58 MET DST) NNTP-Posting-Date: Thu, 29 Aug 2002 22:31:58 MET DST Organization: TIN