ASP和Access结合编写目录树的程序实例

response.write("<td width='40' class='menuFont'>
<div align='center' style='cursor:hand'
 onclick=""
jscript:window.location='disp.asp?disp=del&parentId="
 & sRec("listId") & "'"">删除</div></td>" & chr(13)
& "<td>&nbsp;</td>" & chr(13) & "</tr>" & chr(13) &
"</table>" & chr(13) & "</td>" & chr(13) & "</tr>" & chr(13))
end if
sRec.movenext
sNum=sNum+1
wend
response.write("</table>" & chr(13))
end if
sRec.close '关闭记录集
set sRec=nothing '关闭记录集
end function
sConn.close '关闭数据库链接
set sConn=nothing '关闭数据库链接
%> 月落

共2页: 上一页 [1] 2 下一页