ASP源码参数不足

来源:百度知道 编辑:UC知道 时间:2024/05/24 05:41:19
代码如下

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!--#include file="../Inc/Config.asp"-->
<!--#include file="Inc/Function.asp"-->
<%
dim ID,Action,sqlDel,rsDel,FoundErr,ErrMsg,PurviewChecked,ObjInstalled
ID=trim(request("ID"))
Action=Trim(Request("Action"))
FoundErr=False
ObjInstalled=IsObjInstalled("Scripting.FileSystemObject")

if ID="" or Action="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>参数不足!</li>"
end if
if FoundErr=False then
if instr(ID,",")>0 then
dim idarr,i
idArr=split(ID)
for i = 0 to ubound(idArr)
call CheckArticle(clng(idarr(i)),Action)
next
else
call CheckArticle(clng(ID),Action)

恩是啊 你的这一页是接值的 若是你直接打开这一页当然说没有参数了因为if ID="" or Action="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>参数不足!</li>"
end if
所以在一浏览之前是在打开别的页之前 跳转到这一页的

你在其他页面有传第 值过来吗?
ID=trim(request("ID"))
Action=Trim(Request("Action"))
这没的到值

网址.asp?id=11&action=austin