ASP.Net VB ile Cihaza Basit Erişim

Bu uygulamamızda , Visual Studio 2005 ortamında, ASP.NET sayfasından Visual Basic ile, O-Key Dongle cihazına erişimi inceleyeceğiz.

 

İlk önce File > New Web Site menüsünden yeni bir ASP.NET Web Site uygulaması açıyoruz.

Language olarak Visual Basic seçelim.

 

Projeyi açtığımızda solution explorer bölümünden, Default.aspx ‘e çift tıklayalım ve design bölümüne gelelim. Sol taraftaki araçlar menüsünden bir adet buton ve bir adet metin kutusu ekleyelim.

Butona tıklandığında, O-Key Dongle cihazı ile haberleşme sağlayarak, cihaz bilgilerini ekranda metin kutusu ile göstereceğiz.

Bunu yapabilmek için butonun üstüne çift tıklayalım, karşımıza uygulamamızın kod bölümü gelecektir.

 

O-Key Dongle cihazı ile haberleşme yapılabilmesi için ilk önce cihazda oturum açılıp, bir oturum numarası almak gerekmektedir.

 

Oturum açmak için OD_Login fonksiyonunu kullanacağız.

 

Bu fonksiyonları yazmadan önce, kodumuzun başlangıcında O-Key Dongle kütüphanesi olan, OkeyDongleLibrary.dll dosyasından tanımlamalarını yapmalıyız. 

 

Cihazın bilgilerini görüntülemek için OD_Info fonksiyonunu kullanacağız.

Cihazda açtığımız oturumu kapatmak için ise OD_Logout fonksiyonunu kullanacağız.

 

Kullanacağımız bu 3 fonksiyonu da tanımlayalım.

 

Partial Class _Default

    Inherits System.Web.UI.Page

    Declare Function OD_Login Lib "OkeyDongleLibrary.dll" (ByVal ModuleID As String, ByVal DeviceParameter As String) As String

    Declare Function OD_Info Lib "OkeyDongleLibrary.dll" (ByVal SessionID As String) As String

    Declare Function OD_Logout Lib "OkeyDongleLibrary.dll" (ByVal SessionID As String) As String

 

 

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

 

    End Sub

End Class

 

Butona tıklandığında, ilk önce cihaza oturum açmak için OD_Login fonksiyonunu çağırmamız gerekiyor. Bu fonksiyon Modül Numarası ve Cihaz Seri Numarası olmak üzere iki parametre almaktadır.  Fonksiyon geriye oturum numarasını ya da hata mesajı döndürmektedir. Şu an için herhangi bir hata kontrolü yapmayacağız.

 

 

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim session_id As String

        Dim result As String

        session_id = OD_Login("0", "222188AF0319540C5069DA76B41DBC62")

    End Sub

 

Şimdi OD_Info fonksiyonunu kullanarak cihazın bilgilerini metin kutusunda gösterelim. OD_Info fonksiyonu  parametre olarak oturum numarasını almaktadır.

 

   

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim session_id As String

        Dim result As String

        session_id = OD_Login("0", "222188AF0319540C5069DA76B41DBC62")

        result = OD_Info(session_id)

        TextBox1.Text = result

    End Sub

 

Cihazda açtığımız oturumu kapatmak için ise OD_Logout fonksiyonunu kullanacağız. OD_Logout fonksiyonu parametre olarak oturum numarasını almaktadır.

 

 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 

        Dim session_id As String

        Dim result As String

 

        session_id = OD_Login("0", "222188AF0319540C5069DA76B41DBC62")

        result = OD_Info(session_id)

        MessageBox.Show(result)

        OD_Logout(session_id)

 

    End Sub

 

Uygulamanın çalışabilmesi için, çalışma klasörüne OkeyDongleLibrary.dll ve OkeyDongle.ini dosyasının kopyalanması gerekmektedir. 

 

Butona bastığımızda cihaz ile ilgili bilgileri göreceğiz. Buradaki bilgiler cihaz versiyonu ve modelidir.

 

Böylece en basit anlamda cihaza erişerek, cihaz içerisinden bir bilgi okuduk ve ekranda gösterdik. Burada temel olarak ASP.Net Visual Basic ile fonksiyonların tanımlanması ve çağrılması anlatılmıştır. Yazılım koruma ile ilgili herhangi bir kontrol, şifreleme vb. yapılmamıştır.

Yazdığımız örnek uygulamayı indirmek için buraya tıklayınız.