Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,027

HOME > .NET Framework > Forum > vb.net คำสั่ง login บัคครับ ช่วยด้วยครับ มึนตึบเลย

vb.net คำสั่ง login บัคครับ ช่วยด้วยครับ มึนตึบเลย

เริ่มหัวข้อใหม่

HenG

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

สวัสดีครับคือผมมีเรื่องอยากให้ช่วยครับ

คำสั่งล็อคอินบัค (แต่มันทำงาน)

login ผ่าน mysql ข้ามโฮสนะครับ

คือมันมีอยู่ว่า ถ้าใส่รหัสผิดมันก็จะขึ้นว่าใส่รหัสผิดเนี่ยละ ถ้าใส่รหัสถูกมันก็จะขึ้นว่าใส่รหัสถูกเนี่ยละแต่มันบัคตรง

ถ้าไม่ใส่อะไรเลย ก็ล็อคอินได้ หรือ กด สเปคปาร์ กี่ตัวก็ได้มัน login ได้เฉย เลย งง ว่ามันบัค หรืออะไรตรงไหนครับ

รบกวนช่วยแก้code ให้ทีครับขอบคุณครับ

Code (VB.NET)

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Button6.Text = "กำลังตรวจสอบ . . ."
        Button6.Enabled = False

        MySqlConnection = New MySqlConnection()
        MySqlConnection.ConnectionString = "server=119.59.120.5; user id=xxx; password=yyy; database=cafellsj_cloud; Pooling=false"
        Try
            MySqlConnection.Open()
            'MessageBox.Show("Connection to Database has been opened.")
        Catch myerror As MySqlException
            MsgBox("เชื่อมต่อ Cloud Server ไม่ได้ กรุณาลองใหม่ภายหลัง !: ")
            MySqlConnection.Close()
            Button6.Text = "Login . . ."
            Button6.Enabled = True
        End Try
        Dim sqlquary = "SELECT * FROM user WHERE username = '" & username.Text & "';"
        command.Connection = MySqlConnection
        command.CommandText = sqlquary
        myadapter.SelectCommand = command
        mydata = command.ExecuteReader()
        If mydata.HasRows = 0 Then
            MsgBox("ยืนยันตัวตนไม่ถูกต้อง กรุณาลองใหม่ !", MsgBoxStyle.Critical, "Login Failed")
            Button6.Text = "Login . . ."
            Button6.Enabled = True

        Else
            CreateObject("WScript.Shell").Popup("<ยืนยันตัวตนสำเร็จ> User : " + username.Text + "   " + DateTimePicker1.Text + "   " + DateTimePicker2.Text + " นาที", 2, "Login Successful")

            TextBox1.Enabled = True
            TextBox2.Enabled = True
            TextBox3.Enabled = True
            TextBox4.Enabled = True
            ComboBox1.Enabled = True
            DateTimePicker1.Enabled = True
            DateTimePicker2.Enabled = True
            GroupBox1.Enabled = True
            GroupBox2.Enabled = True
            GroupBox3.Enabled = True
            DataGridView1.Enabled = True
            DataGridView1.Show()
            Button7.Show()
            Button6.Enabled = False
            Button6.Hide()
            retrieve()
            username.Clear()
            DataGridView1.Focus()

        End If

Tag : .NET, MySQL, VBScript, VB.NET, VS 2010 (.NET 4.x), Windows

Date : 2016-12-27 16:05:47

By : wanlop8822

View : 1204

Reply : 20

No. 1

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

มันไม่ได้ใช้

Code

  HasRows=-1

รึครับ

Date : 2016-12-27 16:23:41

By : lamaka.tor

No. 2

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

วิธีบ้านคือ

Code

MessageBox.Show(mydata.HasRows)

เพื่อดูว่าจริงๆแล้วมันได้ค่าออกมาเท่าไหร่

Date : 2016-12-27 16:25:32

By : lamaka.tor

No. 3

Mr.T-Bag

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

Code (VB.NET)

Dim sqlquary = "SELECT * FROM user WHERE username = '" & username.Text & "';"

เหมือนจะต้อง Where Password ด้วยรึป่าวครับ?

Date : 2016-12-27 16:39:49

By : Mr.T-Bag

No. 4

HenG

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

ตอบความคิดเห็นที่ : 2 เขียนโดย : lamaka.tor เมื่อวันที่ 2016-12-27 16:25:32

รายละเอียดของการตอบ ::

ลองใส่ MessageBox.Show(mydata.HasRows) ไปแล้วครับ

มันขึ้น ว่า True ครับแก้ยังไงครับ

Date : 2016-12-27 22:23:51

By : wanlop8822

No. 5

HenG

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

ตอบความคิดเห็นที่ : 3 เขียนโดย : Mr.T-Bag เมื่อวันที่ 2016-12-27 16:39:49

รายละเอียดของการตอบ ::

จะให้มัน ใช้ username ล็อคอินอย่างเดียวได้รึเปล่าครับ

