急求ASP程序问题

来源:百度知道 编辑:UC知道 时间:2024/05/31 12:22:37
<!--#include file="security.asp"-->
<%
dim DBPath,objDB
Set objDB = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("../kxjhw@friend/xlist.asp")
objDB.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

Dim Title,SQLStr,RS,PageNO,PageSize,AllCount,MaxPage,i
Set rs = Server.CreateObject("ADODB.RecordSet")
%>
<html>
<head>
<link rel="stylesheet" href="../inc/style.css">
</head>
<body>
<br><br>
<center>
<table border="0" cellpadding="0" cellspacing="0" width="90%" background="images/bg2.gif">
<tr>
<td width="100%" align="center">
<table border="0" cellpadding="3" cellspacing="1" bgcolor="#000000"

<%if rs("ToAll")=True then %>
朋友你最后一行没有end if啊。。
可以这样
<%if rs("ToAll")=True then %>
<!--满足条件后执行的语句-->
<% end if%>

asp里面if 语句是
if 条件 then
执行
end if
这样子的