哪位朋友帮忙看下这个是什么问题呀.郁闷死了.

我的目地是这样.

我从一个页面 post提交信息过来

想把这个提交过来的信息保存到 Service 表里面 而要保存这条信息的前提是 提交过来的.ordercode=RemoveHTML(trim(request.form("ordercode"))) 必须要在 OrderList 表的 ordercode 字段里有和 ordercode=RemoveHTML(trim(request.form("ordercode")))接收到的参数相同的记记才开始保存.用户提交的.信息.

问题:

当我点提交后 程序就停在这if types="Service" and vsorder(ordercode,"OrderList",id)=ordercode then这一句好像不向下走了
直显示出.我提交过来的信息.也就是说.ordercode=RemoveHTML(trim(request.form("ordercode")))提交过来的信息和 OrderList 表的 ordercode 字段里 存在.与提交过来的参数相等的记录

我想要的是在
if types="Service" and vsorder(ordercode,"OrderList",id)=ordercode then 继续判断一下.可是程序直接显示.我提交的记录.程序就停在这里不走了.也不报错.
不知道是怎么回事呀

types=RemoveHTML(trim(request.QueryString("type")))

id=RemoveHTML(trim(request.form("id")))

useredorder=RemoveHTML(trim(request.form("useredorder")))

ServiceQuantity=RemoveHTML(trim(request.form("ServiceQuantity")))

ordercode=RemoveHTML(trim(request.form("ordercode")))





if types="Service" and vsorder(ordercode,"OrderList",id)=ordercode then

ordercodes=ordercodes

set rs = server.createobject("adodb.recordset")

sql="select * from Service"

rs.open sql,conn,1,3



rs("ordercode")=vsorder(ordercode,"OrderList",id)

rs("ServiceQuantity")=ServiceQuantity

rs("ServiceAddtime")=now()



rs.update

rs.close

Set rs=Nothing

response.write   " <script   language=JavaScript> "   &   chr(13)   &   "alert( '操作成功！ '); "& "window.location.href   =   'orderlist.asp ' "& "   </script> "  

response.End

end if

'================================保修保存=====================================================



Function vsorder(vsdh,vstable,vsid)

dim rsa,sql

set rsa = server.createobject("adodb.recordset")

sql="select * from "&vstable&" where id="&vsid&" and ordercode='"&vsdh&"'"

'Response.Write sql

'Response.End()

rsa.open sql,conn,1,1

	if not (rsa.eof or rsa.bof) then 

		if rsa("ordercode")=vsdh then

			Response.Write rsa("ordercode")

		else

			Response.Write ""

		end if

	else

		Response.Write ""

	end if

	

rsa.close

Set rsa=Nothing

End Function