<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_thismember_STRING Recordset1.Source = "SELECT firstname, lastname, institution FROM thismember" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Participants
   
       
 
Shanghai , Sep. 25-28 , 2006
  
 
Participants | Schedule |
         
 
Participants
 
         
   
<% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>
First Name
Last Name
Institution
<%=(Recordset1.Fields.Item("firstname").Value)%> <%=(Recordset1.Fields.Item("lastname").Value)%> <%=(Recordset1.Fields.Item("institution").Value)%>
 
         


Maintained by Zhu Chen @2006
80 Nandan Rd. Shanghai P.R.China
Tel:86-21-64386191-517 Email:monachen@shao.ac.cn

<% Recordset1.Close() Set Recordset1 = Nothing %>