Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,037

HOME > .NET Framework > Forum > การ inser tข้อมูล โดยเลือกใน DropDownlist...คือเวลาเลือกแล้วมันinsert ได้แต่ค่าแรกไม่ว่าเราจะเลือกอันไหนมันก็insertแต่ค่าแรกค่ะ

การ inser tข้อมูล โดยเลือกใน DropDownlist...คือเวลาเลือกแล้วมันinsert ได้แต่ค่าแรกไม่ว่าเราจะเลือกอันไหนมันก็insertแต่ค่าแรกค่ะ

เริ่มหัวข้อใหม่

noonee

โพสกระทู้ ( 60 )
บทความ ( 0 )

strSQL = "INSERT INTO tb_book(book_id,book_name,book_by,book_number,book_detail,book_price,type_id)"
strSQL &= " VALUES ('" & txtbook_id.Text & "',"
strSQL &= "'" & txtbook_name.Text & "',"
strSQL &= "'" & txtbook_by.Text & "',"
strSQL &= "'" & txtbook_number.Text & "',"
strSQL &= "'" & txtbook_detail.Text & "',"
strSQL &= "'" & txtbook_price.Text & "',"
strSQL &= "'" & Me.listtype_id.SelectedItem.Value & "')"

With objCmd
.Connection = objCon
.CommandText = strSQL
.CommandType = CommandType.Text
End With
Try
objCmd.ExecuteNonQuery()
Me.lblstatus.Text = "บันทึกข้อมูลเรียบร้อยแล้ว"
Me.lblstatus.Visible = True
Response.Redirect("frm_insert.aspx")
Catch ex As Exception
Me.lblstatus.Visible = True
Me.lblstatus.Text = " ไม่สามารถบันทึกข้อมูลได้(" & ex.Message & ")"
End Try

ช่วยดูให้ทีค่ะ เวลา inser tข้อมูล ใน DropDownlist คือเวลาเลือกแล้วมันinsert ได้แต่ค่าแรกไม่ว่าเราจะเลือกอันไหนมันก็insertแต่ค่าแรกค่ะ คัยก็ได้ช่วยทีค่ะ ต้องการด่วนมากเลยค่ะ

Tag : - - - -

Date : 2010-01-17 16:15:06

By : neenarat

View : 1833

Reply : 6

No. 1

vbcrazy

โพสกระทู้ ( 168 )
บทความ ( 0 )

น่าจะผิดตอน select ข้อมูลออกมาแสดงที่ DropDownlist นะครับ

เช่น เวลา select ข้อมูลมาจาก database เพื่อ แสดงใน DropDownlist ให้ เขียน โค๊ดประมาณนี้ ครับ

dim strsql="select typeid,typename from booktype"
dim dt as datatable
dt=getDatatable(strsql)
combobox.ValueMember = "typeid"
combobox.DisplayMember = "typename "
combobox.DataSource = dt

Date : 2010-01-17 18:44:12

By : msorawich

No. 2

noonee

โพสกระทู้ ( 60 )
บทความ ( 0 )

คือว่า select มาแล้วค่ะมันก็มีให้เลือกนะค่ะแต่เวลาเลือกไปแล้วไปดูในฐานข้อมูลมันก็เป็นค่าแรกไม่เป็นค่าที่เราเลือกไปค่ะ

Date : 2010-01-17 21:58:19

By : neenarat

No. 3

noonee

โพสกระทู้ ( 60 )
บทความ ( 0 )

แต่โค้ดที่ select เป็นอย่างนี้ค่ะพี่ช่วยแก้ให้หน่อยนะได้ป่าวค่ะแล้วโค้ดที่ให้ดูนี่มันใช่อ่ะเปล่าค่ะ
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim objCon As OleDbConnection
Dim dtAdapter As OleDbDataAdapter
Dim dt As New DataTable

Dim strCon As String
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/mydatabase.mdb") & ";"
objCon = New OleDbConnection(strCon)
objCon.Open()

Dim strSQL As String
strSQL = "SELECT *FROM tb_type"
dtAdapter = New OleDbDataAdapter(strSQL, objCon)
dtAdapter.Fill(dt)
dtAdapter = Nothing
objCon.Close()
objCon = Nothing
With Me.listtype_id
.DataSource = dt
.DataTextField = "type_name"
.DataValueField = "type_id"
.DataBind()

