🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: cn.bbs.comp.database
Article #9796

Re: ��VB5����ݿ������

#9796
From: ��ϧ
Date: Fri, 14 Aug 1998 00:00
21 lines
1499 bytes
�� �� dudu (bobo) �Ĵ������ᵽ: ��
:   ��������VB��һ��FOXPRO3��0����ݿ⡣�ҵij������£�
:     Dim Club1 As Database
:   Dim ClubTb2, ClubDyn As Recordset
:   Dim OldWs As Workspaces
:   Dim Number As Integer
:   Set Club1 = OpenDatabase("c:\billtemp\9807\", False, False, "FoxPro 3.0")
:   SQLSel = "Select * from Nhbh9807"
:   Set ClubDyn = Club1.OpenRecordset(SQLSel, dbOpenDynaset)
��һ�¼�������һ��
    clubdyn.movelast

:   Number = 2
:   Number = ClubDyn.RecordCount
:   Print Number
:   ֻ��NUMBER��ֵ���ǵ���1 ��������ݿ���������Ҳ���м�����
: � ���ʸ����������ʲôԭ��С�˾ʹ�л��


--
�� ��Դ:���������� BBS bbs.nease.net��[FROM: 202.103.161.110]
Technical Details
Message-ID: <3Q62Lj$UeK@bbs.nease.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB
X-Google-Thread: 101948,3faee66f47be7581,start
X-Google-Attributes: gid101948,public
From: likego.bbs@bbs.nease.net (��ϧ)
Subject: Re: ��VB5����ݿ������
Date: 1998/08/14
Message-ID: <3Q62Lj$UeK@bbs.nease.net>
X-Deja-AN: 381086404
X-Filename: DataBase/M.903099933.A
X-Complaints-To: usenet@news.nease.net
X-Trace: news.nease.net 903100340 12201 202.96.152.195 (14 Aug 1998 13:12:20 GMT)
Organization: Net Ease
NNTP-Posting-Date: 14 Aug 1998 13:12:20 GMT
Newsgroups: cn.bbs.comp.database,