关于listview与数据库的问题，请大家帮我看看程序出错在哪？谢谢!!

[huishe]

For i = 1 To lvr71_1.ListItems.Count
If lvr71_1.ListItems(i).Checked Then
aa = lvr71_1.ListItems(i).ListSubItems(2).Text
g_strSQL = "insert r71(


r71_001,r71_002,r71_003,r71_004,r71_005,r71_006,r71_007, r71_008,r71_009,r71_010,r71_011,r71_012,
r71_013,r71_014,r71_015 )" _
& "values( select r71_001,r71_002,r71_003,r71_004,r71_005,r71_006,r71_007,r71_008,0,r71_010,r71_011,'2','" _
& txtto(1).Text & "'," _
& "r71_014,0 " _
& " where r71_001 = '" & txtto(7).Text & "'" _
& "and r71_002 = '" & txtto(8).Text & "'" _
& "and r71_003 = '" & aa & "'" _
& "and r71_012 ='1')"
Debug.Print g_strSQL
g_Cnn.Execute (g_strSQL)

End If

Next



r71表包含着入库单，和出库单，运行时，它显示insert 语句出错，
不好意思，代码没有对齐，看得比较吃力

[毛仁胜]

InSert标准语法：
Insert Into <TableName> [(col1,col2,......)] [Values (var1,var2,......)]

[fling_boy]

设置断点，运行到这里单步测试。
把g_strSQL的内容打印在立即窗口。
再把结果在查询分析器一类的工具中找出sql 语句的错误再说。

g_Cnn.Execute (g_strSQL) 这以前的语句应该没错吧，只是生成的sql 出错了.

[programart_life]

少了一个Into
应该是Insert Into 表名（字段名，字段名,.............) values (数据，数据..................)

[Jugular_Phoenix]

SQL 语句错误：
Insert into 表名(字段名) values(对应字段的值)
或者
Insert into 表名(字段名）select 字段 From 表名
Where 条件

[kmcyz]

INSERT少了INTO
SELECT少了FROM

[linfuyong]

语法错误INSERT INTO
不知道字段是否有数字的，有的话插入值不用加引号

[lxcc]

For i = 1 To lvr71_1.ListItems.Count
If lvr71_1.ListItems(i).Checked = True Then
aa = lvr71_1.ListItems(i).ListSubItems(2).Text
g_strSQL = "insert into r71 (r71_001,r71_002,r71_003,r71_004,r71_005,r71_006,r71_007,r71_008,r71_009,r71_010,r71_011,r71_012,r71_013,r71_014,r71_015 ) "
g_strSQL = g_strSQL & "values( select r71_001,r71_002,r71_003,r71_004,r71_005,r71_006,r71_007,r71_008,0,r71_010,r71_011,'2',"
g_strSQL = g_strSQL & "'" & txtto(1).Text & " ',"
g_strSQL = g_strSQL & "r71_014,0 "
g_strSQL = g_strSQL & "where r71_001 = '" & txtto(7).Text & "' "
g_strSQL = g_strSQL & "and r71_002 = '" & txtto(8).Text & "' "
g_strSQL = g_strSQL & "and r71_003 = '" & aa & "' "
g_strSQL = g_strSQL & "and r71_012 ='1')"
Debug.Print g_strSQL
g_Cnn.Execute (g_strSQL)

End If

Next

[lxcc]

抱歉
你的 sql 中 select 是怎么回事？

[liutl1]

sql语句错了