asp代码错误发,错误(0x800A03EA)缺少end 高手请进。。。

来源:百度知道 编辑:UC知道 时间:2024/06/14 11:32:09
<%
lx=session("lx")
dim upload
set upload=new upload_Soft
formPath="../../picture/"
p_z_Z_Type=Replace_Text(upload.form("p_z_Z_Type"))
if lx=1 then
province=Replace_Text(upload.form("province"))
if province="" then
province="无"
end if
tzfs=Replace_Text(upload.form("tzfs"))
if tzfs="其他方式" then
tzfs1=Replace_Text(upload.form("tzfs1"))
else
tzfs1="无"
end if
if tzfs="" then
tzfs="无"
end if
if tzfs1="" then
tzfs1="无"
end if
end if
TrustpassFlag=Replace_Text(upload.form("TrustpassFlag"))
if TrustpassFlag="" then
TrustpassFlag=0
else
TrustpassFlag=1
end if
gsid=session("id")
for each formName in upload.file
set file=upload.file(formName)
if file.filesize=

我大体看了一下应该是在这段后面加个end if
<%
lx=session("lx")
dim upload
set upload=new upload_Soft
formPath="../../picture/"
p_z_Z_Type=Replace_Text(upload.form("p_z_Z_Type"))
if lx=1 then
province=Replace_Text(upload.form("province"))
if province="" then
province="无"
end if
end if

希望对你有用

不明白可以信息给我