Yeah,
dim conn,rs,strQry,strHTML
set conn=server.createObject("ADODB.connection")
conn.connectionstring="..."
set rs=server.createObject("ADODB.recordset")
strQry="select fld1,fld2,fld3 from table..."
rs.open strQry,conn
strHTML="<form name='frm1' action='page.asp' method='post'><table align='center' cellpadding='3' cellspacing='0'>"
while not rs.eof
strForm=strForm & "<tr><td><input type='checkbox' name='chk1' value='Y'></td><td><input type='text' name='txtFld1' value='" & rs("fld1") & "'></td><td><input type='text' name='txtFld2' value='" & rs("fld2") & "'></td></tr>"
rs.movenext
wend
rs.close
strForm=strForm & "<tr><td colspan='3' align='center'><input type='button' value='Edit' onclick='chkData()'></td></tr></table></form>"
' then do your coding
|