Rasentry, rascredentials, rascredmask, rasentryoptions, rasentryoptions2, dwencryptiontype, dwvpnstrategy,

Source: Internet
Author: User
'Rascredentials

Private type rascredentials
Dwsize as long
Dwmask as long
Szusername as string * 257 'unlen + 1
Szpassword as string * 257 'pwlen + 1
Szdomain as string * 16 'dnlen + 1
End type

'Rascredmask

Public Enum rascredmask
Rascm_username = & H1 &
Rascm_password = & H2 &
Rascm_domain = & H4 &
Rascm_defaultcreds = & H8 &
Rascm_presharedkey = & H10 &
Rascm_serverpresharedkey = & H20 &
Rascm_ddmpresharedkey = & h40 &
End Enum

'Rasentryoptions

Public Enum rasentryoptions
Raseo_usecountryandareacodes = & H1
Raseo_specificipaddr = & H2
Raseo_specificnameservers = & h4
Raseo_ipheadercompression = & H8
Raseo_remotedefagateway gateway = & H10
Raseo_disablelcpextensions = & H20
Raseo_terminalbeforedial = & h40
Raseo_terminalafterdial = & h80
Raseo_modemlights = & h100
Raseo_swcompression = & h200
Raseo_requireencryptedpw = & H400
Raseo_requiremsencryptedpw = & h800
Raseo_requiredataencryption = & h1000
Raseo_networklogon = & h2000
Raseo_uselogoncredentials = & h4000
Raseo_promotealternates = & h8000
Raseo_securelocalfiles = & h10000
Raseo_requireeap = & h20000
Raseo_requirepap = & h40000
Raseo_requirespap = & h80000
Raseo_custom = & h100000
Raseo_previewphonenumber = & h200000
Raseo_sharedphonenumbers = & h800000
Raseo_previewuserpw = & h000000
Raseo_previewdomain = & h2000000
Raseo_showdialingprogress = & h4000000
Raseo_requirechap = & h8000000
Raseo_requiremschap = & hsf-000
Raseo_requiremschap2 = & h20000000
Raseo_requirew95mschap = & h40000000
Raseo_customscript = & h80000000
End Enum

'Rasentryoptions2

Public Enum rasentryoptions2
Raseo2_securefileandprint = & H1
Raseo2_secureclientformsnet = & H2
Raseo2_dontnegotiatemultilink = & h4
Raseo2_dontuserascredentials = & H8
Raseo2_usepresharedkey = & H10
Raseo2_internet = & H20
Raseo2_disablenbtoverip = & h40
Raseo2_useglobaldevicesettings = & h80
Raseo2_reconnectifdropped = & h100
Raseo2_sharephonenumbers = & h200
Raseo2_secureroutingcompartment = & H400
Raseo2_4256specificnameserver = & h800
Raseo2_00006remotedefagateway gateway = & h1000
Raseo2_registeripwithdns = & h2000
Raseo2_usednssuffixforregistration = & h4000
Raseo2_00004explicitmetric = & h8000
Raseo2_00006explicitmetric = & h10000
Raseo2_disableikenameekucheck = & h20000
End Enum

'Dwencryptiontype: Data Encryption type
Private const et_none as long = 0' no encryption
Private const et_require as long = 1 'require Encryption
Private const et_requiremax as long = 2 'require Max Encryption
Private const et_optional as long = 3 'do encryption if possible. None OK.

'Dwvpnstrategy VPN type
Private const vs_default as long = 0 'default (PPTP for now)
Private const vs_pptponly as long = 1' only PPTP is attempted.
Private const vs_pptpfirst as long = 2 'pptp is tried first.
Private const vs_l2tponly as long = 3' only L2TP is attempted.
Private const vs_l2tpfirst as long = 4 'l2tp is tried first.

'Dwtype dialing type
Private const raset_phone as long = 1 'phone lines: Modem, ISDN, X.25, etc
Private const raset_vpn as long = 2 'virtual Private Network
Private const raset_direct as long = 3 'direct CONNECT: serial, parallel
Private const raset_internet as long = 4' Basecamp Internet
Private const raset_broadband as long = 5' broadband

'Dial-up/network disconnection

Private const internet_dialstate_disconnected = 1
Private const internet_autodial_force_online = 1
Private const internet_autodial_force_unattended = 2
Private const internet_dial_unattended = & h8000

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.