ช่วยดูให้หน่อยครับ มือไหม่ครับแก้ไม่ผ่านสักที ใช้ vb ครั บไม่ผ่านตรง cmd.ExecuteNonQuery() error .. {"Could not find stored procedure ''."}
ใช้ vb ครั บไม่ผ่านตรง cmd.ExecuteNonQuery() มันไม่ยอมให้ผมผ่านสักทีตรง view detail มันบอกว่า {"Could not find stored procedure ''."} แต่หาไม่เหนเจอเลย
cmd.ExecuteNonQuery หรือมีตรงไหนสมควรแก้ไขนอกจากตรงนี้ก็ชี้แนะด้วยครับ ขอบคุณครับ
โค้ดครับ
Imports System.Data
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub cmdsubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdsubmit.Click
lblerror1.Text = ""
lblerror2.Text = ""
lblerror3.Text = ""
lblerror4.Text = ""
lblerror5.Text = ""
lblerror6.Text = ""
lblerror7.Text = ""
lblerror16.Text = ""
If txttfirstname.Text = "" Then
lblerror1.Text = "กรุณาป้อนชื่อ"
txttfirstname.Focus()
Return
End If
If txttsurname.Text = "" Then
lblerror1.Text = "กรุณาป้อนนามสกุล"
txttsurname.Focus()
Return
End If
If txtefirstname.Text = "" Then
lblerror2.Text = "Please Enter FirstName"
txtefirstname.Focus()
Return
End If
If txtesurname.Text = "" Then
lblerror2.Text = "Please Enter SurName"
txtesurname.Focus()
Return
End If
If txtno.Text = "" Then
lblerror3.Text = "กรุณาป้อนรหัสนักศึกษา"
txtno.Focus()
Return
End If
If txtbirth.Text = "" Then
lblerror4.Text = "กรุณาป้อนวันเกิด"
txtbirth.Focus()
Return
End If
If txtage.Text = "" Then
lblerror5.Text = "กรุณาระบุอายุของคุณ"
txtage.Focus()
Return
End If
If txtreligion.Text = "" Then
lblerror6.Text = "กรุณาระบุศาสนาของคุณ"
txtreligion.Focus()
Return
End If
If txtid.Text = "" Then
lblerror7.Text = "กรุณาป้อนเลขบัตรประชาชน"
txtid.Focus()
Return
End If
If txtmobile.Text = "" Then
lblerror16.Text = "กรุณาป้อนเบอร์มือถือ"
txtmobile.Focus()
Return
End If
Dim strConn As String = "Data Source=MICROSOF-8D54CE\SQLEXPRESS2;" & _
"Initial catalog=Personal_Information;" & _
"Persist security info =True;" & _
"User ID =sa;" & _
"Password =1234;"
Dim objConn As New SqlConnection(strConn)
objConn.Open()
Dim cmdSQL As String = " INSERT INTO dbo.TBL_Personal,dbo.TBL_Address,dbo.TBL_Education" & _
"(I_no,Th_name,Th_surname,Eng_name,Eng_surname,Date_of_Birth,Age,Religion,I_id,Mobile_phone,Home_number,Soi,Road,Zone,District,Province,Post_code,Telephon,E_mail,Education,Year,Seniority,Society,Subjects)" & _
" VALUES(@I_no,@Th_name,@Th_surname,@Eng_name,@Eng_surname,@Date_of_Birth,@Age,@Religion,@I_id,@Mobile_phone,@Home_number,@Soi,@Road,@Zone,@District,@Province,@Post_code,@Telephon,@E_mail,@Education,@Year,@Seniority,@Society,@Subjects)"
Dim cmd As New SqlCommand(cmdSQL, objConn)
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add(New SqlParameter("@I_no", txtno.Text))
cmd.Parameters.Add(New SqlParameter("@Th_name", txttfirstname.Text))
cmd.Parameters.Add(New SqlParameter("@Th_surname", txttsurname.Text))
cmd.Parameters.Add(New SqlParameter("@Eng_name", txtefirstname.Text))
cmd.Parameters.Add(New SqlParameter("@Eng_surname", txtesurname.Text))
cmd.Parameters.Add(New SqlParameter("@Date_of_Birth", txtbirth.Text))
cmd.Parameters.Add(New SqlParameter("@Age", txtage.Text))
cmd.Parameters.Add(New SqlParameter("@Religion", txtreligion.Text))
cmd.Parameters.Add(New SqlParameter("@I_id", txtid.Text))
cmd.Parameters.Add(New SqlParameter("@Mobile_phone", txtmobile.Text))
cmd.Parameters.Add(New SqlParameter("@Home_number", txthnumber.Text))
cmd.Parameters.Add(New SqlParameter("@Soi", txtsoi.Text))
cmd.Parameters.Add(New SqlParameter("@Road", txtroad.Text))
cmd.Parameters.Add(New SqlParameter("@Zone", txtzone.Text))
cmd.Parameters.Add(New SqlParameter("@District", txtdistrict.Text))
cmd.Parameters.Add(New SqlParameter("@Province", txtprovince.Text))
cmd.Parameters.Add(New SqlParameter("@Post_code", txtcode.Text))
cmd.Parameters.Add(New SqlParameter("@Telephon", txttele.Text))
cmd.Parameters.Add(New SqlParameter("@E_mail", txtmail.Text))
cmd.Parameters.Add(New SqlParameter("@Education", txtedu.Text))
cmd.Parameters.Add(New SqlParameter("@Year", txtyear.Text))
cmd.Parameters.Add(New SqlParameter("@Seniority", txtse.Text))
cmd.Parameters.Add(New SqlParameter("@Society", txtso.Text))
cmd.Parameters.Add(New SqlParameter("@Subjects", txtsu.Text))
cmd.ExecuteNonQuery() ---------------------------------------------------------------------ติดตรงเนี๊ยะครับ
objConn.Close()
lblerrorr.Text = "Successfully Insert : " & txtefirstname.Text & " " & txtesurname.Text
txttfirstname.Text = ""
txtefirstname.Text = ""
txttfirstname.Focus()
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
txttfirstname.Text = ""
txttsurname.Text = ""
txttfirstname.Focus()
End If
End Sub
End ClassTag : - - - -
Date :
2009-10-21 23:39:26
By :
ขอคำชี้แนะ
View :
2234
Reply :
3
ให้คุณเปลี่ยน cmd.CommandType = CommandType.StoredProcedure
เป้น cmd.CommandType = CommandType.Text ครับ
จาก Programmer ด้อยปัญญา
Date :
2009-10-22 08:26:51
By :
anucham
แง้ๆๆๆๆๆ ยังแก้ไม่ได้เลยครับ มันมีปันหาตรง cmd.ExecuteNonQuery() เหมือนเดิมครับ
มันขึ้นบอกมาราวๆนี้อ่ะครับ ไม่รุมันเป็นอะไร-.- ยังไงก็ขอบคุณทุกท่านไว้ล่วงหน้าเน้อครับ
มันบอกว่างี้ๆๆ -*-
System.Data.SqlClient.SqlException was unhandled by user code
Class=15
ErrorCode=-2146232060
LineNumber=1
Message="Incorrect syntax near ','."
Number=102
Procedure=""
Server=".\SQLExpress2"
Source=".Net SqlClient Data Provider"
State=1
StackTrace:
at System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection)
at System.Data.SqlClient.SqlInternalConnection.OnError(SqlException exception, Boolean breakConnection)
at System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject stateObj)
at System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior, SqlCommand cmdHandler, SqlDataReader dataStream, BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject stateObj)
at System.Data.SqlClient.SqlCommand.FinishExecuteReader(SqlDataReader ds, RunBehavior runBehavior, String resetOptionsString)
at System.Data.SqlClient.SqlCommand.RunExecuteReaderTds(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, Boolean async)
at System.Data.SqlClient.SqlCommand.RunExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, String method, DbAsyncResult result)
at System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult result, String methodName, Boolean sendToPipe)
at System.Data.SqlClient.SqlCommand.ExecuteNonQuery()
at _Default.cmdsubmit_Click(Object sender, EventArgs e) in C:\SQLzz\ASPSQLzz\Default.aspx.vb:line 112
at System.Web.UI.WebControls.Button.OnClick(EventArgs e)
at System.Web.UI.WebControls.Button.RaisePostBackEvent(String eventArgument)
at System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument)
at System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument)
at System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData)
at System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint)
InnerException:
Date :
2009-10-22 21:47:11
By :
คนเดิม
จำไว้อย่างนะครับว่าถ้าเป็นการเพิ่มข้อมูลลงทุกฟิลด์แล้วล่ะก็ชื่อฟิลด์เราไม่จำเป็นต้องระบุก็ได้ครับ ให้เขียนแบบนี้เลย Insert into tablename values(value,value,value) แบบนี้ครับ ผมดูแล้วจะน่าผิดตรง l_no นะ
Date :
2009-10-24 16:47:00
By :
anucham
Load balance : Server 02