End With
listtype_id.SelectedIndex = listtype_id.Items.IndexOf(listtype_id.Items.FindByValue("type_id"))
End Sub

ส่วนอันนี้เป็นส่วนที่ insert ค่ะ

Protected Sub save_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles save.Click
Dim strConn As String
Dim strSQL As String
Dim objCmd As New OleDbCommand
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/mydatabase.mdb") & ";"

Dim objCon As New OleDbConnection(strConn)
objCon.Open()
strSQL = "INSERT INTO tb_book(book_id,book_name,book_by,book_number,book_detail,book_price,type_id)"
strSQL &= " VALUES ('" & txtbook_id.Text & "',"
strSQL &= "'" & txtbook_name.Text & "',"
strSQL &= "'" & txtbook_by.Text & "',"
strSQL &= "'" & txtbook_number.Text & "',"
strSQL &= "'" & txtbook_detail.Text & "',"
strSQL &= "'" & txtbook_price.Text & "',"
strSQL &= "'" & Me.listtype_id.SelectedItem.Value & "')"

With objCmd
.Connection = objCon
.CommandText = strSQL
.CommandType = CommandType.Text
End With
Try
objCmd.ExecuteNonQuery()
Me.lblstatus.Text = "บันทึกข้อมูลเรียบร้อยแล้ว"
Me.lblstatus.Visible = True
Response.Redirect("frm_insert.aspx")
Catch ex As Exception
Me.lblstatus.Visible = True
Me.lblstatus.Text = " ไม่สามารถบันทึกข้อมูลได้(" & ex.Message & ")"
End Try

Date : 2010-01-17 22:06:56

By : neenarat

No. 4

numenoy

โพสกระทู้ ( 373 )
บทความ ( 0 )

strSQL &= "'" & Me.listtype_id.SelectedItem.Value & "')"
ลองเปลี่ยนเป็น
strSQL &= "'" & Me.listtype_id.SelectedText & "')"

Date : 2010-01-21 15:42:59

By : numenoy

No. 5

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

เกิดจากตอนที่ Page_Load() มันไปทำ Sub ของ DropDownList อีกครั้งน่ะครับ จะต้องดักด้วยตัวนี้ครับ

Code (VB.NET)

IF NOT Page.IsPostBack() Then
 BindDropdownlist
End IF

Date : 2010-08-05 17:35:53

By : webmaster

No. 6

NiCkyShOx

โพสกระทู้ ( 18 )
บทความ ( 0 )

ตามที่ท่าน NO.5 (Mr.Win) บอกครับ
เพราะถ้าทำการกดปุ่ม Insert เสร็จแล้ว
ก่อนไปทำงานใน Sub Insert เพจจะทำการเข้ามาทำงานใน Sub Page_Load ก่อนครับแล้วถึงจะไป Sub insert
ทำให้ dropdownlist ของเรามีการโหลดค่าจากฐานข้อมูลใหม่ทุกครั้ง
แล้วไปเจอคำสั่งเซ็ตให้เลือก index แรกของ dropdown ครับ

Code (VB.NET)

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


Dim objCon As OleDbConnection
Dim dtAdapter As OleDbDataAdapter
Dim dt As New DataTable

'ใส่ตรงนี้เพิ่มครับ 
IF NOT Page.IsPostBack() Then

Dim strCon As String
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/mydatabase.mdb") & ";"
objCon = New OleDbConnection(strCon)
objCon.Open()

Dim strSQL As String
strSQL = "SELECT *FROM tb_type"
dtAdapter = New OleDbDataAdapter(strSQL, objCon)
dtAdapter.Fill(dt)
dtAdapter = Nothing
objCon.Close()
objCon = Nothing
With Me.listtype_id
.DataSource = dt
.DataTextField = "type_name"
.DataValueField = "type_id"
.DataBind()

End With
listtype_id.SelectedIndex = listtype_id.Items.IndexOf(listtype_id.Items.FindByValue("type_id"))

end if 
End Sub

ประวัติการแก้ไข
2010-08-06 09:13:10
2010-08-06 09:15:11

Date : 2010-08-06 09:11:29

By : nickyshox99

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : การ inser tข้อมูล โดยเลือกใน DropDownlist...คือเวลาเลือกแล้วมันinsert ได้แต่ค่าแรกไม่ว่าเราจะเลือกอันไหนมันก็insertแต่ค่าแรกค่ะ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก