1

Konu: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Merhaba arkadaşlar.

Yazdığımız programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Şimdiden teşekkürler.

2 Son düzenleyen, ugurlu2001 (27.01.2016 16:01:55)

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Evet :
* Public code from Foxpro forums, I did not take the note of author.
* Kodun yazarını not almamışım.

* Terminal Services Status
 ?GET_TSSTATUS() 
FUNCTION GET_TSSTATUS 
    LOCAL wbemFlagReturnImmediately, wbemFlagForwardOnly, llTS_STATUS

    TRY 
        wbemFlagReturnImmediately = 0x10
        wbemFlagForwardOnly = 0x20 

        objWMIService = GETOBJECT("winmgmts://./root/CIMV2")
        colItems = objWMIService.ExecQuery("SELECT * FROM Win32_TSNetworkAdapterListSetting", "WQL")

        FOR EACH TheItem IN colItems
        *!*          ?"Caption: " + colItems.Caption
        *!*          ?"Description: " + colItems.Description
        *!*          ?"Network Adapter ID: " + colItems.NetworkAdapterID
        *!*          ?"Setting ID: " + colItems.SettingID
        *!*          ?"Terminal Name: " + colItems.TerminalName
        *!*          ?"Terminal Protocol: " + colItems.TerminalProtocol
        *!*          ?"Transport: " + colItems.Transport
        NEXT
        m.llTS_STATUS = .T.
    CATCH
        m.llTS_STATUS = .F.
    FINALLY
        * ? m.llTS_STATUS
    ENDTRY

    RETURN (m.llTS_STATUS)
ENDFUNC 
Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

3

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Sağol Uğur deneyeceğim.

4

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Uğur ,  sistem uzak masa üstü bağlantısını terminal gibi mi algılıyor?

5 Son düzenleyen, ugurlu2001 (28.01.2016 11:57:49)

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Aydın, anlamadım abicim smile

Eğer Kodu Fiziksel masaüstünde çalıştırırsan .F. dönecektir.

Uzakmasaüstünde çalıştırırsan .T.

smile

Kontrollerini ona göre yapabilirsin ...

Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

6

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Uzak masaüstü bağlantısı derken "windows remote desktop" u kasdediyorum. TW türündeki programları değil.

Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

7

Re: Programa uzak masa üstünden bağlanarak girildiği anlaşılabilir mi?

Evet.   "windows remote desktop" la ilgili sorum. sonucu yazarım.