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

Registered : 108,801

HOME > Community Zone > Forum > ขอถามหน่อยครับ ทำไมผมเชือมต่อ database ได้แล้ว แต่ทำไมผมดึง table ไม่ได้อ่าครับ



 

ขอถามหน่อยครับ ทำไมผมเชือมต่อ database ได้แล้ว แต่ทำไมผมดึง table ไม่ได้อ่าครับ

 



Topic : 109567



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



สถานะออฟไลน์
Twitter Facebook Hi5 Blogger



อยากถามหน่อยครับ ว่าทำไมผมเซ็ค Table แล้วมันขี้น Error อ่าครับ โดย ใช้ รหััส user : pong และ password : 1234 แต่มันเซ็ตไม่ได้้อ่าครับ

ไฟล์ของผมครับ
http://upload.freeupload2u.com/download.php?file=653WindowsApplication5.rar

data1

data2

data3

data4


อันนี้ SQL ของผมครับ
data5


[head]Imports System.Data.SqlClient
Imports System.IO


Public Class Form1

Dim Conn As SqlConnection

Dim Invalid As Integer
Dim rsToAffect As Long


Public connetionString As SqlConnection = New SqlConnection("Data Source=PONGWICS2014-PC; Initial Catalog=data1;User ID=sa;Password=Pong")
Public sqlCommand As SqlCommand = New SqlCommand




Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


Dim cnn As SqlConnection
Dim connetionString = "Data Source=PONGWICS2014-PC; Initial Catalog=data1;User ID=sa;Password=Pong"
cnn = New SqlConnection(connetionString)

Dim strCon As String = cnn.ToString


Try
cnn.Open()
MsgBox("เชื่อมต่อได้แกล้ว ")
cnn.Close()
Catch ex As Exception
MsgBox("โอ้ๆ มันเกิดอะไรขึ้น ")
End Try
End Sub



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' Dim aaa As String = ""
' Dim bbb As String = ""

Try


Dim str As String = "select user,password From inputdata where user = '" & user.Text & "' and password = '" & password.Text & "'"

Dim da As New SqlDataAdapter(str, connetionString)
Dim ds As New DataSet
' Dim dt As New DataTable


' aaa = user.Text
' bbb = password.Text
da.Fill(ds)
If ds.Tables(0).Rows.Count > 0 Then
Me.Hide()

Form2.Show()

Else
MessageBox.Show("error")
End If
Catch ex As Exception

MessageBox.Show(ex.Message)

End Try
End Sub




End Class

[/vb]



Tag : MySQL, Ms SQL Server 2005, Ms SQL Server 2008, Ms SQL Server 2012, VB.NET









ประวัติการแก้ไข
2014-06-29 23:35:05
2014-06-29 23:41:02
2014-06-29 23:41:30
2014-06-30 01:23:25
Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2014-06-29 23:33:54 By : heloman View : 890 Reply : 4
 

 

No. 1



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



สถานะออฟไลน์
Twitter Facebook Hi5 Blogger

ลองแบบนี้ดูน่ะครับ
ผมเขียน C# ใช้ลักษณะนี้

ลองแก้ตรงนี้ดู
"select user,password From inputdata where user = '" & user.Text & "' and password = '" & password.Text & "'"

ให้เป็นแบบนี้ดูน่ะครับ
"select user,password From inputdata where user = ' " + user.Text + " ' and password = ' " + password.Text + " ' "

ลองดูน่ะครับถ้าไม่ได้ก้อรอผู้รู้มาตอบให้น่ะครับ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2014-06-30 01:35:17 By : Zakariya
 


 

No. 2



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



สถานะออฟไลน์
Twitter Facebook Hi5 Blogger

ปัญหาใหม่อีกแล้วครับ มันขี้น fill selectcommand.connection property not been initialized อ่าๆๆ จะต้องทำยังไงหรอ

data6
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2014-06-30 10:14:30 By : heloman
 

 

No. 3



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



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


Code (VB.NET)
Imports System.Data.SqlClient
Imports System.IO


Public Class Form1
    
    Dim Conn As SqlConnection
   
    Dim Invalid As Integer
    Dim rsToAffect As Long
   

    Dim connetionString As String = "Data Source=PONGWICS2014-PC; Initial Catalog=data1;User ID=sa;Password=Pong"
    Public sqlCommand As SqlCommand = New SqlCommand




    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

     
        Dim cnn As SqlConnection
        cnn = New SqlConnection(connetionString)
        Dim strCon As String = cnn.ToString
        Try
            cnn.Open()
            MsgBox("เชื่อมต่อได้แกล้ว  ")
            cnn.Close()
        Catch ex As Exception
            MsgBox("โอ้ๆ มันเกิดอะไรขึ้น ")
        End Try
    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim aaa As String = ""
        Dim bbb As String = ""
       
        Try

            Dim strSql As String = "select [user],[password] From inputdata where [user] = '" & user.Text & "' and [password] = '" & password.Text & "'"
            Dim da As New SqlDataAdapter(strSql, connetionString)
            Dim ds As New DataSet
            Dim dt As New DataTable

            da.Fill(ds)
            If ds.Tables(0).Rows.Count > 0 Then
                Form2.Show()
                Me.Hide()
            Else
                MessageBox.Show("ไม่พบผู้ใช้งาน หรือ รหัสผ่านไม่ถูกต้อง")
            End If
        Catch ex As Exception

            MessageBox.Show("error  TTT")

        End Try
    End Sub


End Class




หลีกเลี่ยง การตั้งชื่อ attribute ที่เป็น reserved word ใน database นะครับ


ประวัติการแก้ไข
2014-06-30 16:31:40
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2014-06-30 16:28:51 By : vbcrazy
 


 

No. 4



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



สถานะออฟไลน์
Twitter Facebook Hi5 Blogger

ตอบความคิดเห็นที่ : 3 เขียนโดย : vbcrazy เมื่อวันที่ 2014-06-30 16:28:51
รายละเอียดของการตอบ ::
...เย้ๆๆ ขอบคุณมากๆครับ เดี่ยวจะลองดูครับ

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2014-06-30 16:30:39 By : heloman
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ขอถามหน่อยครับ ทำไมผมเชือมต่อ database ได้แล้ว แต่ทำไมผมดึง table ไม่ได้อ่าครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ 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: Voake, Comcube, รับทำเว็บไซต์ รับเขียนโปรแกรม , pangpond.com , pangpond.co.th , สำนักงานบัญชี.com , รถมือสอง

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