Article View: free.it.visual-basic
Article #58Access2007 con VB6
From: S&C
Date: Tue, 12 May 2009 16:29
Date: Tue, 12 May 2009 16:29
32 lines
1766 bytes
1766 bytes
Codice:
Dim Cn As New adodb.Connection
Cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & PATHMDB &
";"
Dim rs As New adodb.Recordset
sSql = ""
sSql = "SELECT tbl_Pagamenti.* FROM tbl_Pagamenti" _
& " WHERE tbl_Pagamenti.mesi <> 0" _
& " ORDER BY tbl_Pagamenti.desc"
rs.Open sSql, Cn
Select Case rs.EOF
Case False
MsgBox (rs.RecordCount)
End Select
---------------------
Il recordCount restituisce -1 pur essendoci i idati, come mai?....
Se poi utilizzo l'istruzione rs.moveLast mi da "Set di righe non supporta
operazioni di recupero all'indietro", come mai?....
--------------------
Attendo delucidazioni,
grazie.
S.S.
Technical Details
Message-ID:
<4a09a404$0$18925$4fafbaef@reader2.news.tin.it>Path:
arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!news.glorb.com!feeder.erje.net!border1.nntp.ams.giganews.com!nntp.giganews.com!feeder.news.tin.it!spool.news.tin.it!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Thread: 3de4ef2fba,cf31fb9197fa6cf2,start X-Google-Attributes: gid3de4ef2fba,public,usenet X-Google-NewGroupId: yes X-Google-Language: ENGLISH,ASCII-7-bit Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!news.glorb.com!feeder.erje.net!border1.nntp.ams.giganews.com!nntp.giganews.com!feeder.news.tin.it!spool.news.tin.it!not-for-mail From: "S&C" <info@soft-cad.net> Newsgroups: free.it.visual-basic Subject: Access2007 con VB6 Date: Tue, 12 May 2009 18:29:55 +0200 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.5512 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579 X-RFC2646: Format=Flowed; Original Lines: 34 Message-ID: <4a09a404$0$18925$4fafbaef@reader2.news.tin.it> Organization: TIN.IT (http://www.tin.it) X-Comments: Please send technical notifications to newsmaster@tin.it NNTP-Posting-Host: 79.28.217.61 X-Trace: 1242145796 reader2.news.tin.it 18925 79.28.217.61:9677 X-Complaints-To: Please send abuse reports to abuse@retail.telecomitalia.it