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,485

HOME > .NET Framework > Forum > สอบถามอยากทำหน้า login โดยหน้านี้สามารถเปิดจากผู้ได้รับสิทธิ์เท่านั้นครับต้องทำยังไงครับ



 

สอบถามอยากทำหน้า login โดยหน้านี้สามารถเปิดจากผู้ได้รับสิทธิ์เท่านั้นครับต้องทำยังไงครับ

 



Topic : 124600



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



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



ต้องการทำหน้า login แต่หน้านี้ต้องทำยังไงให้ผู้มีสิทธิ์เท่านั้นถึงจะเห็นช่องกรอก username กับ password ได้ครับ ต้องสร้างหน้า Gen ระบบคุมคอมแต่ละเครื่องยังไงครับ อยากกำหนดให้คอมบางเครื่องเท่านั้นที่จะเข้าใช้งานได้ครับ ขอบคุณครับขอตัวอย่าง code ทีครับ



Tag : .NET, Ms SQL Server 2008, C#







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2016-09-15 08:57:04 By : yatard View : 971 Reply : 17
 

 

No. 1



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



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

สร้าง table มาเก็บเป็น bit เช่น
table_user
- user_permission = true

เวลา codeing ก็

Code
if datatable(0)("user_permission") = true then frmmain.button1.enable = true else frmmain,button1.enable = false end if


ลองประยุกต์ดูครับ ไม่ยาก if else ล้วนๆ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 10:43:03 By : billkyz5
 


 

No. 2



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



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

ผมนิงงตั้งแต่ ทำยังไงให้ผู้มีสิทธิ์เท่านั้นถึงจะเห็นช่องกรอก username กับ password ได้ครับ

แปลแบบบ้านๆ คือ พอเปิดโปรแกรมมา ให้ผู้มีสิทธิ์เท่านั้นถึงจะเห็นช่องกรอก username กับ password
แบบนี้รึป่าว
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 11:29:45 By : lamaka.tor
 

 

No. 3



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



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

ถ้าเรากำหนดตั้งแต่ตัวคอมพิวเตอร์เลยได้ไหมครับ ว่าเปิดจากคอมเครื่องนี้ จะเข้าหน้า login ไมได้อะไรแบบนี้ครับพอมีวิธีไหนไหมคับผม ขอบคุณอีกครั้งครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 11:31:04 By : yatard
 


 

No. 4

Guest


อ่านคำถามแล้ว งงๆ ครับ ใช่แบบนี้หรือเปล่า
คำถามคือต้องการให้คอมบางเครื่องเท่านั้นที่เปิดโปรแกรมนี้ได้ใช้หรือไม่ครับ
ถ้าคำถามหมายถึงแบบนี้ก็สามารถกำหนดได้โดยการใช้ HWID Lock ได้ครับ
เพราะคอมแต่ละเครื่องจะมีหมายเลข HWID อยู่และหมายเลขก็ไม่ซ้ำกันด้วย
อยากให้เปิดได้กี่เครื่องก็ใส่หมายเลข HWID ลงไปพอโปรแกรมมันจะตรวจสอบ
หมายเลขHWID เสร็จแล้วถ้าตรงก็ยอมให้เปิดแต่ถ้าไม่ก็มีข้อความแจ้งเตือน
ลองเข้า Google แล้วพิมพ์ vb.net hwid login system ลองดูครับตัวอย่างน่าจะเยอะอยู่
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 11:50:10 By : PEBBLE
 


 

No. 5



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



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

ที่ผมคิดคือ ทำหน้ารันหน้านึงโดยมีรหัสผ่าน ถ้าเครื่องนี้เปิดหน้านี้แล้วเข้ารหัสผ่านได้ ถึงจะอนุญาตเข้าใช้งานหน้า Login ของเว็บแบบนี้ครับแต่ผมไม่รู้จะเอาอะไรกำหนดได้ว่าให้คอมเครื่องนี้ได้สิทธ์หรือไม่ได้สิทธิ์ต้องฝังที่ส่วนใดของคอมพิวเตอร์หรือเก็บค่ายังไงดีครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 11:50:24 By : yatard
 


 

No. 6



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



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

วิธี HWID Lock อ่า ขอบคุณมากๆครับเดี่ยวผมจะลองดูครับ ขอบคุณอีกครั้งครับผม ขอบคุณทุกๆคนเลยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 11:52:03 By : yatard
 


 

No. 7

Guest


แบบบ้านๆ

ทดสอบสร้างฟอร์มตามรูป
hwid form

ถ้าหมายเลขเครื่องตรงกันให้แสดงข้อความและใช้ได้ปกติ
hwid ok

ถ้าหมายเลขเครื่องไม่ตรงให้แสดงข้อความ Error และปิดส่วนที่ LogIn
hwid Error

