vb 程序出现错误:缺少语句结束

来源：百度知道编辑：UC知道时间：2024/05/21 22:58:38

Private Sub Form_Load()
Me.datPrimaryRS.ConnectionString = "provider=microsoft.jet.oledb.8.51;data source=" & App.Path & " \ database \企业收文管理系统97.mdb;"
Me.datPrimaryRS.RecordSource = "select 收文编号,收文日期,操作人员,来文机关,原文编号,内部编号,保密等级,内容概要,"
领导批示,处理部门,签收人员,签收日期,催办情况,归还日期,归档号码,存放位置,备注 from 来文信息表 order by 收文日期"
Me.datPrimaryRS.Refresh
End Sub
错误提示出现在到数第三行的FROM上，提示“编译错误：缺少语句结束”。
这段代码是书上的，我输入的时候出现了错误提示，这是为什么呢？
还有就是第一条语句中的绝对路径如何改成相对路径呢？比如数据库文件保存在e:\access下。
vb是6.0的!

第三行不要分开写，把中间的引号删掉，如下：

Me.datPrimaryRS.RecordSource = "select 收文编号,收文日期,操作人员,来文机关,原文编号,内部编号,保密等级,内容概要,领导批示,处理部门,签收人员,签收日期,催办情况,归还日期,归档号码,存放位置,备注 from 来文信息表 order by 收文日期"

第一句就是相对的啊，改成绝对的是：
Me.datPrimaryRS.ConnectionString = "provider=microsoft.jet.oledb.8.51;data source=e:\access\database\企业收文管理系统97.mdb;"

第二、三行的文本不能在两行中，应该放在一行中。
第二、三行的代码可改为（单行）（部分内容以...省略）：
Me.dat...内容概要,领导批示,处理部门,... order by 收文日期"
或者改为(两行):
Me.dat...保密等级,内容概要," & _
"领导批示,... order by 收文日期"

vb 程序出现错误:缺少语句结束 asp错误,缺少语句 VB声明出现缺少行号或标签或语句或语句结束 vb程序的一个sql语句,错误在哪这个vb程序哪里出现了错误？ VB使用select语句查询出现错误的问题 ASP程序缺少END语句 vb 程序语句出错 VB中缺少语句结束！到底怎么办在代码中加了Option Explicit出现“缺少语句”的错误，怎么回事啊？