主题：SQL语句问题

Dim J As Double=e.Form.controls("textbox4").text   '原始金额
Dim Z As String =e.Form.controls("combobox1").text    '状态

Dim T As Date=Date.now()   '保存当前日期

Dim cmd As new sqlcommand
cmd.c

cmd.commandtext="insert into {Card_Set} ([新增时间],[原始金额],[状态]) values('"& T &"', '"& J &"','"& Z &"')"
cmd.ExecuteReader()
运行提示如下错误，应改是SQL表达式书写错误造成的，但是我试了很多种写法仍未成功，请高手指点一下：

 

此主题相关图片如下：snap1.jpg

补充一下，我用的是Access数据库

Dim J As Double = CDbl(e.Form.controls("textbox4").text ) 

 

cmd.commandtext="insert into {Card_Set} ([新增时间],[原始金额],[状态]) values(#"& T &"#, '"& J &"','"& Z &"')"
时间类型对了，但是Double类型还是没调对

mr725你的代码是乱得，能写清楚一下吗?

狐爸，帮我解决一下嘛，我都两天没找到原因了，查了很多资料都没辙，郁闷啊

问题解决了，谢谢各位！

我的代码还犯了一个错误，所以一直通不过

如下：

Dim J As Double=e.Form.controls("textbox4").Value '原始金额

我的一个判断语句写错了 if j="" ……

我把它改成e.Form.controls("textbox4").text=“” 就通过了

 

狐爸说的：

不管是代码还是表达式，数据类型是一切的基础。

 

真是金玉良言啊！

受教了，谢谢yangming