Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,027

HOME > .NET Framework > Forum > [vb.net]Syntax error (missing operator) in query expression 'userid = 1111userpassword = 0000''.



 

[vb.net]Syntax error (missing operator) in query expression 'userid = 1111userpassword = 0000''.

 



Topic : 071361

Guest




Code (VB.NET)
Imports System.Data
Imports System.Data.OleDb
Public Class LoginForm
    Dim StrConn As String
    Dim Conn As New OleDbConnection
    Dim da As OleDbDataAdapter
    Dim ds As New DataSet

    Dim dt As DataTable
    Dim dr As DataRow


    Dim CurrentEmployees As Integer
    Dim IsFind As Boolean = False
    Dim btnChk As String

    Dim Cnn As New OleDbConnection(Cnnstring)
    Dim Cnnstring As String
    Dim SqlSelect As String
    Dim OleReader As OleDbDataReader
    Dim UserIDA As String
    Dim PassIDA As String


    Private Sub LoginForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        StrConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Documents and Settings\Administrator\Desktop\ae\LibralyProject\libraly.accdb"

        With Conn
            If .State = ConnectionState.Open Then Close()
            .ConnectionString = StrConn
            .Open()
        End With
    End Sub
    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click

        If txtUserName.Text = "" Then
            MessageBox.Show("ใส่ข้อมูล", "No UserID", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Else
            ReadMyData(Cnnstring)
        End If
    End Sub
    Public Sub ReadMyData(ByVal myConnString As String)

   
        SqlSelect = "select * from users Where userid = " & txtUserName.Text & "userpassword =  " & txtPwd.Text & "'"

        Dim OleCommand As New OleDbCommand(SqlSelect, Conn)

       [font=Verdana] OleReader = OleCommand.ExecuteReader[/font]
        OleReader.Read()
        UserIDA = OleReader.Item("userid")
        PassIDA = OleReader.Item("userpassword")

        If txtUserName.Text = UserIDA And txtPwd.Text = PassIDA Then
            Form2.Show()
            txtUserName.Text = ""
            txtPwd.Text = ""
            Me.Hide()
        Else
            MessageBox.Show("กรุณาใส่ข้อมูลให้ถูกต้อง", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Warning)

        End If
      



    End Sub

    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
        Me.Close()
    End Sub

    
  
End Class



บรรทัดที่มีตัวสีแดง ติดเออเร่อ Syntax error (missing operator) in query expression 'userid = 1111userpassword = 0000''.
ช่วยหน่อยค่ะ

ขอบคุณล่วงน้าค่ะ



Tag : .NET, Ms Access, VBScript, Crystal Report, Win (Windows App), VB.NET







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2012-01-05 16:26:29 By : patta View : 1380 Reply : 3
 

 

No. 1



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

สมาชิกที่ใส่เสื้อไทยครีเอท Hall of Fame 2012

สถานะออฟไลน์
Facebook

มี ' ฟันหนู เกินมาหนึ่งตัว






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-01-05 16:38:35 By : Dragons_first
 


 

No. 2

Guest


มี ' ฟันหนู ขาดไป 3 ตัว กับ and ด้วย

Code (VB.NET)
SqlSelect = "select * from users Where userid = " & txtUserName.Text & "userpassword =  " & txtPwd.Text & "'"


แก้ให้

Code (VB.NET)
SqlSelect = "select * from [users] Where [userid] = '" & txtUserName.Text & "' and [userpassword] =  '" & txtPwd.Text & "'"


แต่ให้ดีเปลี่ยนไปใช้แบบ parameter จะดีกว่านะ

Code (VB.NET)
SqlSelect = "select * from [users[ Where [userid] = @userid and [userpassword] = @userpassword"

Dim OleCommand As New OleDbCommand(SqlSelect, Conn)
OleCommand.Parameters.AddWithValue("@userid", txtUserName.Text)
OleCommand.Parameters.AddWithValue("@userpassword", txtPwd.Text)

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-01-06 10:01:10 By : พี่หมี
 

 

No. 3

Guest


พี่หมียังอยู่ ผลุบๆ โผลๆ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-01-06 10:37:28 By : น้องดำ
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : [vb.net]Syntax error (missing operator) in query expression 'userid = 1111userpassword = 0000''.
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 04
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่