โค้ดใช้งาน
Code (VB.NET)
Imports System.Management
Imports System.Net
Public Class Form1
    Private Function GETHWID() As String
        Dim cpuInfo As String = String.Empty
        Dim mc As New ManagementClass("win32_processor")
        Dim moc As ManagementObjectCollection = mc.GetInstances()

        For Each mo As ManagementObject In moc
            If cpuInfo = "" Then
                cpuInfo = mo.Properties("processorID").Value.ToString()
                Exit For
            End If
        Next
        GETHWID = cpuInfo
    End Function

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Text = GETHWID()
        Timer1.Enabled = True
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If Label1.Text = "BFEBFBFF0001067B" Then 'หมายเลขเครื่องที่ 1 ที่สามารถใช้งานได้
            Timer1.Enabled = False
            Label6.ForeColor = Color.Green
            Label6.Text = "ยินดีต้อนรับ..กรุณากรอกชื่อและรหัสผ่านเพื่อเข้าใช้"
        ElseIf Label1.Text = "ASDDDFERT15691VD" Then 'หมายเลขเครื่องที่ 2 ที่สามารถใช้งานได้
            Timer1.Enabled = False
            Label6.ForeColor = Color.Green
            Label6.Text = "ยินดีต้อนรับ..กรุณากรอกชื่อและรหัสผ่านเพื่อเข้าใช้"
        Else 'ถ้าหมายเลขเครื่องไม่ตรงตามที่ตั้งไว้ให้แสดงข้อความ Error และปิดส่วนที่ใช้งาน
            Timer1.Enabled = False
            TextBox1.Enabled = False
            TextBox2.Enabled = False
            Button1.Enabled = False
            Label6.ForeColor = Color.Red
            Label6.Text = "คอมพิวเตอร์เครื่องนี้ไม่ได้รับสิทธิ์ให้ใช้โปรแกรมนี้ !!"

        End If
    End Sub
End Class

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-15 22:18:09 By : PEBBLE
 


 

No. 8



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



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

สุดยอด ขอบคุณครับผม
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-16 08:17:26 By : yatard
 


 

No. 9



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



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

สอบถามเพิ่มเติมจากข้างบนครับ ผมลองทำตามแล้วครับ ผมอัพ code ขึ้น server แล้วลองเอาคอมเครื่องผมรันดูมันได้รหัส GETHWID() รหัสหนึ่งมาครับ แล้วผมลองไป เปิดกับคอมอีกเครื่องนึงรันหน้าเดียวกัน แต่กลับได้ code GETHWID() รหัสเดียวกันเลยครับ เดาว่าน่าจะเป็น GETHWID() ของ server ที่รัน code ครับแบบนี้ผมต้องแก้ไขตรงไหนได้บ้างครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 14:21:36 By : yatard
 


 

No. 10



โพสกระทู้ ( 8,730 )
บทความ ( 2 )



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


สอบถามใช้ web application ใช้ browser รันผ่าน router ใช่ไหมครับ
ถ้าใช่ สมัยนี้ web browser อ่านข้อมูลของเครื่อง ผ่าน router ไม่ได้แล้วครับ

ุถ้าไม่ผ่าน router คือเป็นวงแลนเดียวกัน หรือ
ต้องใช้ win application ถึงจะอ่านข้อมูลของเครื่องได้

program ไม่จำเป็นต้องฉลาดมากหรอกครับ อยากให้เฉพาะเครื่อง เฉพาะคน
ก็ส่งอีกเมล รหัสผ่าน ผ่านทาง email ตรงๆ เลย ไม่ต้องมานั่งลงทะเบียนให้เหมื่อย

เมื่อคุณต้องลงทะเบียนเครื่องที่ใช้คุณต้องรู้รหัสเครื่อง สู้ให้เขากรอกรหัสโดยเฉพาะดีกว่าไหมครับ
และใช้ cookie จำข้อมูลเฉพาะนั้น + user password จะรันที่ไหนก็ได้ สดวกกว่ากันตั้งเยอะ


ประวัติการแก้ไข
2016-09-17 14:44:16
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 14:36:02 By : Chaidhanan
 


 

No. 11



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



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

ขอบคุณครับพี่ Chaidhanan
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 14:44:06 By : yatard
 


 

No. 12



โพสกระทู้ ( 8,730 )
บทความ ( 2 )



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


gethwid() มันได้ hwid ของ router ครับ ไม่ได้ของ เครื่องที่ใช้งาน
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 14:47:21 By : Chaidhanan
 


 

No. 13



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



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

ไม่รู้ว่ามีวิธีจะยืนยันตัวตนของเครื่องคอมเครื่องนั้นๆได้บ้างไหมครับหรือต้องใช้ win app เข้ามาช่วยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 15:33:24 By : yatard
 


 

No. 14



โพสกระทู้ ( 8,730 )
บทความ ( 2 )



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


การยืนยัน หมายเลขเครื่อง mac address ต้องใช้ win app ครับ

มันจำเป็นขนาดต้องใช้ หมายเลขเครื่องเลยเหรอครับ
การใช้หมายเลยเครื่องส่วนใหญ่ที่ผมเจอมา เขาจะใช้เฉพาะกับ win app ที่เป็นระบบปิด
ซึ่งผู้ใช้ยินยอมให้เข้าถึงระบบความปลอดภัยของเครื่องได้
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-17 16:31:05 By : Chaidhanan
 


 

