ASP网站开发遇到的问题
<!--#includefile="data.asp"--><%dimbiaoti,shoujianren,fajianren,mazmun,zttip=request....
<!--#include file="data.asp"--><%
dim biaoti,shoujianren,fajianren,mazmun,ztt
ip=request.servervariables("remote_addr")
ztt=Trim(Request.Form("zt"))
datas=now()
mz=request.Form("mingzi")
sl=request.Form("shuliang")
fzr=request.Form("fuzeren")
yg=request.Form("yuangong")
bm=request.Form("bumen")
sj=request.Form("shijian")
mm=request.Form("mazmun")
iddd=request.Form("idd")
if fzr<>"" and sl <>"" and yg<>"" and ztt <>"" and sj <>"" then
dim sqlstr
sqlstr="Insert Into mchuku (mingzi,shuliang,chukuren,bumen,yuangong,shijian,beizhu,ip) Values('"&mz&"','"&sl& "','" &fzr&"','"&ztt& "','"&yg&"','"&sj&"','"&mm&"','"&ip&"')" conn.execute("update material set shuliang=shuliang-'"&sl&"' where id='"&iddd& "' ")
conn.Execute(sqlstr)
response.Redirect("index.asp")else
response.Redirect("shibaijieshu4.asp")
end if
%>
只有sqlstr有效果下面的update 怎么没效果 展开
dim biaoti,shoujianren,fajianren,mazmun,ztt
ip=request.servervariables("remote_addr")
ztt=Trim(Request.Form("zt"))
datas=now()
mz=request.Form("mingzi")
sl=request.Form("shuliang")
fzr=request.Form("fuzeren")
yg=request.Form("yuangong")
bm=request.Form("bumen")
sj=request.Form("shijian")
mm=request.Form("mazmun")
iddd=request.Form("idd")
if fzr<>"" and sl <>"" and yg<>"" and ztt <>"" and sj <>"" then
dim sqlstr
sqlstr="Insert Into mchuku (mingzi,shuliang,chukuren,bumen,yuangong,shijian,beizhu,ip) Values('"&mz&"','"&sl& "','" &fzr&"','"&ztt& "','"&yg&"','"&sj&"','"&mm&"','"&ip&"')" conn.execute("update material set shuliang=shuliang-'"&sl&"' where id='"&iddd& "' ")
conn.Execute(sqlstr)
response.Redirect("index.asp")else
response.Redirect("shibaijieshu4.asp")
end if
%>
只有sqlstr有效果下面的update 怎么没效果 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询