标题:求助 ASP删除SQL数据库数据问题 谢谢
只看楼主
jishiqian
Rank: 1
等 级:新手上路
帖 子:27
专家分:0
注 册:2006-4-21
 问题点数:0 回复次数:2 
求助 ASP删除SQL数据库数据问题 谢谢

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/mj.asp" -->
<%
dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)

else
set oConn=server.CreateObject("adodb.recordset")
sql1="delete from users where userid='"&Duserid&"'"
oConn.open sql1,gym_conn,1,3
Remess="成功删除会员编号为 "&Duserid&" 的记录!"
Response.Write(Remess)
oConn.Close
end if
%>
大哥大姐给看下 为什么不能删除???????????????
有什么问题???????????????????

搜索更多相关主题的帖子: SQL数据库 blank include target 
2006-04-21 15:13
jishiqian
Rank: 1
等 级:新手上路
帖 子:27
专家分:0
注 册:2006-4-21
得分:0 
-----------------处理数据导航条和新增修改等事务---------------------
private void toolBar_ButtonClick(object sender, System.Windows.Forms.ToolBarButtonClickEventArgs e)
{
if (e.Button.ToolTipText == "首记录")
{
cmManage.Position = 0;
return;
}
if (e.Button.ToolTipText == "上一记录")
{
if (cmManage.Position > 0)
cmManage.Position--;
return;
}
if (e.Button.ToolTipText == "下一记录")
{
if (cmManage.Position < cmManage.Count-1)
cmManage.Position++;
return;
}
if (e.Button.ToolTipText == "尾记录")
{
cmManage.Position = cmManage.Count-1;
return;
}
if (e.Button.ToolTipText == "新增记录")
{
cmManage.AddNew();
return;
}
if (e.Button.ToolTipText == "删除记录")
{
if (MessageBox.Show("确实要删除这条记录吗?","询问",MessageBoxButtons.YesNo) == DialogResult.Yes)
{
if (cmManage.Count > 0)
cmManage.RemoveAt(cmManage.Position);
else
{
MessageBox.Show("没有可以删除的数据","提示",MessageBoxButtons.OK,MessageBoxIcon.Error);
}
return;
}
}
if (e.Button.ToolTipText == "提交修改")
{
if (this.txt1.Text.Trim() == "")
{
MessageBox.Show("职员编号不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error);
return;
}
cmManage.EndCurrentEdit();

if (this.dataSet11.职员奖励表.GetChanges() != null)
{
try
{
this.sqlDataAdapter1.Update(this.dataSet11.职员奖励表);
}
catch(Exception express)
{
MessageBox.Show(express.ToString(),"提示",MessageBoxButtons.OK,MessageBoxIcon.Error);
}
}
return;
}
if (e.Button.ToolTipText == "取消修改")
{
try
{
cmManage.CancelCurrentEdit(); //取消编辑
}
catch(Exception express)
{
MessageBox.Show(express.ToString(),"提示",MessageBoxButtons.OK,MessageBoxIcon.Error);
}
return;
}
if (e.Button.ToolTipText == "退出")
{
this.Close();
}
}

private void txt1_TextChanged(object sender, System.EventArgs e)
{

}
}
}

我新手,按书里面的代码做,可是运行提交修改的时候总是提示“列职员编号不能为空植....” 我用监视发现是调用this.dataSet11.职员奖励表.GetChanges()的时候出现问题的,这个函数植一直为空,根本没法新增记录啊,请各位大哥帮帮忙,烦死我了~~
2006-05-02 10:37
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
<%
dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)
else
set oConn=server.CreateObject("adodb.recordset")
sql1="delete from users where userid='"&Duserid&"'"
oConn.open sql1,gym_conn,1,3
Remess="成功删除会员编号为 "&Duserid&" 的记录!"
Response.Write(Remess)
oConn.Close
end if%>
改为
<%
dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)
else
sql1="delete from users where userid='"&Duserid&"'"
gym_conn.Execute(sql1)
Remess="成功删除会员编号为 "&Duserid&" 的记录!"
Response.Write(Remess)
end if%>
直接用conn删除。
2006-05-02 18:20



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-59067-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.586605 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved