关于分开database里的data

cytin

我想问好像我从database里retrieve一些data出来。然后我想如果这些data到１００就combine在一个string。接下来de１００ 个record又combine成另外一个string。
我的code是 ：－

Set objRecord = Server.CreateObject("ADODB.Recordset")
sql = "Select * from tblISOOnline where DefaultSupplyOrg = '"& request.QueryString("org") &"'"
objRecord.open sql,connProcurement
While not objRecord.EOF

For I=1 to １００

part = part & objRecord("ItemNumber") & ","
org = objRecord("DefaultSupplyOrg")

'response.write org & "<br/>"
'response.write objRecord("ItemNumber") & "<br/>"

Next

objRecord.MoveNext
count = count + 1
wend


但是不知道做甚么不能run

max5007

这For I=1 to １００是不需要的。

milktin

要检查count是不是到100了

红发

我想问一下，你的下一个100的record要怎样show出来。

因为我怎样看，你只可以show100个罢了。

还有你说不能RUN，

可以不可以说一下是什么error??（这里的人最常问的）

cytin

我想做的是如果到１００ 个 record 会 connect成一个string然后接下来１００个又connect成另外一个string。如此接下去。

cytin

请问有谁会分record？
例如：－
我从database拿一些record出来然后有３０００ 个 record 我要把data 分成５００ 个 data 成一 个 string。
如：
string１ ＝ A record，B record，c record 。。。。。
string２ ＝ AA record，BB record， Cc record 。。。

红发

原帖由 cytin 于 17-5-2006 01:36 PM 发表
请问有谁会分record？
例如：－
我从database拿一些record出来然后有３０００ 个 record 我要把data 分成５００ 个 data 成一 个 string。
如：
string１ ＝ A record，B record，c record 。。。。。
strin ...

这个是要用两个for..loop的。
其实你也是要做到了。

这样的问题我也是问过的

milktin

分析你的Code

Set objRecord = Server.CreateObject("ADODB.Recordset" )
sql = "Select * from tblISOOnline where DefaultSupplyOrg = '"& request.QueryString("org" ) &"'"
objRecord.open sql,connProcurement

1.开了个Recordset

While not objRecord.EOF     2.如果不是EOF,就执行下一行

For I=1 to １００           3.开始一个For..Loop

part = part & objRecord("ItemNumber" ) & "," 4.把现在的data放进string
org = objRecord("DefaultSupplyOrg" )

Next  5.继续另一个loop,可是data还是一样

objRecord.MoveNext  6.这时,才去下一个data
count = count + 1
wend　7.回到第2个step








[size=-1]-----------------------------------------
[size=-1]牛奶罐
[size=-1]零点一度 [url]www.dot1degree.com[/url]
[size=-1]从零点开始，寻找你人生第一度的变化！
[size=-1]我的 IT 日记