View difference between Paste ID: UDFTv5vv and BhNSMeKx
SHOW: | | - or go back to the newest paste.
1
#cs ----------------------------------------------------------------------------
2
AutoIt Version : 3.3.6.1
3
Author : SYED JAHANZAIB
4
Email : aacable@hotmail.com
5
Web : http://aacable.wordpress.com
6
Script Function: Template AutoIt script. for PPPoE Dialer Installer
7
OS Supported   : Windows 7
8
Dated          : 27/09/2011
9
#ce ----------------------------------------------------------------------------
10
; Script Start - Add your code below here
11
12
$DELAY = 300 
13
$answer = MsgBox(4, "PPPOE Connection", "This script will create a PPPOE DIALER, Do you want to Continue?")
14
 If $answer = 7 Then
15
 Exit
16
 EndIf
17
 
18
WinMinimizeAll ( ) 
19
; Put Logo in front and do installation in background, place dialer.jpg in the same folder 
20
; From you have launched dialer.
21
SplashImageOn("Please wait Few Seconds While Installer Installs PPPoE Dialer ", "dialer.jpg", 800,650)
22
23-
$COMPANY_NAME = ("Type Your pppoe service name here")
23+
$COMPANY_NAME = ("PAK_NET")
24
; Example $COMPANY_NAME = ("MY_ISP")
25
$DELAY = 300 
26
27
; Run Windows 7 Network Setup
28
Run("control.exe /name Microsoft.NetworkAndSharingCenter")
29
Sleep($DELAY)
30
31-
; Send TAB 7 times to Select 'setup a new connection'
31+
; Send TAB 9 times to Select 'setup a new connection'
32-
Send("{TAB 7}")
32+
Send("{TAB 9}")
33
34
; Send Enter to Launch 'setup a new connection'
35
Send("{ENTER}")
36
37
; Send Next to select 'Connect to Internet'
38
Sleep($DELAY)
39
Send("!n")
40
41
; Send 'S' to select 'Setup a new connection anyway
42
Sleep($DELAY)
43
Send("!s")
44
45
;Check Duplicate Connection ???
46
47
Sleep($DELAY)
48
Send("!n")
49
50
; Send 'r' to select 'Broadband PPPoE'
51
Sleep($DELAY)
52
Send("!r")
53
54
; Send TAB 4 times to Enter 'ISP NAME'
55
Sleep($DELAY)
56
Send("{TAB 4}")
57
Send($COMPANY_NAME)
58
Sleep($DELAY)
59
60
; Send 'c' to connect $COMPANY_NAME service to contiue further
61
Sleep($DELAY)
62
Send("!c")
63
64
; Send 's' to skip connect '$comapany name' service to contiue further
65
Sleep($DELAY)
66
Send("!s")
67
68
; Send 'c' to close.
69
Sleep($DELAY)
70
Send("!c")
71
72
WinClose("Network Connections")
73
Run("control.exe /name Microsoft.NetworkAndSharingCenter")
74
Sleep($DELAY)
75
Send("!F")
76
Send("c")
77
SplashOff ( )
78
Sleep($DELAY)
79
Run("control ncpa.cpl")
80
WinWaitActive("Network Connections")
81
Sleep($DELAY)
82
;send ( "!{TAB}" )
83
Sleep($DELAY)
84-
MsgBox(0, "Setup Complete", "Your Dialer have been installed , Click Connect on  " & $COMPANY_NAME & " to initiate Dialing :) ")    
84+
MsgBox(0, "Setup Complete", "Your Dialer have been installed , Click Connect on  " & $COMPANY_NAME & " to initiate Dialing :) ")