ProjectForStudy

 ลืมรหัสผ่าน
 ลงทะเบียน
ค้นหา
ดู: 211|ตอบกลับ: 2

[ถาม/ตอบ] ช่วยดูโค๊ดค้นหาให้ด้วยครับ Error ครับ

[คัดลอกลิงก์]
  • อารมณ์วันนี้
    สู้
    2020-2-29 09:00
  • เช็คชื่อแล้ว: 63 วัน

    [LV.6]JuniorII

    1

    กระทู้

    78

    โพสต์

    346

    เครดิต

    CodeDragon

    Rank: 2

    เครดิต
    346
    Ticket
    41
    จิตพิสัย
    305
        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim SqlProcess As String = ""
            SqlProcess = "SELECT Date01,Year,PreSu01,PreSu02"
            SqlProcess &= " FROM Ex01"
            SqlProcess &= " WHERE (Date01='" & DateTimePicker1.Value.ToString("dd-mm-yyyy") & "')"
            'SqlProcess &= " WHERE (Date01='" & txtDate.Text & "')"
            With Conn
                If .State = ConnectionState.Open Then .Close()
                .ConnectionString = strConn
                .Open()
            End With

            da = New OleDbDataAdapter(SqlProcess, Conn)
            da.Fill(ds, "Ex01")

            If txtDate.Text <> "" Then
                txtYear.Text = CStr(ds.Tables("Ex01").Rows(0).Item("Year"))
                txtCane.Text = CStr(ds.Tables("Ex01").Rows(0).Item("PreSu01"))
                txtCane_Sum.Text = CStr(ds.Tables("Ex01").Rows(0).Item("PreSu02"))
            End If
        End Sub
    Date01 type เป็นวันที่ครับแต่พอเปลี่ยนเป็น text แล้วไม่ error ทำงานได้..แต่ต้องการให้เก็บ type เป็นวันที่ครับ

    [/td][/tr]
    [/table][table]
    [tr][td]

    ขออภัย! โพสต์นี้มีไฟล์แนบหรือรูปภาพที่ไม่ได้รับอนุญาตให้คุณเข้าถึง

    คุณจำเป็นต้อง ลงชื่อเข้าใช้ เพื่อดาวน์โหลดหรือดูไฟล์แนบนี้ คุณยังไม่มีบัญชีใช่ไหม? ลงทะเบียน

    x
  • อารมณ์วันนี้
    แฮปปี้
    2020-4-21 13:49
  • เช็คชื่อแล้ว: 42 วัน

    [LV.5]JuniorI

    3

    กระทู้

    74

    โพสต์

    345

    เครดิต

    CodeDragon

    Rank: 2

    เครดิต
    345
    Ticket
    118
    จิตพิสัย
    227
    araban โพสต์ 2020-2-10 10:40:34 | ดูโพสต์ทั้งหมด
    แก้ไขครั้งสุดท้ายโดย araban เมื่อ 2020-2-10 10:44

    ในฐานข้อมูลเก็บรูปแบบวันที่เป็น แบบไหนครับ ใช้เป็น yyyy-MM-dd  หรือเปล่าครับ ถ้าใช่ ลองเป็นเป็น   DateTimePicker1.Value.ToString("yyyy-MM-dd")    ถ้าใน DB เก็บเป็น ค.ศ.  ก็ใช้ รูปแบบนี้ครับ DateTimePicker1.Value.AddYears(-543).ToString("yyyy-MM-dd")
  • อารมณ์วันนี้
    แฮปปี้
    ครึ่งชั่วโมงที่แล้ว
  • เช็คชื่อแล้ว: 645 วัน

    [LV.9]ConquerorII

    47

    กระทู้

    1111

    โพสต์

    7810

    เครดิต

    KingUnicorn

    Rank: 6Rank: 6

    เครดิต
    7810
    Ticket
    4351
    จิตพิสัย
    3459

    Merciful MemberInstructor

    puklit โพสต์ 2020-2-11 09:47:55 | ดูโพสต์ทั้งหมด
    ปัญหาของท่าน

    Date01 type เป็นวันที่ครับแต่พอเปลี่ยนเป็น text แล้วไม่ error ทำงานได้..แต่ต้องการให้เก็บ type เป็นวันที่ครับ


    Ans : สำหรับ Datatype ของวันที่ให้ท่านเก็บเป็นอยู่ในรูปแบบวันที่นั้น ถูกแล้วอย่าเปลี่ยนมันเป็น Text เด็ดขาด
    เพราะมันจะส่งผลตอนเราสร้าง Query เป็นอย่างมาก

    แนะนำเบื้องต้นให้ท่านศึกษา DataType ให้เข้าใจ เพราะ Error เกิดจาก SQL command โดยตรง ไม่เกี่ยวข้องกับ VB ที่ท่านเขียน (ถูกแล้ว)



    ผมจะแนะแนวทางให้ ดังนี้
    1. ให้ยึด Data type ของวันที่เป็น Date เหมือนเดิม
    2. ให้ดูข้อความ Error ที่เกิดขึ้นมันแจ้งว่า Data type mismatch in criteria expression แปลได้ดังนี้ ชนิดข้อมูลไม่ตรงกัน
    3. ให้ดูคำสั่ง SQL Command ที่ท่านเขียนไป ตามที่ผมใส่กรอบสีแดงให้ท่าน แล้วให้ทำความเข้าใจดังนี้
        3.1 ถ้าเขียน SqlProcess &= " WHERE (Date01='" & DateTimePicker1.Value.ToString("dd-mm-yyyy") & "')" Data type จะเป็นชนิดไหน?
        3.2 ถ้าเขียน SqlProcess &= " WHERE (Date01=" & DateTimePicker1.Value.ToString("dd-mm-yyyy") & ")" Data type จะเป็นชนิดไหน?
    ให้ท่านหาคำตอบเอาเองกับการทำความเข้าใจในการส่งค่า ให้กับคำสั่ง SQL Command เอาเอง จากข้อ 3.1 และ 3.2 มันจะทำให้ท่านเข้าใจ Data type ได้มากขึ้น

    ขออภัย! โพสต์นี้มีไฟล์แนบหรือรูปภาพที่ไม่ได้รับอนุญาตให้คุณเข้าถึง

    คุณจำเป็นต้อง ลงชื่อเข้าใช้ เพื่อดาวน์โหลดหรือดูไฟล์แนบนี้ คุณยังไม่มีบัญชีใช่ไหม? ลงทะเบียน

    x
    ขออภัย! คุณไม่ได้รับสิทธิ์ในการดำเนินการในส่วนนี้ กรุณาเลือกอย่างใดอย่างหนึ่ง ลงชื่อเข้าใช้ | ลงทะเบียน

    รายละเอียดเครดิต

    ข้อความล้วน|อุปกรณ์พกพา|ประวัติการแบน|ProjectForStudy  

    GMT+7, 2020-8-9 23:43 , Processed in 0.028806 second(s), 26 queries .

    Powered by Discuz! X3.2 R20150609, Rev.38

    © 2001-2013 Comsenz Inc.

    ตอบกระทู้ ขึ้นไปด้านบน ไปที่หน้ารายการกระทู้