|
<% Sql = "Select * From Assort Order By ID Asc"
Set objRs = Server.CreateObject("ADODB.RecordSet")
objRs.Open Sql,objConn,1,1
If objRs.RecordCount<>0 Then
If Not objRs.BOF Then objRs.MoveFirst
Do Until objRs.EOF %>
| |
 |
<% objRs.MoveNext
Loop
End If
objRs.Close
Set objRs = Nothing %>
|
|
|
|