不用其它变量能不能这样插入值？

Question

Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID)values('"&Zhanghubianhao.Text&"','"&ContractID.Text&"','"&ServiceType.Selectedvalue&"','"&AgentID.Selectedvalue&"')"

Answer 1

Zhanghubianhao_Text = Zhanghubianhao.Text 
...
...Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID)values('@Zhanghubianhao_Text','@ContractID_Text','@ServiceType_Selectedvalue','@AgentID_Selectedvalue')"

Answer 2

Zhanghubianhao_Text = Zhanghubianhao.Text 
...
...Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID)values('@Zhanghubianhao_Text','@ContractID_Text','@ServiceType_Selectedvalue','@AgentID_Selectedvalue')"
==========
错！
第一楼主要求不要其它变量
第二即使你使用参数，也不应该在双引号吧？Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID)values(@Zhanghubianhao_Text,@ContractID_Text,@ServiceType_Selectedvalue,@AgentID_Selectedvalue)"我认为应该这样！

Answer 3

Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID) values ('"&Zhanghubianhao.Text&"','"&ContractID.Text&"','"&ServiceType.Selectedvalue&"','"&AgentID.Selectedvalue&"')"你看看什么错误，单步调试一下，看看字符串是什么，就很容易找到错误了
注意一下你的ServiceType.Selectedvalue，和AgentID.Selectedvalue看看对么？values前后要有空格吧？

Answer 4

楼上说的对，跟踪调试一下，看看生成的sql语句是什么？
Response.Write(StrCmd2);
把输出的Sql语句拷贝到查询分析器中，就很清楚了。

Answer 5

这样不好,容易被SQL注入.应改为参数方式:
Dim StrCmd2 As String="insert into ContractInfo(Zhanghubianhao,ContractID,ServiceType,AgentID)values(@Zhanghubianhao,@ContractID,@ServiceType,@AgentID)"
然后:
dim cmd as new SqlCommand();
cmd.Parameter.Add("@Zhanghubianhao",Zhanghubianhao.Text.Trim())
...