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
<head> <meta http-equiv="Content-Language" content="zh-cn"> </head> <body style="color:#000000" > <table border="0" width="800" style="border-collapse: collapse"> <% Dim SS(1000,6) Dim ASC365_Cart_001 Set fs=Server.CreateObject("Scripting.FileSystemObject") JJ=0 mm=0 dim TT(200) ID=trim(Request.Querystring("ID")) if left(ID,2)="PD" then ProductID=replace(ID,"PD","") LL=left(ProductID,3) RR=right(ProductID,3) CPpathh= Server.MapPath("../Admin/" &LL & "/" & RR &"/0000mainpage.htm") If (fs.FileExists(CPpathh))=true Then set t=fs.OpenTextFile(CPpathh,1,false,0) x=t.ReadAll t.close Set t=Nothing end if '**************************************************************************************** for ij= 0 to 200 '�ͻ����add to cart if request.form ("BM"&ij)="Add to Cart" then ASC365_Cart_001=request.Cookies("ASC365_Cart_001") '��������� for ii= 0 to 6 yy=request.form ("TA"&(ij*7)+ii) if ii=1 then '------------- yy=replace(yy,chr(34),"") '��ƷӢ������ 34 39 yy=replace(yy,chr(39),"") '��ƷӢ������ 34 39 '------------- end if if ii=4 then if isnumeric(yy)<>true then yy=1 end if ASC365_Cart_001=ASC365_Cart_001 & "|" & yy next response.Cookies("ASC365_Cart_001")=ASC365_Cart_001 '------------------------------------------ ASC365_Cart_001=request.Cookies("ASC365_Cart_001") '��������� Cart_js=0 if len(ASC365_Cart_001)<>0 then temp=split(ASC365_Cart_001,"|") N_js=ubound(temp) for i=1 to N_js step 7 SS(Cart_js,0)=temp(i) '��Ʒ���� SS(Cart_js,1)=temp(i+1) '��Ʒ���� SS(Cart_js,2)=temp(i+2) '��Ʒ���� SS(Cart_js,3)=temp(i+3) '��Ʒ��� SS(Cart_js,4)=temp(i+4) '���� SS(Cart_js,5)=temp(i+5) '��վ���� SS(Cart_js,6)=temp(i+6) '��ע Cart_js=Cart_js+1 next end if '--------------------------- for j=0 to Cart_js-1 '�ϲ�ͬ���� for jj= 0 to Cart_js-1 if j<>jj and SS(j,0)=SS(jj,0) then SS(jj,0)="*" SS(j,4)= (SS(j,4)*1)+(SS(jj,4)*1) end if next next ASC365_Cart_001="" for i=0 to Cart_js-1 if SS(i,0)<>"*" then ASC365_Cart_001=ASC365_Cart_001&"|"&SS(I,0)&"|"&SS(I,1)&"|"&SS(I,2)&"|"&SS(I,3)&"|"&SS(I,4)&"|"&SS(I,5)&"|"&SS(I,6) end if next response.Cookies("ASC365_Cart_001")=ASC365_Cart_001 end if next '**************************************************************************************** for i=0 to 1000 '���������ǰ��������� for j=0 to 6 SS(i,j)="" next next '------------------------------------------ ASC365_Cart_001=request.Cookies("ASC365_Cart_001") '��������� 'response.write ASC365_Cart_001 Cart_js=0 Qty=0 Subp=0 if len(ASC365_Cart_001)<>0 then temp=split(ASC365_Cart_001,"|") N_js=ubound(temp) for i=1 to N_js step 7 SS(Cart_js,0)=temp(i) '��Ʒ���� SS(Cart_js,1)=temp(i+1) '��Ʒ���� SS(Cart_js,2)=temp(i+2) '��Ʒ���� SS(Cart_js,3)=temp(i+3) '��Ʒ��� SS(Cart_js,4)=temp(i+4) '���� SS(Cart_js,5)=temp(i+5) '��վ���� SS(Cart_js,6)=temp(i+6) '��ע Qty=Qty*1+SS(Cart_js,4)*1 Subp=Subp*1+Round((SS(Cart_js,3)*SS(Cart_js,4)),2)*1 Cart_js=Cart_js+1 next inf1= "<font color='#33CCFF'>My shipping cart: Item " & Qty &" "& "Subtotal $" & Subp &"</font>" end if '--------------------------- %> <tr> <td height="2" width="795" style="text-align:left"><%=x%></td> </tr> <%'----------------------�۸���-------------------- JGpathh= Server.MapPath("../Admin/" &LL& "/" & RR &"/SellFlag.inc") If (fs.FileExists(JGpathh))=true then Set f=fs.OpenTextFile(Server.MapPath("../Admin/" & LL & "/" & RR &"/Tech.inc"), 1) '��ȡ���ƣ����� for m= 0 to 50 TT(m)=trim(f.ReadLine) next f.Close: Set f=Nothing '---------------------------------------------------- JG=Server.MapPath("../Admin/" & LL & "/" & RR &"/GGprice.inc") '��ȡ�۸� DJ="" BZ="" If (fs.FileExists(JG))=true then Set f=fs.OpenTextFile(JG, 1) xX0=trim(f.ReadLine)' code xX1=trim(f.ReadLine)' '������ xX2=trim(f.ReadLine)' '��С���� xX3=trim(f.ReadLine)' '���� xX4=trim(f.ReadLine)' '����US$ xX5=trim(f.ReadLine)' '���� xX6=trim(f.ReadLine)' '��� xX7=trim(f.ReadLine)' '��λ xX8=trim(f.ReadLine)' '��վ���� xX9=trim(f.ReadLine)' '����RMB xX10=trim(f.ReadLine)' '����ע xX11=trim(f.ReadLine)' '��ע f.Close: Set f=Nothing DJ=xX6 BZ=xX8 end if %> <tr> <td height="29" width="800"> <table border="0" width="798" height="20" style="border-collapse: collapse" bgcolor="#996633"> <form method="POST" action=""> <tr> <td height="18" width="57" align="center"><font face="Verdana"><span style="font-size: 9pt"><font color="#FFFFFF">Item#</font></td> <td height="18" width="364" align="center"><font face="Verdana" color="#FFFFFF"><span style="font-size: 9pt">Description </td> <td height="20" width="102" align="center"><font face="Verdana" color="#FFFFFF"><span style="font-size: 9pt">Weight (kg)</span></font></td> <td height="20" width="102" align="center"><font face="Verdana" color="#FFFFFF"><span style="font-size: 9pt">Unit Price (US$)</span></font></td> <td height="20" width="49" align="center"><font face="Verdana" color="#FFFFFF"><span style="font-size: 9pt">QTY</span></font></td> <td height="39" width="108" rowspan="2"><p align="center"> <input type="submit" value="Add to Cart" name="<%="BM"&mm%>"<%mm=mm+1%> style="font-size: 10px; font-family: Verdana"></td> </tr> <tr> <td height="18" width="57" align="center" bgcolor="#FFFFFF"><font face="Verdana"><span style="font-size: 9pt; color:#000000"><b><%=LL&RR%></b></span></font> <input type="hidden" name="<%="TA"&JJ%>"value="<%=LL&RR%>"><%JJ=JJ+1%></td><%'��Ʒ����%> <td height="18" width="364" align="center" bgcolor="#FFFFFF"><font face="Verdana"><span style="font-size: 9pt; color:#000000"><b><%=TT(2)%></b></span></font> <input type="hidden" name="<%="TA"&JJ%>"value="<%=TT(2)%>"><%JJ=JJ+1%></td><%'��Ʒ����%> <td height="20" width="102" align="center" bgcolor="#FFFFFF"><font face="Verdana"><span style="font-size: 9pt; color:#000000"><b><%=TT(9)%></b></span></font> <input type="hidden" name="<%="TA"&JJ%>"value="<%=TT(9)%>"><%JJ=JJ+1%></td><%'��Ʒ����%> <td height="20" width="102" align="center" bgcolor="#FFFFFF"><font face="Verdana"><span style="font-size: 9pt; color:#000000"><b><%=DJ%></b></span></font> <input type="hidden" name="<%="TA"&JJ%>"value="<%=DJ%>"><%JJ=JJ+1%></td><%'��Ʒ���%> <td height="20" width="49" bgcolor="#FFFFFF"><p align="center"> <input type="text" name="<%="TA"& JJ%>" <%JJ=JJ+1%> size="4" style="font-size: 10px; font-family: Verdana; color:#000000"></td><%'����%> </tr> <tr> <td height="18" width="423" align="center" colspan="2" bgcolor="#FFFFCC"> <font face="Verdana"><span style="font-size: 9pt; color:#000000"><%=BZ%></span></font> <input type="hidden" name="<%="TA"&JJ%>"value="<%=BZ%>"><%JJ=JJ+1%></td><%'��վ����%> <td height="18" width="371" align="center" colspan="5" bgcolor="#FFFFFF"> <font size="2" face="Verdana">Note:</font> <input type="text" name="<%="TA"&JJ%>"<%JJ=JJ+1%> size="60" style="font-size: 10px; font-family: Verdana; color:#000000"></td><%'��ע%> </tr> </form> </table> </td> </tr> <%end if%> <% end if %> </table> </body> </html>