Call adoconn
mif = MsgBox("确定添加!", vbYesNo + vbQuestion, "确定")
If mif = vbYes Then
tj = " insert into user (l_name,l_phone,l_comp,l_address,l_fax,l_email,l_pos,l_web) values ('" & t_name & "','" & t_phone & "','" & t_comp & "','" & t_address & "','" & t_fax & "','" & t_email & "','" & t_pos & "','" & t_pos & "')"
MsgBox tj
conn.Execute tj    ‘提示着错误，该怎么改？
MsgBox ("添加成功!")
End If

MsgBox tj
显示的是什么呢?.把这个显示帖出来.

msgbox  tj   这句没用，主要是检查插入语句是不是正确，
conn.Execute tj      错误在这，这句诗像数据库中插入语句，但提示错误

MsgBox tj
显示的是什么呢?.把这个显示帖出来.

你数据库连接上了吗？

都说了几边了
把tj的值帖出来。

insert into user (l_name,l_phone,l_comp,l_address,l_fax,l_email,l_pos,l_web) values (''asd','asd','asd','asd','asd','asd','asd','asd','asd')

主图贴不上去
上面是msgbox  tj输出的内容

user用方括号括起来[user]
values后面的asd函有双引号..改成单引号.,

LZ能说一下是什么错误吗???
再就是你user表的字段都是字符型的吗???

能告诉我为什么吗？