<%
document=Split(rs("document"),",") '這里的逗號取決于你之前保存到數據庫中的分割符
Function check(temp)
check=""
For I=0 To UBound(document)
if temp=document(I) Then
check="checked"
End if
Next
End Function
%>
<input name="checkbox" type="checkbox" value="asp" <%=check("asp")%>>
<input name="checkbox" type="checkbox" value="java" <%=check("java")%>>
<input name="checkbox" type="checkbox" value="php" <%=check("php")%>>