🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #403

Contare record su Vb

#403
From: Qwerty
Date: Mon, 05 Jun 2006 12:38
17 lines
1599 bytes
Devo contare i record di una tabella Access con Vb 6, ma non s� come farla 
stampare su una Text, il codice � questo, ma d� erorre, potete aiutarmi ??

 Grazie 100000 !


Private Sub Form_Load()
strconn = "provider=microsoft.jet.oledb.4.0;Data Source = " & App.Path & 
"\clienti.mdb"
 Set conn = CreateObject("ADODB.connection")
 conn.open strconn

 sql = "select count (corso) from corsi"
 Set rs = CreateObject("ADODB.recordset")
 rs.open sql, conn
 Text1.Text = rs("corso")
 
Technical Details
Message-ID: <eBVgg.24828$cX1.390091@twister2.libero.it>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!t-online.de!130.59.10.21.MISMATCH!kanaga.switch.ch!switch.ch!newsserver.news.garr.it!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: f94ee,511f60b5208deec3,start
X-Google-Thread: 10b997,511f60b5208deec3,start
X-Google-Attributes: gidf94ee,gid10b997,public
X-Google-Language: ITALIAN,ASCII
Path: arc1-ca.pugleaf.net!g2news2.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!t-online.de!130.59.10.21.MISMATCH!kanaga.switch.ch!switch.ch!newsserver.news.garr.it!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail
From: "Qwerty" <abc@cde.uh>
Newsgroups: free.it.visual-basic,it.comp.lang.visual-basic
Subject: Contare record su Vb
Lines: 19
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-RFC2646: Format=Flowed; Original
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
Message-ID: <eBVgg.24828$cX1.390091@twister2.libero.it>
Date: Mon, 05 Jun 2006 12:38:34 GMT
NNTP-Posting-Host: 151.25.148.73
X-Complaints-To: abuse@libero.it
X-Trace: twister2.libero.it 1149511114 151.25.148.73 (Mon, 05 Jun 2006 14:38:34 MET DST)
NNTP-Posting-Date: Mon, 05 Jun 2006 14:38:34 MET DST
Organization: [Infostrada]