<%@ LANGUAGE = "VBScript" ENABLESESSIONSTATE = True %>
<%Option Explicit%>
<%Response.Buffer = True%>
<%Server.ScriptTimeout = 100000000%>
<%
'***********************************************************
'** Copyright Notice **
'** Tassietek - MailerPro **
'** Copyright 2001-2004 Tassietek All Rights Reserved. **
'***********************************************************
'** PREVENT PAGE FROM BEING CACHED
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "No-Store"
'** CHECKING TO SEE IF LOGGED IN IF NOT TAKE YOU TO THE LOGIN PAGE
If Request.Cookies("login") = "" Then
Response.Cookies("action") = "error"
Response.Write("")
Response.End
Elseif Request.Cookies("login") = "2" Then
Response.Redirect"default.asp"
Elseif Request.Cookies("login") = "3" Then
Response.Redirect"sendemail.asp"
End If
If Session("Start") = "" Then
Response.Cookies("a") = "ended"
Response.Redirect"login.asp?logoff=1"
End If
%>
<%
Dim rs
Dim sql
If Request("action") = "reinstall" Then
Server.Execute"reinstall_mysql.asp"
If err <> 0 Then
Response.Write""
err.clear
Response.End
End If
Response.Cookies("login") = ""
Response.Redirect"default.asp"
End If
If Request("action") = "deletion" Then
Server.Execute"delete_mysql.asp"
If err <> 0 Then
Response.Write""
err.clear
Response.End
End If
Response.Cookies("login") = ""
Response.Redirect"deletion.html"
End If
%>
<%=Session("SiteName")%> - MYSQL Maintenance
Please take note this procedure will destroy all
existing tables and all data concerning MailerPro. After reinstall you will have enter
registration and details into setup again.
After reinstall is completed you will be taken to the
registration page.
Permanent Deletion of all Tables, Procedures and Index's
Please take note this procedure will permanently delete
all from your sql database to do with MailerPro. Running "default.asp"
or "login.asp" will reinstall everything.
You will be taken to a deletion verification page once deletion completed.
