数据转换帮帮忙

郭永巍　发表于：2008-09-18 16:07:11 　

Private Sub Command9_Click()
DoCmd.SetWarnings False
p = Me.a3

For i = 1 To p
DoCmd.RunSQL "INSERT INTO 表1 ( a1,a2,a3) SELECT [表2].[a1], [表2].[a2], [表2].[a3] "
Next
End Sub

这个只能把一个数据分解转换了,问怎么能把所有数据一次都转换了

黎红军发表于：2008-09-21 23:45:27

看不出你的需求：不知你说的一个数据是一行纪录，还是所得为同样的纪录。

感觉你的sql语句中应当还有个where条件语句，这样用你的循环语句才能执行找出不通的纪录，然后执行符合条件的纪录。

总记录：1篇页次：1/1 9 1 :

Access交流中心