日期:2014-05-17  浏览次数:20865 次

ASP "返回的数据页面"数据库修改???
我想可以在此页面修改数据,(数据库是SQL的)
                怎么总写不进去呢/?????

或者可以写到一个页面的办法???     求助!!!
(1)   这个页面是返回的数据,详细数据内容页面!

<%
    set   rs=server.CreateObject( "ADODB.Recordset ")  
    strSQL= "select   *   from   Docstate   where   king_page= ' "&Request.QueryString( "king_page ")& " ' "  
    rs.Open   strSQL,conn,3,3      
%>    
<html>
<BODY>
<form     action= "OKking_Admin.asp "   name= "form1 "   method= "post "   ID= "Form1 ">
<table>
<tr>
<td> 章节 <INPUT   id= "Text1 "   type= "text "   name= "king_page "   value= " <%=rs( "king_page ")> "> </td>
<tr>
<td> 英翻 <INPUT   id= "Text2 "   type= "text "   name= "king_EVersion "   value= " <%=rs( "king_EVersion ")%> "> </td>
<td> 英校 <INPUT   id= "Text3 "   type= "text "   name= "king_ECollate "   value= " <%=rs( "king_ECollate ")%> "> </td>
<td> 韩翻 <INPUT   id= "Text4 "   type= "text "   name= "king_HVersion "   value= " <%=rs( "king_HVersion ")%> "> </td>
<td> 韩校 <INPUT   id= "Text5 "   type= "text "   name= "king_HCollate "   value= " <%=rs( "king_HCollate ")%> "> </td>
<td> 繁翻 <INPUT   id= "Text6 "   type= "text "   name= "king_FVersion "   value= " <%=rs( "king_FVersion ")%> "> </td>
<td> 繁校 <INPUT   id= "Text7 "   type= "text "   name= "king_FCollate "   value= " <%=rs( "king_FCollate ")%> "> </td>
</tr>
<tr>
<td> 数字 <INPUT   id= "Text8 "   type= "text "   name= "king_Chinahow "   value= " <%=rs( "king_Chinahow ")%> "> </td>
<td> 描述 <INPUT   id= "Text9 "   type= "text "   name= "king_MatterRemark "   value= " <%=rs( "king_MatterRemark ")%> "> </td>
</tr>
<%   if   Session( "power ") <> 1   then   %>
<%   else   %>
<tr>
<td   valign= "middle "nowrap> <INPUT   type= 'submit '   name= 'Submit '   value= '修改 '   ID= "Submit1 "> </td>
</tr>                              
<%   end   if   %>
</TABLE>
</form>
</BODY>
</HTML>

(2)   OKking_Admin.asp

<!--#include   file= "conn.asp "-->
<%  
      king_page=request.Form( "king_page ")
      king_EVersion=request.Form( "king_EVersion ")