author | Dan Fuhry <dan@enanocms.org> |
Sat, 21 Aug 2010 18:19:58 -0400 | |
changeset 10 | 014d58335b6d |
parent 2 | 0c0d5dadfca3 |
permissions | -rw-r--r-- |
0 | 1 |
Page custom CredentialsCreate CredentialsLeave " - Admin login" |
2 |
||
3 |
Function CredentialsCreate |
|
10
014d58335b6d
Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents:
2
diff
changeset
|
4 |
IntCmp $skip_install 0 +2 |
014d58335b6d
Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents:
2
diff
changeset
|
5 |
Abort |
014d58335b6d
Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents:
2
diff
changeset
|
6 |
|
0 | 7 |
!insertmacro XPUI_HEADER_TEXT "Create administrator" "Enter your desired username and password for administering your site." |
8 |
!insertmacro XPUI_INSTALLOPTIONS_EXTRACT_AS "pages\Login.ini" "Login.ini" |
|
9 |
!insertmacro XPUI_INSTALLOPTIONS_DISPLAY "Login.ini" |
|
10 |
FunctionEnd |
|
11 |
||
12 |
Function CredentialsLeave |
|
13 |
StrCmp $XPUI_ABORTED "1" 0 +2 |
|
14 |
Return |
|
15 |
||
16 |
ReadIniStr $enano_user "$PLUGINSDIR\Login.ini" "Field 1" "State" |
|
17 |
StrCmp $enano_user "" 0 +3 |
|
18 |
MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter a username." |
|
19 |
Abort |
|
20 |
||
21 |
ReadIniStr $enano_password "$PLUGINSDIR\Login.ini" "Field 2" "State" |
|
22 |
Strlen $0 $enano_password |
|
23 |
IntCmp $0 6 +3 0 +3 |
|
24 |
MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter a password that is at least six characters long." |
|
25 |
Abort |
|
26 |
||
27 |
ReadIniStr $0 "$PLUGINSDIR\Login.ini" "Field 3" "State" |
|
28 |
StrCmp $0 $enano_password +3 |
|
29 |
MessageBox MB_OK|MB_ICONEXCLAMATION "The passwords you entered do not match. Please enter them again." |
|
30 |
Abort |
|
31 |
||
32 |
ReadIniStr $admin_email "$PLUGINSDIR\Login.ini" "Field 4" "State" |
|
33 |
StrCmp $admin_email "" 0 +3 |
|
34 |
MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter your e-mail address." |
|
35 |
Abort |
|
2
0c0d5dadfca3
Added LockWindow calls to all custom page exit paths to smooth transitions
Dan
parents:
0
diff
changeset
|
36 |
|
0c0d5dadfca3
Added LockWindow calls to all custom page exit paths to smooth transitions
Dan
parents:
0
diff
changeset
|
37 |
LockWindow on |
0 | 38 |
FunctionEnd |
39 |