Forgot Password ??

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

	Registered : 109,037

HOME > .NET Framework > Forum > การรับขส่ง parameter ข้ามฟอร์ม อยากได้โค้ดที่ทำการ รับ-ส่ง ค่า parameter จากฟอร์มหนึ่งไปอีกฟอร์มหนึ่ง

การรับขส่ง parameter ข้ามฟอร์ม อยากได้โค้ดที่ทำการ รับ-ส่ง ค่า parameter จากฟอร์มหนึ่งไปอีกฟอร์มหนึ่ง

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

Meaw

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

อยากได้โค้ดที่ทำการ รับ-ส่ง ค่า parameter จากฟอร์มหนึ่งไปอีกฟอร์มหนึ่ง โดยที่ฟอร์มที่ 2 มีการรับด้วย textbox อ่ะค่ะ

Tag : - - - -

Date : 2009-12-10 09:21:40

By : mameaue

View : 4481

Reply : 5

No. 1

TC Admin

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

เป็น Web หรือว่า Windows Form ครับ

Date : 2009-12-10 10:05:11

By : webmaster

No. 2

Meaw

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

เป็น เว็บค่ะ ขอแบบละเอียดเลยนะค่ะ เนื่องจากพึ่งหัดเขียนอ่ะค่ะ โดยค่า parameter หมายถึง ID ที่เป็น Primary key ของฟอร์มค่ะ

Imports System.Data.SqlClient
Imports System.Data
Imports System.Web.HttpContext

Partial Class _Default
Inherits System.Web.UI.Page
Dim addUser As Data.SqlClient.SqlParameter
Dim con As New Data.SqlClient.SqlConnection()
Dim cmd As New Data.SqlClient.SqlCommand()

Public Sub insert()
con.ConnectionString = "Data Source=YTC-MDN-MONGKOL\APLUS;Initial Catalog=AplusVSB;User ID=sa;Password=root"
cmd.CommandText = "INSERT INTO tb_CustomerProfile(CustID,CustName,CustLastname,CustSex,CustStatus,CustBirthdate,CustEducation,CustOccupation,CustPosition,CustComapany,CustIncome,CustAddress,CustProvince,CustCounrtry,CustTel,CustMobile,CustMobileBrand,CustFax,CustEmail)VALUES(@ID,@Name,@Lastname,@Sex,@Status,@Birthdate,@Education,@Occupation,@Position,@Company,@Income,@Address,@Province,@Country,@Tel,@Mobile,@Brand,@Fax,@Email)"

cmd.Parameters.Add("@ID", Data.SqlDbType.NChar).Value = txtID.Text()
cmd.Parameters.Add("@Name", Data.SqlDbType.NVarChar).Value = txtName.Text()
cmd.Parameters.Add("@Lastname", Data.SqlDbType.NVarChar).Value = txtLastname.Text()
cmd.Parameters.Add("@Sex", Data.SqlDbType.NChar).Value = dlSex.SelectedValue()
cmd.Parameters.Add("@Status", Data.SqlDbType.NVarChar).Value = rdlStatus.SelectedValue
cmd.Parameters.Add("@Birthdate", Data.SqlDbType.NVarChar).Value = txtBirthdate.Text()
cmd.Parameters.Add("@Education", Data.SqlDbType.NChar).Value = dlEducation.SelectedValue
cmd.Parameters.Add("@Occupation", Data.SqlDbType.NVarChar).Value = dlOccupation.SelectedValue
cmd.Parameters.Add("@Position", Data.SqlDbType.NVarChar).Value = txtPositon.Text()
cmd.Parameters.Add("@Company", Data.SqlDbType.NVarChar).Value = txtCompany.Text()
cmd.Parameters.Add("@Income", Data.SqlDbType.NVarChar).Value = dlIncome.SelectedValue
cmd.Parameters.Add("@Address", Data.SqlDbType.NVarChar).Value = txtAddress.Text()
cmd.Parameters.Add("@Province", Data.SqlDbType.NVarChar).Value = dlProvince.SelectedValue
cmd.Parameters.Add("@Country", Data.SqlDbType.NVarChar).Value = dlCountry.SelectedValue
cmd.Parameters.Add("@Tel", Data.SqlDbType.NVarChar).Value = txtTel.Text()
cmd.Parameters.Add("@Mobile", Data.SqlDbType.NVarChar).Value = txtMobile.Text()
cmd.Parameters.Add("@Fax", Data.SqlDbType.NVarChar).Value = txtFax.Text()
cmd.Parameters.Add("@Brand", Data.SqlDbType.NVarChar).Value = dlMobileBrand.SelectedValue
cmd.Parameters.Add("@Email", Data.SqlDbType.NVarChar).Value = txtEmail.Text()

con.Open()
cmd.Connection = con
cmd.ExecuteNonQuery()
con.Close()
End Sub

Protected Sub btSummitProfile_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btSummitProfile.Click
insert()
Response.Write(" Add Data Name : " + txtName.Text + " <hr>")
'Response.Redirect(App_Path())
Response.Redirect("http://localhost:1236/ProgramAplus/Product.aspx?ID=" + txtID.Text + "&txtName=" + txtName.Text)

End Sub
End Class

-------------
Form2

Imports System.Data.SqlClient
Imports System.Data
Imports System.Web.HttpContext
Partial Class Product
Inherits System.Web.UI.Page
Dim addUser As Data.SqlClient.SqlParameter
Dim con As New Data.SqlClient.SqlConnection()
Dim cmd As New Data.SqlClient.SqlCommand()

Protected Sub btSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btSubmit.Click

End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Response.Write("ID : " + Request.Params("ID") + " ")
Response.Write("Name : " + Request.Params("txtName") + "<hr>")
End Sub
End Class

Date : 2009-12-10 10:13:36

By : mameaue

No. 3

Codeman

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

ถ้าเป็นเว็บลองศึกษาจาก link พวกนี้ก่อนดีไม๊อ่ะครับ ทางคุณ Win เค้าทำไว้ให้เพียบเลย ไม่ไปใช้เลย น่าเสียใจนะครับ
จาก link จะเห็นว่ามีหลายวิธีมากเลยที่จะใช้ส่งข้อมูลข้าม form จริงๆ อยากถามด้วยแหละว่า ที่ว่าข้าม form เนี่ย ทำ web page 1 หน้า มีหลาย form หรือว่า ข้าม form ที่ว่าคือข้าม web page อ่ะครับ เพราะปกติเค้าใช้กัน page 1 form 1 น่ะครับ

ASP.NET Object

Date : 2009-12-10 12:14:20

By : salapao_codeman

No. 4

tun

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

Response.Redirect("http://localhost:1236/ProgramAplus/Product.aspx?ID=" + txtID.Text + "&txtName=" + txtName.Text)

ตรงนี้ผิดนะ ต้องใช้แบบ นี้ ในการส่งค่า

Response.Redirect("Product.aspx?ID=" + txtID.Text + "&txtName=" + txtName.Text)

ตอนรับค่าก็

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Response.Write("ID : " + Request.QueryString("ID") + " ")
Response.Write("Name : " + Request.QueryString("txtName") + "<hr>")
End Sub

Date : 2009-12-11 14:09:59

By : asawintunkongthaworn

No. 5

Meaw

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

ขอบคุณค่ะ

Date : 2009-12-13 03:30:10

By : mameaue

ค้นหาข้อมูล

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

Re : การรับขส่ง parameter ข้ามฟอร์ม อยากได้โค้ดที่ทำการ รับ-ส่ง ค่า parameter จากฟอร์มหนึ่งไปอีกฟอร์มหนึ่ง

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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