Question

ASP 变量定义问题

像C++那样的，IFDEFINE之类的，可以测试一个类或变量有没有被定义。
ASP在严格语法的时候，必须定义变量才可以使用，但还会出现重定义的错误。
那如何测试一个变量是否被定义，如果没被定义，就定义它呢？

比如说，我在A.ASP文件中，定义了x变量。
A.ASP要include文件B.ASP。
现在要使A.ASP跟B.ASP中都使用X变量。
而且要使B.ASP，不管是单独使用，还是被A.ASP引用，都要正常。
把A.ASP跟B.ASP都写一句 dim x 在包含的时候就会出现重定义错误
但B.ASP中不写dim x 的话，单独使用B.ASP就会出现变量x未定义错误
怎么才能解决这个错误？

Answer 1

可能是数据表中只有两条，且内容相同，查看一下吧。代码为：
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<%
set rsb=server.CreateObject("ADODB.RecordSet")
rsb.Source="select top 10 * from "& db_EC_Board_Table
rsb.Open rsb.Source,conn,1,1
if Rsb.bof and Rsb.eof then
Response..rite "<tr><td align=center>暂无公告</td></tr>"
else

追问

你瞎回答啥

Answer 2

那你直接在B.ASP定义X变量，那A.ASP包含B.ASP的时候也同样可以用

追问

现在是想要知道，怎么才能让它们，单独时可以全部使用，包含时也可以使用。
光在B里边定义的话，只有B单独使用，或A包B时才能使用，A单独时就不能用了。

追答

那就写在公共文件里面。比如C.asp

Answer 3

isEmpty 或者isNull试试，应该可以。

追问

试过了，哪怕写

if isNull(x) then
dim x
end if

这样还是给报错。

追答

报的什么错？
你可以在b里先试试
response.write(x+",")
if isNull(x) then 'isEmpty(x) 或者 x = ''
response.write("这是b")
else
response.write("这是a")
end if
然后用a引用b
和直接运行b

追问

就是说，把DIM放在IF ISNULL的判断里边，还是提示，重定义错误。

追答

这个真没辙了。要不你就放一个公共文件里。定义一次。然后a跟b都引用一下那个公共文件。。。。
然后判断下定义没有，如果没有就直接定义。不写dim了

Answer 4

变量名换一个不行吗

追问

现在就是想知道不换的方法。

追答

把定义的写在公共的文件里啊，然后每个方法要用的时候直接用 不用在定义一次了这样就不会了

Answer 5

顶