Date : 2016-12-27 22:24:51

By : wanlop8822

No. 6

HenG

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

ตอบความคิดเห็นที่ : 1 เขียนโดย : lamaka.tor เมื่อวันที่ 2016-12-27 16:23:41

รายละเอียดของการตอบ ::

HasRows=-1 เอาไปใส่ตรงไหนครับ

Date : 2016-12-27 22:25:18

By : wanlop8822

No. 7

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

ผมมีข่าวร้ายจะแจ้งครับ

https://msdn.microsoft.com/en-us/library/system.data.datatablereader.hasrows(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1

Code (VB.NET)

Public Overrides ReadOnly Property HasRows As Boolean

HasRows เป็น Boolean

ลองเริ่มจากการเปลี่ยนเป็น
If mydata.HasRows = False Then

ดูครับ

ปล.ถ้าไม่ได้ลอง clean แล้ว rebuild ใหม่ดูนะครับ

Date : 2016-12-27 23:29:30

By : lamaka.tor

No. 8

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

ตอบความคิดเห็นที่ : 5 เขียนโดย : wanlop8822 เมื่อวันที่ 2016-12-27 22:24:51

รายละเอียดของการตอบ ::

ได้อยู่แล้วครับ

แต่ท่านลองนึกถึงสภาพ facebook line instagram thaicreate ฯลฯ
ที่เอาแค่ wanlop8822 หรือ Email ต่างๆ ซึ่งมองเห็นได้ง่าย

มาใช้ login ระบบนั้นๆ ดูนะครับ
คำถามคือ แล้ว system/security/profiles ต่างๆ จะแคบแค่ไหน
ถ้าเราเทียบกับแบบที่มี User/Password

เช่นผมเอาแค่ wanlop8822 มา login thaicreate (แบบไม่ใช้ Password) ซึ่งผมก็ก๊อบมาจาก ความคิดเห็นด้านบนนั่นเอง

Date : 2016-12-27 23:38:41

By : lamaka.tor

No. 9

HenG

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

ตอบความคิดเห็นที่ : 7 เขียนโดย : lamaka.tor เมื่อวันที่ 2016-12-27 23:29:30

รายละเอียดของการตอบ ::

เพิ่มใส่ตรงไหนยังไง ขอตัวอย่างได้ไหมครับ

ข่าวร้ายอะไรหรอครับ ไม่ค่อยรู้เรื่อง

จริงๆมันมี user + pass แหละ แต่ตัดออก. โปรแกรมนี้ทำใช้คนเดียวน่ะ

Date : 2016-12-28 00:01:47

By : wanlop8822

No. 10

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

ตอบความคิดเห็นที่ : 9 เขียนโดย : wanlop8822 เมื่อวันที่ 2016-12-28 00:01:47

รายละเอียดของการตอบ ::

ข่าวร้ายคือ?
ผมเข้าใจผิด คิดว่า มันเป็นตัวเลข(ส่งผลให้แนะนำแบบผิดๆไป) 555

เพิ่มใส่ตรงไหนยังไง?
ให้มองอย่างงี้ครับ
เราอยากทราบใช่ไม๊ครับว่า SQL ที่เรายัดเข้าไป มี rows หรือข้อมูลหรือไม่
โดย
https://msdn.microsoft.com/en-us/library/system.data.datatablereader.hasrows(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1
รูปแบบก็จะเป็นแบบนี้ครับ

Code (VB.NET)

If mydata.HasRows = False Then
'สรุปว่ามันไม่มีข้อมูลนั้นเอง
 Else
'สรุปว่ามันมีข้อมูลนั้นเอง
 End If

จริงๆมันมี user + pass แหละ แต่ตัดออก. ?
บางครั้งโปรแกรมก็ต้องมีเผื่อนะครับ
ผมเป็นนักวิทย์ วันๆอยู่แต่กับ pipett/flask/AAS/ICP แต่วันดีคืนดีอยากลองเขียนโปรแกรมใช้ในหน่วยดู
หน่วยงานอื่นเห็น อ่อๆๆๆ ช่ายล่ายๆๆ มาขอ join job ด้วย ผมก็ต้องมาเขียนใหม่เพื่อให้วงมันกว้างขึ้น
พอฝ่ายอื่นเห็น อ้าว ทำไม่ไม่พ่วงฉันไปด้วยละ ก็เลยต้องมาเขียนใหม่อีก
จนตอนนี้จากแค่หน่วยงาน โลหะหนัก เมื่อ 2 ปี ที่แล้ว ตอนนี้พ่วงกันทั้งชั้นงาน

สิ่งที่ผมได้จากการทำซ้ำๆทำให้รู้ว่า ทำเผื่อไปเหอะ ถึงไม่มีใครใช้กับเรา เราก็ได้เพิ่ม skill ,Proficiency,professional ให้เราได้
สรุป ยังไงเราก็ได้ ไม่มีเสีย เลยแม้แต่น้อยครับ

