一点小问题大哥大姐帮帮忙看一下,在线waiting.......

Question

我做一个向表里插入记录的程序在模块文件中做了如下函数
Public Sub insert_temp(sql As String, succed As Boolean)
  Call ConRe'是一个连接数库的函数
  con.Execute sql
End Sub如下
Public con As Connection
Public re As Recordset
Public Sub ConRe()               '连接前条件
  Set con = New Connection
  Set re = New Recordset
  Path = App.Path
  If Right(Path, 1) <> "\" Then Path = Path & "\"
  Path = Path & "message.mdb"  con.CursorLocation = adUseClient  con.Open "provider=Microsoft.JET.OlEDB.4.0 ; data source= " & PathEnd Sub我在窗体的按钮单击事件中,做如下代码
insert_sql = "insert 语句"
Call insert_temp(insert_sql,succedd)为什么一执行就出现"至少有一个参数没有指定值"是模块文件的con.Execute sql变黄了,
我是不是少了什么参数了。 

Answer 1

应该是 insert_sql = "insert 语句"
这条语句出错了,检查一下