ACCESS中写VBA代码,结果字符串变量不够用,请求帮助。
sjzh 2007-01-23 10:53:19 看了一下,也没放多少内容,居然一个String类型放不下了。
sql = "INSERT INTO invmasto ( itnbr, itcls, eitdsc, group1, group2, group3, group4, group5, indate, isupchi, " _
+ "isupeng, grpcdsc1, grpedsc1, grpcdsc2, grpedsc2, grpcdsc3, grpedsc3, grpcdsc4, grpedsc4, grpcdsc5, grpedsc5, grpcdsc6, grpedsc6, grpcdsc7, " _
+ "grpedsc7, grpcdsc8, grpedsc8, grpcdsc9, grpedsc9, grpcdsc10, grpedsc10, grpcdsc11, grpedsc11, grpcdsc12, grpedsc12, grpcdsc13, grpedsc13 );"
sql = sql + "SELECT [invmasfrom].[itnbr], [invmasfrom].[itcls], [invmasfrom].[eitdsc], [invmasfrom].[group1], [invmasfrom].[group2], [invmasfrom].[group3], [invmasfrom].[group4], [invmasfrom].[group5], [invmasfrom].[indate], [invmasfrom].[isupchi], [invmasfrom].[isupeng], [invmasfrom].[grpcdsc1], [invmasfrom].[grpedsc1], [invmasfrom].[grpcdsc2], [invmasfrom].[grpedsc2], [invmasfrom].[grpcdsc3], [invmasfrom].[grpedsc3], [invmasfrom].[grpcdsc4], [invmasfrom].[grpedsc4], [invmasfrom].[grpcdsc5], [invmasfrom].[grpedsc5], [invmasfrom].[grpcdsc6], [invmasfrom].[grpedsc6], [invmasfrom].[grpcdsc7], [invmasfrom].[grpedsc7], [invmasfrom].[grpcdsc8],"
sql = sql + "[invmasfrom].[grpedsc8], [invmasfrom].[grpcdsc9], [invmasfrom].[grpedsc9], [invmasfrom].[grpcdsc10], [invmasfrom].[grpedsc10], [invmasfrom].[grpcdsc11], [invmasfrom].[grpedsc11], [invmasfrom].[grpcdsc12], [invmasfrom].[grpedsc12], [invmasfrom].[grpcdsc13], [invmasfrom].[grpedsc13] FROM invmasfrom LEFT JOIN invmasto ON [invmasfrom].[itnbr]=[invmasto].[itnbr] WHERE ((Not ([invmasfrom].[itnbr]) Is Null) And (([invmasto].[itnbr]) Is Null));"
//观察sql变量:sql="INSERT INTO invmasto ( itnbr, itcls, eitdsc, group1, group2, group3, group4, group5, indate, isupchi, isupeng, grpcdsc1, grpedsc1, grpcdsc2, grpedsc2, grpcdsc3, grpedsc3, grpcdsc4, grpedsc4, grpcdsc5, grpedsc5, grpcdsc6, grpedsc6, grpcdsc7, grpedsc7,
CodeDb.Execute sql //出错了,因为sql变量没有形成合法的整句SQL
-----------------------------
操作系统winxp,Office2003.ACCESS
请各位高手援助