高考问答地铁的广告投放:asp程序解答
来源：百度文库 编辑：高考问答 时间：2024/04/29 21:18:11
<% sub display()%>
<table border=1>
<tr>
<td>
<form action="18.asp" method="post">
<input type="text" name="n1">
<input type="text" name="n2"><br>
<input type="submit" value="确定">
</form>
</td>
<tr>
</table>
<%end sub%>
<% function mmcc()
n1=request("n1")
n2=request("n2")
if n1=1 and n2 =1 then
response.Write("你连1加1也不知道了吗？！！！")
else
nndd
end if
end function
sub nndd()
if n1<>empty and n2<>empty then
n=Cdbl(n1)+CDbl(n2)
response.Write(n)
end if
end sub %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ASP调用</title>
</head>
<body>
<%display()%>
<%mmcc()%>
</body>
</html>
<table border=1>
<tr>
<td>
<form action="18.asp" method="post">
<input type="text" name="n1">
<input type="text" name="n2"><br>
<input type="submit" value="确定">
</form>
</td>
<tr>
</table>
<%end sub%>
<% function mmcc()
n1=request("n1")
n2=request("n2")
if n1=1 and n2 =1 then
response.Write("你连1加1也不知道了吗？！！！")
else
nndd
end if
end function
sub nndd()
if n1<>empty and n2<>empty then
n=Cdbl(n1)+CDbl(n2)
response.Write(n)
end if
end sub %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ASP调用</title>
</head>
<body>
<%display()%>
<%mmcc()%>
</body>
</html>
你贴程序又没说要求，怎么帮你啊，需要的话，把程序和需求发我邮箱，我帮你看看，我的邮箱是tjoy7d@126.com