asp.net BOF或EOF有一个是真，或者当前记录已被删除

我们这时要做的就是在使用Recordset对象的moveNext 等方法之前先利用RecordsetCount属性判断一下数据库中的数据是否为空方法：


代码如下:

dim objRs as New Recordset
dim objCn as New connection
dim strSql as string
objCn.ConnectionString="fileDsn=student.dsn;User_Id=sa;PassWord=123"
objcn.open
strSql="SELECT * FROM Student_info"
objRs.Open strSql ,objCn,adOpenKeyset, adLockOptimistic
'在这判断，若为空则告知用户并退出该模块操作就行了
if objRS.RecordsetCount=0 then
msgbox "学籍信息不存在，请补充后在操作！"
objRs.Close
Set objRs=Nothing
exit sub '这一步可别忘了，要不然还得报错，原因是依旧执行了以后的操作
end if (){
}

这样就可以解决了这个问题，然后继续以后的操作即可，如果我们事先编写了链接数据库并将记录返回给Recordset的函数，则步骤可以省略点了！

赞 (0)

相关推荐

  • asp.net BOF或EOF有一个是真，或者当前记录已被删除

    我们这时要做的就是在使用Recordset对象的moveNext 等方法之前先利用RecordsetCount属性判断一下数据库中的数据是否为空方法: 复制代码 代码如下: dim objRs as New Recordset dim objCn as New connection dim strSql as string objCn.ConnectionString="fileDsn=student.dsn;User_Id=sa;PassWord=123" objcn.open st

  • 用Asp与XML实现交互的一个实例源码

    XML 是标准扩展语言,是未来Web编程的标准,asp 是现在广为流传的web编程语言之一,能不能让他们两个联合起来发挥作用呢?豆腐在这里给大家提供一个很简单的Asp与XML实现交互的一个实例源例子关于XML和XSL限于篇幅和知识水平豆腐就不在这里献丑了下面首先来说说几个需要用到的文件的内容.  testXsl.xsl:  复制代码 代码如下: <?xml version='1.0'?>   <xsl:stylesheet xmlns:xsl="http://www.w3.or

  • 在ASP.NET 2.0中操作数据之十七：研究插入、更新和删除的关联事件

    在ASP.NET 2.0中操作数据之十七：研究插入、更新和删除的关联事件

    导言 当使用GridView.DetailsView或FormView控件的内建插入.编辑或删除特征时,在用户添加一条新记录或更新/删除一条现在记录的过程中发生了多个步骤.正如我们之前一节里所讨论的,在GridView中编辑一行时,保存(Update)和取消(Cancel)按钮将取代编辑(Edit)按钮,并且绑定列转换成TextBox.在用户更新了数据并点击保存按钮之后,下述步骤在回传时执行: 1.该GridView控件根据当前编辑行的唯一标识字段(通过DataKeyNames属性)组装它的Ob

  • 使用jQuery实现一个类似GridView的编辑,更新,取消和删除的功能

    使用jQuery实现一个类似GridView的编辑,更新,取消和删除的功能

    先来看看下面实时效果演示: 用户点击编辑时,在点击行下动态产生一行.编辑铵钮变为disabled. 新产生的一行有更新和取消的铵钮,点击"取消"铵钮,删除刚刚动态产生的行.编辑铵钮状态恢复. 更新与删除铵钮功能没有什么特别的. 在ASP.NET MVC视图html代码如下,普通的表格table,普通的html标签: 删除的铵钮功能: $('.Delete').click(function () { var flag = confirm('你确认是否删除记录?'); if (flag)

  • Django创建一个后台的基本步骤记录

    1.首先分析要做的项目的结构,整理出关系图 2.运行 python manage.py startapp XXX 创建一个app 3.根据关系图设计models层,理清关系,设计好数据结构 4.在settings的位置配置app所在的位置 5.运行python manage.py makemigrations 6.运行 python manage.py migrate 7配置后台 建议运用装饰器如下: @admin.register(模块类名) class 模块类名Admin(admin.Mod

  • 服务器安全狗导致ASP.NET网站运行出错的一个案例

    字典中的关键字:"RegistryPermission"所添加的关键字:"RegistryPermission" 报错,因为服务器上安全狗对.net程序关键字过于苛刻引出报错. 今天碰到一个.net的报错,之前并没见过这种报错,也没有太多的详细信息."/"应用程序中的服务器错误. 字典中的关键字:"RegistryPermission"所添加的关键字:"RegistryPermission" 说明: 执行当

  • asp.net 该行已经属于另一个表错误的解决方法

    复制代码 代码如下: DataTable dt = new DataTable(); dt = ds.Tables["All"].Clone();//克隆All的结构传递给dt DataRow[] dr=this.dataSet31.Tables["Product"].Select("bc=1"); //通过条件得到符合条件的行 for(int i=0;i<dr.Length;i++) { //将数组元素加入表... dt.Rows.Add

  • Asp限制IP访问 阻止某一个IP段禁止访问本站的代码

    复制代码 代码如下: <% ''获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR") ''允许的IP地址段为10.0.0.0-10.68.63.255 allowip1="10.0.0.0" allowip2="10.68.10.71" response.writecheckip(ip,allowip1,allowip2) functioncheckip(ip,allowip1,allowip

  • asp+正则获得字符串中最后一个字母非字母不算

    复制代码 代码如下: Function getLastWord(str) Set regEx = New RegExp regEx.Pattern = "(.*)([a-zA-Z])[^a-zA-Z]*" regEx.IgnoreCase = false regEx.Global = True str = regEx.Replace(str,"$2") getLastWord = str Set reg=nothing End Function str="

  • asp.net中利用正则表达式判断一个字符串是否为数字的代码

    复制代码 代码如下: publicstaticbool IsNumeric(string value) { return Regex.IsMatch(value, @"^[+-]?\d*[.]?\d*$"); } publicstaticbool IsInt(string value) { return Regex.IsMatch(value, @"^[+-]?\d*$"); } publicstaticbool IsUnsign(string value) { r

随机推荐