asp问题,请看源代码,急,在线等

<%@Language=VBScript%><%Response.Expires=0%><%session.timeout=30%><!--#includevirtual... <%@ Language=VBScript %>
<% Response.Expires=0 %>
<% session.timeout=30
%>
<!--#include virtual="/conn.asp" -->
<head>
<LINK href="/cssfile/1.css" rel="stylesheet">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>公司网站信息维护界面</title>
</head>

<%
if Request.Form("button")="增加" then
Response.Write "11111"
'Response.end
string wzmc=request.Form("textwzmc");
string wzdz=request.Form("textwzdz");
string wzsm=request.Form("textwzsm");
Response.Write wzmc
Response.Write wzdz
Response.Write wzsm
sql = "insert into WZXXB(wzmc,wzdz,wzsm) values('" + wzmc + "','" + wzdz + "','" + wzsm + "')";
cmd.commandtext=sql
cmd.execute
Response.Write "添加成功"
end if
if Request.Form("button")="修改" then
Response.Write "xiugai"
string wzmc=Request.Form("textwzmc");
string wzdz=Request.Form("textwzdz");
string wzsm=Request.Form("textwzsm");
sql="update WZXXB set wzdz='"+wzdz+"',wzsm='"+wzsm+"'where WZMC='"+wzmc+"'";
cmd.commandtext=sql
cmd.execute
Response.Write "修改成功"
end if
if Request.Form("button")="删除" then
Response.Write "shanchu"

string wzmc=Request.Form("textwzmc");

sql = "delete from wzxxb where wzmc = '" + wzmc + "'";
cmd.commandtext=sql
cmd.execute
Response.Write "删除成功"
end if
%>
<body>
<form method="post" name="weihu" action="">
<table width="400" border="0" align="center">
<caption align="top">
网站基本信息维护
</caption>
<tr>
<td width="78" height="79">网站名称</td>
<td colspan="2"><label>
<input name="textwzmc" type="text" id="textwzmc">
</label></td>
</tr>
<tr>
<td height="84">网站地址</td>
<td colspan="2"><label>
<input name="textwzdz" type="text" id="textwzdz">
</label></td>
</tr>
<tr>
<td height="91">网站说明</td>
<td colspan="2"><label>
<textarea name="textwzsm" id="textwzsm"></textarea>
</label></td>
</tr>
<tr>
<td height="63"><label>

<div align="right">
<input name="button" type="submit" value="增加">
</div>
</label></td>
<td width="142"><label>
<div align="center">
<input name="button" type="submit" value="修改">
</div>
</label></td>
<td width="158"><label>
<div align="center">
<input name="button" type="submit" value="删除">
</div>
</label></td>
</tr>
</table>
</form>
</body>
</html>
连基本的第一行测试输出都不能执行,更别说数据库操作了,请问我这是哪里出错了啊。
现在能找到button了, 但是不知道执行完SQL语句是否成功了,有什么方法能得到他的返回值呢。
下面那个说的不是asp把,sql = "insert into WZXXB(wzmc,wzdz,wzsm) values('" + textwzmc + "','" + textwzdz + "','" + textwzsm + "')"
cmd.commandtext=sql
result=cmd.execute
if result > 0 then
Response.Write "增加成功"
else
Response.Write "增加失败"
end if
根本不行,谁还有好方法啊
展开
 我来答
茂烟f
2008-09-11 · TA获得超过329个赞
知道小有建树答主
回答量:666
采纳率:0%
帮助的人:655万
展开全部
但是不知道执行完SQL语句是否成功了,有什么方法能得到他的返回值呢

cmd.commandtext=sql
result = cmd.execute 或者用 ExecuteNonQuery
if result>0 then 成功 否则失败
dreamontheway
2008-09-11 · TA获得超过499个赞
知道小有建树答主
回答量:546
采纳率:0%
帮助的人:407万
展开全部
补充 :
<!--#include virtual="/conn.asp" -->
改成
<!--#include file="/conn.asp" -->
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
guofengqiu
2008-09-11 · TA获得超过105个赞
知道小有建树答主
回答量:233
采纳率:0%
帮助的人:131万
展开全部
你看看conn.asp有没有问题,单独打开conn.asp看看会不会出错,要是出错的话就是连接有问题
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式