 |
|
ขอวิธีการทำ login ใน vb 2008 ฐานข้อมูล sql server แบบ windows application |
|
 |
|
|
 |
 |
|
sql server น่ะครับ
|
 |
 |
 |
 |
Date :
2010-10-11 19:42:46 |
By :
varittinan |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ชอบจริงๆ พวกชอบโวยวายเนี่ย
ก็เปลี่ยน connection string จาก access เป็น sql ดิ
เปลี่ยน oledb เป็น sqlclient ก็จบแล้ว
|
 |
 |
 |
 |
Date :
2010-10-14 13:42:24 |
By :
tungman |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
vb ครับ ไม่ใช่อย่างอื่น
|
 |
 |
 |
 |
Date :
2010-10-24 10:52:14 |
By :
varittinan |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
using.System.Data SqlClient;
public SqlConnection con { get;set; }
con = new SqlConnection("Datasource=.;database=??; Ingrated security=SsPi", con); มั่งนะคับ
|
 |
 |
 |
 |
Date :
2011-09-08 15:13:41 |
By :
ไร้นาม |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอโค้ด login โดยใช้ SQL เปนฐานข้อมูลหน่อยคร๊,,
|
 |
 |
 |
 |
Date :
2012-02-02 14:18:13 |
By :
moo_eam |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
พี่ค่ะ หนูอยากทราบว่าถ้าสร้างหน้า Login ขึ้นมาใน VB 2008 เชื่อมต่อกับ Access โดยมีมีโค้ด อย่างนี้
Code (VB.NET)
Public Class Login
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
If UsernameTextBox.Text = "" Or PasswordTextBox.Text = "" Then
MessageBox.Show("กรุณากรอก Username และ Password ให้ครบถ้วน", "ข้อแนะนำในการเข้าใช้ระบบ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
Call cleartext()
Exit Sub
Else
If UsernameTextBox.Text = "ann" Or PasswordTextBox.Text = "1234" Then
ElseIf UsernameTextBox.Text = "st" Or PasswordTextBox.Text = "1111" Then
MessageBox.Show("ยินดีต้อนรับเข้าสู่ระบบ", "ยินดีต้อนรับ", MessageBoxButtons.OK, MessageBoxIcon.Information)
Mainmenu.Show()
Else
MessageBox.Show("คุณใส่ Username หรือ Password ผิดกรุณาตรวจสอบและกรอกใหม่อีกครั้ง", "แจ้งความผิดพลาด", MessageBoxButtons.OK, MessageBoxIcon.Error)
Call cleartext()
Exit Sub
End If
End ElseIf
End If
End Sub
Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
If MessageBox.Show("คุณต้องการที่จะยกเลิกการเข้าสู่ระบบใช่หรือไม่", "ยกเลิกการเข้าสู่ระบบ", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning) = Windows.Forms.DialogResult.OK Then
Me.Close()
Else
cleartext()
End If
End Sub
Private Sub cleartext()
UsernameTextBox.Text = ""
PasswordTextBox.Text = ""
UsernameTextBox.Focus()
End Sub
Private Sub UsernameTextBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles UsernameTextBox.KeyPress
If e.KeyChar = Chr(13) Then
PasswordTextBox.Focus()
End If
End Sub
Private Sub Login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
แต่หนูอยากเพิ่มผู้ที่เข้าใช้ได้หลายๆ คนต้องทำยังไงค่ะ ช่วยหน่อยนะคะ โปรเจคหนูจะได้เสร็จ มีส่ง เรียนจบซะที ขอบคุณนะคะ
|
 |
 |
 |
 |
Date :
2012-03-26 16:22:22 |
By :
ลูกตาล |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
อยากได้เหมือนกันค่ะ
|
 |
 |
 |
 |
Date :
2012-10-12 16:33:02 |
By :
hayday |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|