Dre4m Was Here

Dre4m Shell

Server IP : 103.6.199.200 / Your IP : 3.147.205.19
Web Server : Microsoft-IIS/10.0
System : Windows NT EMPUSA 10.0 build 20348 (Windows Server 2016) i586
User : EMPUSA$ ( 0)
PHP Version : 7.4.33
Disable Function : NONE
MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF
Directory : C:/Domains/asiageml/asiagemlab.com/wwwroot/lab/

Upload File :

[ HOME SHELL ]

Current File : C:/Domains/asiageml/asiagemlab.com/wwwroot/lab/menu.asp

<%
userMode	  = session("LoginSucceeded")

Response.Write "<table border=""0"" width='100%'>"
Response.Write "<tr><td><img src=""../images/logo.jpg"" width=""140""><i><b> " & session("userID") & "</b></i></td><td align=""right"">"
Select Case userMode
	Case "AdminIT":	
		vBranch = "KL"
		Response.Write "(Branch: " & vBranch &") |"
		Response.Write "<a href='sysList.asp?base=gemologist&Reload=Y'>Gemologist</a> | "
		Response.Write "<a href='importData.asp?Reload=Y'>Import Data</a> | "
		Response.Write "<a href='logout.asp'>Logout</a> | "	
		
	Case "Admin":
		vBranch = "KL"
		Response.Write "(Branch: " & vBranch &") |"
		Response.Write "<a href='memoNew.asp?Reload=Y'>KL Memo New</a> | "
		Response.Write "<a href='memoList.asp?Reload=Y'>KL Memo List</a> | "	
		
		Response.Write "<a href='certNew.asp?Reload=Y'>KL Cert New</a> | "
		Response.Write "<a href='certList.asp?Reload=Y'>KL Cert List</a> | "	
		Response.Write "<a href='certList_PG.asp?Reload=Y'>PG Cert List</a> | "	
		Response.Write "<a href='logout.asp'>Logout</a> | "	
		
	Case "AdminPG":	
		vBranch = "PG"
		Response.Write "(Branch: " & vBranch &") |"
		Response.Write "<a href='memoNew.asp?Reload=Y'>PG Memo New</a> | "
		Response.Write "<a href='memoList.asp?Reload=Y'>PG Memo List</a> | "

		Response.Write "<a href='certNew.asp?Reload=Y'>PG Cert New</a> | "
		Response.Write "<a href='certList.asp?Reload=Y'>PG Cert List</a> | "	
		Response.Write "<a href='certList_KL.asp?Reload=Y'>KL Cert List</a> | <BR>"	

		Response.Write "<a href='courseCertNew.asp?Reload=Y'>Course Cert New</a> | "
		Response.Write "<a href='courseCertList.asp?Reload=Y'>Course Cert List</a> | "

		Response.Write "<a href='logout.asp'>Logout</a> | "	

	Case "Normal"
		Response.Write "<a href='logout.asp'>Logout</a> | "	
	Case Else
		Response.Write"Please Login"
		'Response.Write "<a href='salesList.asp?Reload=Y'>Sales List</a> | "	
End Select
Response.Write "</td></tr></table>"

%>

Anon7 - 2022
AnonSec Team