Forgot Password ??

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

	Registered : 109,038

HOME > ASP > ASP Forum > ปรึกษา code update ขอบคุณคะ ตอนนี้ แสดงข้อมูล while ออกมา ได้ 2 คน แต่จะส่งค่า ใน while ไปupdate โดยมี idchil เป็น PK

ปรึกษา code update ขอบคุณคะ ตอนนี้ แสดงข้อมูล while ออกมา ได้ 2 คน แต่จะส่งค่า ใน while ไปupdate โดยมี idchil เป็น PK

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

namaea

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

ตอนนี้ แสดงข้อมูล while ออกมา ได้ 2 คน แต่จะส่งค่า ใน while ไปupdate โดยมี
idchil เป็น PK
fempno เป็น FK

จะต้องส่งค่าไป update ยังไงคะ
<%
Dim Conn1
Dim sql
Dim Rs
dim n=0

Set Conn1 = Server.Createobject("ADODB.Connection")
Conn1.Open "driver={microsoft access driver (*.mdb)};DBQ= "&Server.MapPath("dbforeigner.mdb")

sql="select * from tbchild where (fempno='"&trim(request("fempno"))&"')"

Set Rs= Server.CreateObject("ADODB.recordset")
RS.open sql,Conn1,1,3

Rs("fempno")=Request("fempno")
Rs("id_child")=request("fempno")
Rs("name_child")=Request.Form("txtnamechi")
Rs("pass_no")=Request.Form("txtpasschi")
Rs("date_issue")=Request.Form("txtdischi")
Rs("date_exp")=Request.Form("txtexchi")
Rs("date_birth")=Request.Form("txtbirchi")
Rs("national")=Request.Form("txtnachi")
Rs("date_workin")=Request.Form("date_walkchi")
Rs("tmchild")=Request.Form("txttmchi")
Rs("due_date")=Request.Form("")
Rs("date_alert")=Request.Form("")
Rs.Update
Conn1.Close
response.write("<center><b>Update Data Completed!!")
%>

Tag : - - - -

Date : 2009-03-05 16:22:24

By : saowaluk

View : 1541

Reply : 3

No. 1

natforum

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

xxx = Request.Form("txtnamechi").count '---ที่จริงควรจะเป้นจำนวนที่คุณ while ออกมานะ

for i = 1 to xxx '-----ที่จริงใช้ for each ก็ได้ แต่เดี๋ยวคุณอาจจะงง

sql="select * from tbchild where (fempno='"&trim(request("fempno").item(i))&"')"
Set Rs= Server.CreateObject("ADODB.recordset")
RS.open sql,Conn1,1,3

Rs("fempno")=Request("txtnamechi").item(i)
rs อื่นๆ....
....
...

Rs.Update
rs.close
ser rs=nothing

next

ตอน ที่ while ออกมา คุณ order ยังไง ก็ให้ตอน update ใช้ order อย่างนั้น มันจะได้อัพเดทตรงกัน

Date : 2009-03-05 18:18:06

By : nat

No. 2

Guest

ใช้ request.form มาก่อน เช่น
request.form("id")
ทีนี้ถ้ามันมีรูปแบบข้างบน คือ 1 ฟอร์มมีหลายอินพุท มันจะได้มาในรูปแบบ
id = 1,3,4,5,7,8,11 อะไรแบบนี้
ก็ให้เราแบ่งแต่ละ id ออกจากกันด้วย split แล้วจึง ubound
เช่น
id = request.form("id")
aid = split(id, ", ")' ตรงนี้จะแบ่งที่มันต่อกันด้วย , ออกจากกัน
for n = 0 to ubound(aid)
sql = "select * from table where field_id = " & aid(n) & ""
' rs.open rs.update อะไรก็ว่ากันไปแล้ว
' ในกรณีของอินพุตช่องอื่นๆก็ทำเหมือนกันคือ ให้ split มันไปพร้อมๆกับ id แล้วเวลา update ใช้
' rs("name") = aname(n) โดยไม่ต้องไป for next ใหม่ เพราะจำนวนชุดใน , , มันจะได้มาเท่าๆกัน(ถ้าจำนวน input ใน form เท่าๆกัน)
next

Date : 2009-03-05 22:30:40

By : veevee

No. 3

Guest

ขอบคุณคำแนะนำคะคุณ veeveeขอบคุณมากๆๆๆออกแล้วคะ

Date : 2009-03-07 15:49:43

By : namaea

ค้นหาข้อมูล

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

Re : ปรึกษา code update ขอบคุณคะ ตอนนี้ แสดงข้อมูล while ออกมา ได้ 2 คน แต่จะส่งค่า ใน while ไปupdate โดยมี idchil เป็น PK

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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