No. 15

Guest


ลองอีกแบบ...ลองไปเรื่อยๆ

แบบที่ 1 get the harddrive serial number หรือหมายเลขพวก ฮาร์ดดีส นั้นเอง คิดว่าฮาร์ดดิส แต่ละลูกหมายเลขไม่น่าจะซ้ำกัน

GetDriveSerialNumber

Code (VB.NET)
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label1.Text = GetDriveSerialNumber()
    End Sub

    Public Function GetDriveSerialNumber() As String
        Dim DriveSerial As Integer
        'Create a FileSystemObject object
        Dim fso As Object = CreateObject("Scripting.FileSystemObject")
        Dim Drv As Object = fso.GetDrive(fso.GetDriveName(Application.StartupPath))
        With Drv
            If .IsReady Then
                DriveSerial = .SerialNumber
            Else    '"Drive Not Ready!"
                DriveSerial = -1
            End If
        End With
        Return DriveSerial.ToString("X2")
    End Function

End Class

----------------------------------------------------------------------------------------------------------
หรือแบบที่ 2 HWID ที่เอา Processor Id [Cpu] + VolumeSerial Id [Hdd] + MotherBoard Id [Mb] + MACAddress [mac]
ถ้ามันยังซ้ำกันอยู่ก็ไม่รู้จะว่ายังไงแล้ว

hwid2

Code (VB.NET)
Imports System.Management
Imports System
Imports System.Text
Imports System.Security.Cryptography

Public Class Form1

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

        Dim hdd As String
        Dim cpu As String
        Dim mb As String
        Dim mac As String

        cpu = hw.GetProcessorId()
        hdd = hw.GetVolumeSerial("C")
        mb = hw.GetMotherBoardID()
        mac = hw.GetMACAddress()

        'MsgBox(cpu & "   " & hdd & "   " & mb & "   " & mac)

        Dim hwid As String = Strings.UCase(hw.getMD5Hash(cpu & hdd & mb & mac))

        ' MessageBox.Show(Strings.UCase(hwid))

        Label1.Text = hwid
    End Sub

End Class


Public Class clsComputerInfo

    Friend Function GetProcessorId() As String
        Dim strProcessorId As String = String.Empty
        Dim query As New SelectQuery("Win32_processor")
        Dim search As New ManagementObjectSearcher(query)
        Dim info As ManagementObject

        For Each info In search.Get()
            strProcessorId = info("processorId").ToString()
        Next
        Return strProcessorId

    End Function

    Friend Function GetMACAddress() As String

        Dim mc As ManagementClass = New ManagementClass("Win32_NetworkAdapterConfiguration")
        Dim moc As ManagementObjectCollection = mc.GetInstances()
        Dim MACAddress As String = String.Empty
        For Each mo As ManagementObject In moc

            If (MACAddress.Equals(String.Empty)) Then
                If CBool(mo("IPEnabled")) Then MACAddress = mo("MacAddress").ToString()

                mo.Dispose()
            End If
            MACAddress = MACAddress.Replace(":", String.Empty)

        Next
        Return MACAddress
    End Function

    Friend Function GetVolumeSerial(Optional ByVal strDriveLetter As String = "C") As String

        Dim disk As ManagementObject = New ManagementObject(String.Format("win32_logicaldisk.deviceid=""{0}:""", strDriveLetter))
        disk.Get()
        Return disk("VolumeSerialNumber").ToString()
    End Function

    Friend Function GetMotherBoardID() As String

        Dim strMotherBoardID As String = String.Empty
        Dim query As New SelectQuery("Win32_BaseBoard")
        Dim search As New ManagementObjectSearcher(query)
        Dim info As ManagementObject
        For Each info In search.Get()

            strMotherBoardID = info("SerialNumber").ToString()

        Next
        Return strMotherBoardID

    End Function

    Friend Function getMD5Hash(ByVal strToHash As String) As String
        Dim md5Obj As New Security.Cryptography.MD5CryptoServiceProvider
        Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(strToHash)

        bytesToHash = md5Obj.ComputeHash(bytesToHash)

        Dim strResult As String = ""

        For Each b As Byte In bytesToHash
            strResult += b.ToString("x2")
        Next

        Return strResult
    End Function

End Class


---------------------------------------------------------------------
ปล.ผิดพลาดตรงไหนขออภัยไว้ ณ ที่นี้ด้วยน่ะครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-18 20:14:18 By : PEBBLE
 


 

No. 16



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



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

ขอบคุณสำหรับข้อมูลครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-19 14:48:10 By : yatard
 


 

No. 17



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



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

จะใช้ mac address หรือ serail harddisk หรือ guid ของ โปรแกรม ก็ได้ครับ ลองดู
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2016-09-22 04:31:21 By : bigsuntat
 

   

ค้นหาข้อมูล


   
 

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

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