pay_online.asp

来自「多多网店系统v3.01 完全免费可用版-功能简介: 支持多模板皮肤色切换[8套」· ASP 代码 · 共 27 行

ASP
27
字号
<%
dim dbpath
dbpath=""
%>
<!--#include file=Conn.asp -->
<!--#include file=include/MyRequest.asp -->
<!--#include file=Sub.asp -->
<%
call up("在线支付","在线支付","在线支付")
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select root_info_sitename from root_info where id=1"
rs.open sql,conn,1,1
root_info_sitename=rs(0)
rs.close
set rs=nothing

response.write "<form name=formorder method=post action=OnlyOne_ByAlipay.asp>"
response.write "<input type=hidden name=product_info_name value="&root_info_sitename&"在线支付货款项>"
response.write "<tr><td></td><td><img src=images/logo_alipay.gif align=absmiddle><b>在线支付货款</b></td></tr>"
response.write "<tr><td>请输入支付金额:</td><td><input type=text size=30 name=product_info_PriceS></td></tr>"
response.write "<tr><td>付款人真实姓名:</td><td><input type=text size=30 name=order_info_realname></td></tr>"
response.write "<tr><td>付款人联系电话:</td><td><input type=text size=30 name=order_info_tel>	   </td></tr>"
response.write "<tr><td>付款人电子邮箱:</td><td><input type=text size=30 name=order_info_email>   </td></tr>"
response.write "<tr><td>				</td><td><input type=submit value=  开始支付 >		   </td></tr>"
response.write "</form>"
call down()
%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?