กระทู้เก่าบอร์ด อ.Yeadram
        
           1,852   8		  
          
					  
		    URL.หัวข้อ / 
		    URL
        
        เปิดฟอร์มที่เราต้องการ      
    
      ทำการสร้างฟอร์มขึ้น2 ฟอร์มค่ะ 
เมื่อทำการกรอกข้อมูลในฟอร์มที่ 1 แล้ว เมื่อคลิกที่ปุ่มข้างหลัง ตามรูปที่ 1
จะใ้ห้เปิดฟอร์มที่ 2 เพื่อทำการกรอกข้อมูลส่วนที่เหลือลงไป
แต่เมื่อกดปุ่มข้างหลังแล้ว ฟอร์มที่ 2 จะไม่ลิงค์กับฟอร์มที่ 1 ค่ะ
จะโชว์ข้อมูลแรกของตาราง ไม่โชว์ข้อมูลที่เราคลิกค่ะ
ไม่ทราบว่าต้องเขียนโค้ดยังไงค่ะ
รูปฟอร์มที่ 1
 
    
    
  เมื่อทำการกรอกข้อมูลในฟอร์มที่ 1 แล้ว เมื่อคลิกที่ปุ่มข้างหลัง ตามรูปที่ 1
จะใ้ห้เปิดฟอร์มที่ 2 เพื่อทำการกรอกข้อมูลส่วนที่เหลือลงไป
แต่เมื่อกดปุ่มข้างหลังแล้ว ฟอร์มที่ 2 จะไม่ลิงค์กับฟอร์มที่ 1 ค่ะ
จะโชว์ข้อมูลแรกของตาราง ไม่โชว์ข้อมูลที่เราคลิกค่ะ
ไม่ทราบว่าต้องเขียนโค้ดยังไงค่ะ
รูปฟอร์มที่ 1
 
    
				8 Reply in this Topic. Dispaly 1  pages and you are on page number 1 
				
        
    1 @R06187    
        
  
      รูปฟอร์มที่ 2 ค่ะ
 
    
    
   
    
        
    2 @R06188    
        
  
      ลองค้นเวปบอร์ดนี้ด้วยคำว่า "openform" หรือ "rowsource" ดูครับ คำถามลักษณะนี้มีคนถาม-ตอบเยอะแล้ว    
    
  
        
    3 @R06191    
        
  
      ถ้าเอาแบบง่ายสุดๆก็ใช้ตัว wizard สร้าง form ที่ 2 ครับ
จะมีขั้นตอนนึงที่ถามว่าตอน open form จะให้ filter หรือไม่ ก็ตอบว่าให้ filter
แล้วก็ set บอกมันว่า filter จาก field อะไร
    
  จะมีขั้นตอนนึงที่ถามว่าตอน open form จะให้ filter หรือไม่ ก็ตอบว่าให้ filter
แล้วก็ set บอกมันว่า filter จาก field อะไร
        
    4 @R06197    
        
  
      ทำได้แล้ว 
ขอบคุณค่ะ แดน มากนะค่ะ
    
  ขอบคุณค่ะ แดน มากนะค่ะ
        
    5 @R06252    
        
  
      รบกวนถามอีกครั้งค่ะ
เมื่อเรา คลิกปุ่ม ที่ฟอร์มที่ 1 แล้วเวลาิลิงค์ไป
ฟอร์มที่ 2 ที่เราจะไม่แสดงรายละเอียดในทันที่ค่ะ
จะต้องปิดหน้าฟอร์มที่ 2 ก่อน แล้วเปิดใหม่อีกครั้งถึงจะโชว์ให้ค่ะ
ไม่ทราบว่าจะต้องเขียนโค้ด หรือว่าตั้งตรงไหนค่ะ
ขอบคุณค่ะ
    
    
  เมื่อเรา คลิกปุ่ม ที่ฟอร์มที่ 1 แล้วเวลาิลิงค์ไป
