เปลี่ยนชนิดข้อมูล number เป็น string ในโค้ด


0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

15 ก.ย. 63 , 22:12:18
อ่าน 520 ครั้ง

napat2020

  • สมาชิกไท.Access
  • กระทู้: 16

  • ขอบคุณ ไท.Access

    • ดูรายละเอียด

สวัสดีครับ
จากโค้ดด้านล่าง ต้องการลบข้อมูลในตาราง โดยใช้เงื่อนไข อ้างอิงให้ลบจาก
bsCode ขีดเส้นใต้ ซึ่งตอนนี้เป็นข้อมูลชนิดตัวเลข number อยู่ครับ ถ้าต้องการเปลี่ยนข้อมูลชนิดเป็น string จะต้องเขียนอย่างใดครับ
ขอบคุณครับผม
   
 If Not (Me.frmBaseGoodsSub.Form.Recordset.EOF And Me.frmBaseGoodsSub.Form.Recordset.BOF) Then
        If MsgBox(" Are you sure to delete?", vbYesNo) = vbYes Then
            CurrentDb.Execute "DELETE FROM tblBaseGoods " & _
            " WHERE bsCode=" & Me.frmBaseGoodsSub.Form.Recordset.Fields("bsCode")

        End If

     

 

16 ก.ย. 63 , 08:53:54
ตอบกลับ #1

PNR

: เปลี่ยนชนิดข้อมูล number เป็น string ในโค้ด
« ตอบกลับ #1 เมื่อ: 16 ก.ย. 63 , 08:53:54 »
ปกติจะใช้ single quote แต่จะอ้างอิง ตัว control ไม่ใช้ Field แต่ลองดูว่าได้หรือไม่
If Not (Me.frmBaseGoodsSub.Form.Recordset.EOF And Me.frmBaseGoodsSub.Form.Recordset.BOF) Then
        If MsgBox(" Are you sure to delete?", vbYesNo) = vbYes Then
            CurrentDb.Execute "DELETE FROM tblBaseGoods " & _
            " WHERE bsCode='" & Me.frmBaseGoodsSub.Form.Recordset.Fields("bsCode") & "'"


ปกติผมจะใช้

If MsgBox(" Are you sure to delete?", vbYesNo) = vbYes Then
            CurrentDb.Execute "DELETE FROM tblBaseGoods " & _
            " WHERE bsCode='" & Forms![ชื่อฟอร์มหลัก]!frmBaseGoodsSub!txtbsCode & "'"
            Forms![ชื่อฟอร์มหลัก]!frmBaseGoodsSub.Requery 'ให้แสดงรายการใหม่หลังจากลบไป
End If


txtbsCode
คือ textbox ที่ Bound Field bsCode
« แก้ไขครั้งสุดท้าย: 16 ก.ย. 63 , 09:59:40 โดย PNR »
Time to stop for me  :dizzy:
 
โพสต์นี้ได้รับคำขอบคุณจาก: napat2020

16 ก.ย. 63 , 21:46:07
ตอบกลับ #2

napat2020

  • สมาชิกไท.Access
  • กระทู้: 16

  • ขอบคุณ ไท.Access

    • ดูรายละเอียด

: เปลี่ยนชนิดข้อมูล number เป็น string ในโค้ด
« ตอบกลับ #2 เมื่อ: 16 ก.ย. 63 , 21:46:07 »
สวัสดีครัยคุณ PNR
ผมใช้ตัวแรกที่คุณ PNR แนะนำใช้ได้เลยครับผม ขอบคุณมากครับ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย