🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: cn.bbs.comp.lang.visual-basic
Article #20690

���һ������ƥ�����⣿

#20690
From: ��֮��
Date: Thu, 07 Aug 2003 02:58
23 lines
1459 bytes
   Dim ProductID as integer
   Type mytypeProd
    myProductID As Integer
   sState As Boolean
   End Type 
   ProductID = Productstate.myProductID

   tsql = "select Store_Weight from Store where Product_ID = " + ProductID + ""
   If DataEnvironment1.rsStore.State = 1 Then
      DataEnvironment1.rsStore.Close
   End If
   DataEnvironment1.rsStore.Source = sSql
   DataEnvironment1.rsStore.Open


����ProductID ���ɲ��������
�ҳ���Cint(ProductID)
���ǻ��dz������Ͳ�ƥ������
������ʲôԭ�򰢣�

--

�� ��Դ:��BBS ˮľ�廪վ smth.org��[FROM: 61.144.235.39]
Technical Details
Message-ID: <000000$5uS@smth.org>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-05!sn-xit-08!supernews.com!38.144.126.76.MISMATCH!feed2.newsreader.com!newsreader.com!maily.cic.tsinghua.edu.cn!SMTH

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,GB
X-Google-Thread: 109fdd,66ebf2b2e564fe1e,start
X-Google-Attributes: gid109fdd,public
X-Google-ArrivalTime: 2003-08-06 20:00:08 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-05!sn-xit-08!supernews.com!38.144.126.76.MISMATCH!feed2.newsreader.com!newsreader.com!maily.cic.tsinghua.edu.cn!SMTH
From: CLORET@smth.org (��֮��)
Newsgroups: cn.bbs.comp.lang.visual-basic
Subject: ���һ������ƥ�����⣿
Date: 07 Aug 2003 02:58:24 GMT
Organization: BBS ˮľ�廪վ
Message-ID: <000000$5uS@smth.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="gb2312"
Content-Transfer-Encoding: 8bit
X-Filename: VisualBasic/g/M.1060224744.m0
Lines: 23