ASP checkbox复选框是否被选中的代码(结合数据库)

%
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")%>>