7457.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 30 行

HTML
30
字号
<html>
  <head>
    <title>QueryDef 的错误</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>QueryDef 的错误</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:lyc5868@,s3.hinet.net">刘永淳</a> on November 18, 1998 at 23:00:10:<p>
......<br>On Error GoTo ErrorAction<br>Dim TempSQL As QueryDef<p>Set TempSQL = mainDB.CreateQueryDef("")<br>DBEngine.Workspaces(0).BeginTrans<br>TempSQL.SQL = "insert into classroom (教室代码,教室名称,使用简介)" & <br> values ('" & Trim(txt_ClassroomID.Text) & "','" & Trim(txt_ClassroomName.Text) & "','" & Trim(txt_classroom.Text) & "')"<br>TempSQL.Execute<br>DBEngine.Workspaces(0).CommitTrans<p>于程式开头有加上 ON ERROR GOTO ERRORHANDLE<br>资料库为 Access 97 <br>Tablename : classroom<br>PrimaryKey : 教室代码<p>若于 insert into 中 栏位[教室代码] 所给予值已存在于 table 中<br>因其设定为PrimaryKey 不会新增成功<br>但却不会有error发生,使on error 无作用<br>请问<br>  我该如何判断此段Transaction是否成功<p>请各方高手帮忙
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 7457-->
<!--top: 7471--><li><a href="7471.html">Re: QueryDef 的错误</a> <b>MM</b> <i>14:03:57 11/19/98</i>
(<!--responses: 7471-->1)
<ul><!--insert: 7471-->
<!--top: 7543--><li><a href="7543.html">Re: QueryDef 的错误</a> <b>CYH</b> <i>06:10:20 11/22/98</i>
(<!--responses: 7543-->0)
<ul><!--insert: 7543-->
</ul><!--end: 7543-->
</ul><!--end: 7471-->
</ul><!--end: 7457-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?