asp中用VBscripy写过程出现了有关问题-ASP教程-爱易网页

asp中用VBscripy写过程出现了有关问题

日期：2014-05-17　浏览次数：21083 次

asp中用VBscripy写过程出现了问题
各位好：
我在asp页面里写了过程结果出现了500错误，请帮忙看看，谢谢！
过程如下：sub changeps，changeschool，changeurl
<html> <head>
<title> 用户信息修改 </title>
<style type= "text/css ">

</style>
</head>
<body bgcolor= "#FFFBFF " topmargin= "0 " leftmargin= "0 ">

<%
code_sql1= "select * from inform where username= ' "&session( "theuser ")& " ' "
set rs1=conn.execute(code_sql1)
code_sql2= "select * from schoolurl where id= ' "&mid(session( "theuser "),5,3)& " ' "
set rs2=conn.execute(code_sql2)

sub changeps(username as string,newpassword as string)
msql= "update inform set password= ' " & newpassword & " ' where username= ' " & username & " ' "
conn.execute(msql)
end sub
sub changeschool(id as string,newname as string)
msql= "update schoolurl set school= ' " & newname & " ' where id= ' " & mid(session( "theuser "),5,3) & " ' "
conn.execute(msql)
end sub
sub changeurl(id as string,newurl as string)
msql= "update schoolurl set url= ' " & newurl & " ' where id= ' " & mid(session( "theuser "),5,3) & " ' "
conn.execute(msql)
end sub

%>
<div align= "center ">
<center>
<table border= "0 " cellpadding= "0 " cellspacing= "0 " width= "778 " height= "100% ">
<tr>
<td colspan= "3 " height= "86 ">

</td>
</tr>
<tr>
<td width= "150 " align= "center " valign= "top ">

</td>
<td width= "1 " bgcolor= "#458D8D ">

免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。

asp中用VBscripy写过程出现了有关问题

相关资料更多>

推荐阅读更多>