我用〈!--include file=""-->包含的文件却不能用！请高手赐教。
程序：通用模块代码：
<% '打开数据库
dim conn,rs
sub openDB()
set conn=server.CreateObject("adodb.connection")
conn.connectionstring="provider=sqloledb;source=ZHENLY;database=zhenly;uid=sa;pwd=387480"
conn.open
set rs=server.CreateObject("adodb.recordset")
end sub
'关闭数据库
sub closeDB()
if isobject(conn) then
set rs=nothing
conn.close
set conn.nothing
end if
end sub
'处理空字符串
sub tackleempty(stritem)
stritem=ltrim(stritem)
stritem=rtrim(stritem)
if stritem="" then
call closeDB()
response.Redirect "index.asp"
end if
end sub
'处理撇号
sub tackleprime(stritem)
if instr("'",stritem)=1 then
call closeDB()
end if
end sub
'处理超长
sub tackleoverlen(stritem,int strlen)
if len(stritem) > strlen then
call colseDB()
end if
end sub
'处理EMALI
sub tackleemail(email)
if instr("@",email)<> 1 then
call closeDB()
end if
end sub
%>
我用的是VBSCRIPT，可是在另外一个文件调用：比如call openDB(),call tackleempty(stritem)等，却不能运行。不知道为什么。

[此贴子已经被作者于2006-10-25 17:59:10编辑过]