Date : 2016-12-28 00:22:17

By : lamaka.tor

No. 11

HenG

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

ตอบความคิดเห็นที่ : 10 เขียนโดย : lamaka.tor เมื่อวันที่ 2016-12-28 00:22:17

รายละเอียดของการตอบ ::

ลองแล้วเหมือนเดิมครับ

แก้เป็น If mydata.HasRows = False Then

ก็ยังล็อคอินได้โดยไม่ต้องกรอก หรือ กด สเปคปาร์

Date : 2016-12-28 09:24:24

By : wanlop8822

No. 12

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

Code (VB.NET)

If mydata.HasRows = False Then
'สรุปว่ามันไม่มีข้อมูลนั้นเอง
 Else
'สรุปว่ามันมีข้อมูลนั้นเอง // มันมาตรงนี้ใช่ไม๊ครับ
 End If

ลองดึง rows ขึ้นมาดูนะครับ
ว่าไอ้ที่มันบอกเราว่ามี มันมีจริงรึป่าว(โอ๊ววววว คุณหลอกดาว)

Code (VB.NET)

MessageBox.Show(mydata(0)) 'มั้งครับ ลองดู

ปล. ถ้ายังได้อยู่ ก็แสดงว่า sqlquary น่าจะผิดพลาด ลองปรับแต่งดูอีกรอบ

Date : 2016-12-28 09:43:01

By : lamaka.tor

No. 13

HenG

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

ตอบความคิดเห็นที่ : 12 เขียนโดย : lamaka.tor เมื่อวันที่ 2016-12-28 09:43:01

รายละเอียดของการตอบ ::

Invalid attempt to access a field before calling Read()

ขึ้นแบบนี้ครับ

แล้วsqlquary แก้ยังไงรบกวนหน่อยครับ Y.Y

Date : 2016-12-28 10:10:25

By : wanlop8822

No. 14

FONFIRE

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

ลองสลับ if ดูไหมครับ

if hasrow then
login ได้
else
login ไม่ได้
end if

Date : 2016-12-28 10:11:18

By : fonfire

No. 15

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

ตอบความคิดเห็นที่ : 13 เขียนโดย : wanlop8822 เมื่อวันที่ 2016-12-28 10:10:25

รายละเอียดของการตอบ ::

Invalid attempt to access a field before calling Read() ?
http://stackoverflow.com/questions/11089633/invalid-attempt-to-access-field-before-calling-read

แล้วsqlquary แก้ยังไงรบกวนหน่อยครับ Y.Y?
แก้ Read ให้ผ่านก่อน จะได้ไม่งงกับปัญหา

sql ไม่ยากหรอกครับ
ลองใช้ Parameter การค้นหาใน Wizard

https://www.thaicreate.com/community/csharp-add-query-parameter-in-wizard-ban-ban.html

Date : 2016-12-28 10:19:45

By : lamaka.tor

No. 16

HenG

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

ตอบความคิดเห็นที่ : 14 เขียนโดย : fonfire เมื่อวันที่ 2016-12-28 10:11:18

รายละเอียดของการตอบ ::

ลองแล้วไม่เวิร์กครับ

Date : 2016-12-28 10:20:04

By : wanlop8822

No. 17

HenG

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

ผมแก้ได้ละ ไม่มี code อะไรผิดพลาดหลอก มันผิดอย่างเดียวคือ

ไม่รู้ผมไป insert username ใน phpmyadmin เป็นช่อง วางตอนไหน

คราวนี้ เวลาล็อคอิน ใส่ช่องว่าง มันก็ล็อคอินได้ งง เป็น วัน เลย เหอะๆ

Date : 2016-12-28 10:31:10

By : wanlop8822

No. 18

TOR_CHEMISTRY

โพสกระทู้ ( 4,436 )
บทความ ( 23 )

กรรม

Date : 2016-12-28 10:33:51

By : lamaka.tor

No. 19

FONFIRE

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

Date : 2016-12-28 10:55:12

By : fonfire

No. 20

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

เพิ่มเติมครับ => ทำ Form Login บน Windows Form Application ง่าย ๆ ด้วย VB.NET และ C#

Date : 2016-12-28 11:05:31

By : mr.win

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : vb.net คำสั่ง login บัคครับ ช่วยด้วยครับ มึนตึบเลย

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

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

Load balance : Server 00

Registered : 109,027

document.write("<font color=996600>[.NET]</font>"); vb.net คำสั่ง login บัคครับ ช่วยด้วยครับ มึนตึบเลย

No. 1

No. 2

No. 3

No. 4

No. 5

No. 6

No. 7

No. 8

No. 9

No. 10

No. 11

No. 12

No. 13

No. 14

No. 15

No. 16

No. 17

No. 18

No. 19

No. 20

ค้นหาข้อมูล

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

Notice

vb.net คำสั่ง login บัคครับ ช่วยด้วยครับ มึนตึบเลย