ฟอร์มที่ 2 ที่เราจะไม่แสดงรายละเอียดในทันที่ค่ะ
จะต้องปิดหน้าฟอร์มที่ 2 ก่อน แล้วเปิดใหม่อีกครั้งถึงจะโชว์ให้ค่ะ
ไม่ทราบว่าจะต้องเขียนโค้ด หรือว่าตั้งตรงไหนค่ะ
ขอบคุณค่ะ
        
    6 @R06261    
        
  
      แหล่งข้อมูลของฟอร์ม 1 คืออะไร
แหล่งข้อมูลของฟอร์ม 2 คืออะไร
เกี่ยวข้องกันหรือเปล่า มีการ Lock ข้อมูลไว้หรือเปล่า (ดูจากคุณสมบัติของฟอร์ม)
โค้ดในปุ่มคำสั่งเขียนว่าอย่างไร
ลองต่อท้ายด้วยคำสั่งว่า
Forms("ชื่อฟอร์ม2").Requery
ดูหรือยัง
    
  แหล่งข้อมูลของฟอร์ม 2 คืออะไร
เกี่ยวข้องกันหรือเปล่า มีการ Lock ข้อมูลไว้หรือเปล่า (ดูจากคุณสมบัติของฟอร์ม)
โค้ดในปุ่มคำสั่งเขียนว่าอย่างไร
ลองต่อท้ายด้วยคำสั่งว่า
Forms("ชื่อฟอร์ม2").Requery
ดูหรือยัง
        
    7 @R06269    
        
  
      คือว่าทั้งฟอร์มที่ 1 และ ฟอร์มที่ 2 เชื่อมกันด้วย filed  HN ค่ะ
โดยตอนที่สร้างการลิงค์จากฟอร์มที่ 1 ไปยังฟอร์มที่ 2
ทำตามขั้นตอนที่คุณ แดน แนะนำค่ะ
โค้ดในปุ่มคำสั่ง
Private Sub Command28_Click()
On Error GoTo Err_Command28_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "person"
    
stLinkCriteria = "[HN]=" & "'" & Me![HN] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command28_Click:
Exit Sub
Err_Command28_Click:
MsgBox Err.Description
Resume Exit_Command28_Click
    
End Sub
    
  โดยตอนที่สร้างการลิงค์จากฟอร์มที่ 1 ไปยังฟอร์มที่ 2
ทำตามขั้นตอนที่คุณ แดน แนะนำค่ะ
โค้ดในปุ่มคำสั่ง
Private Sub Command28_Click()
On Error GoTo Err_Command28_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "person"
stLinkCriteria = "[HN]=" & "'" & Me![HN] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command28_Click:
Exit Sub
Err_Command28_Click:
MsgBox Err.Description
Resume Exit_Command28_Click
End Sub
        
    8 @R06272    
        
    
      แหล่งข้อมูลของฟอร์ม 1 คืออะไร 
แหล่งข้อมูลของฟอร์ม 2 คืออะไร
แหล่งข้อมูลของพวกมัน เกี่ยวข้องกันหรือเปล่า หรือเป็นตารางเดียวกันหรือเปล่า หรือเป็นคิวรี่เดียวกันหรือเปล่า มีการ Lock ข้อมูลไว้หรือเปล่า (ดูจากคุณสมบัติของฟอร์ม)
โค้ดในปุ่มคำสั่งเขียนว่าอย่างไร
ลองต่อท้ายด้วยคำสั่งว่า
Forms("ชื่อฟอร์ม2").Requery
เช่น
ดูหรือยัง
    
  แหล่งข้อมูลของฟอร์ม 2 คืออะไร
แหล่งข้อมูลของพวกมัน เกี่ยวข้องกันหรือเปล่า หรือเป็นตารางเดียวกันหรือเปล่า หรือเป็นคิวรี่เดียวกันหรือเปล่า มีการ Lock ข้อมูลไว้หรือเปล่า (ดูจากคุณสมบัติของฟอร์ม)
โค้ดในปุ่มคำสั่งเขียนว่าอย่างไร
ลองต่อท้ายด้วยคำสั่งว่า
Forms("ชื่อฟอร์ม2").Requery
เช่น
Private Sub Command28_Click() 
DoCmd.OpenForm "person", , , "[HN]=" & "'" & Me![HN] & "'"
Forms("person").Requery 
End Sub
ดูหรือยัง
      Time: 0.4031s
    
      
		