找回密码
 加入会员
搜索
查看: 1505|回复: 2

有谁可发帮下忙/这个ASP程序不能写入ACCESS里,这是为什么;

[复制链接]

0

主题

4

回帖

5

积分

清职客人

kood

发表于 2007-9-29 22:00 | 显示全部楼层 |阅读模式
<!--#include file="conn.asp"-->

<!--#include file="const.asp"-->
<%
username=request("username")
passwd=request("passwd")
%>
<html>
<head><LINK
href="images/index.css" rel=stylesheet type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=fly_user%>--作者信息修改</title>

<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<link rel="stylesheet" type="text/css" href="images/index.css">
<style type="text/css">
<!--
.STYLE1 {color: #990099}
body,td,th {
        font-size: 12px;
        font-family: 宋体;
        font-weight: bold;
}
-->
</style>
</head>
<body style="text-align: center" stylesrc="index.asp" background="img/bg.gif" bgcolor="#666666" text="#000000" link="#FFFFFF" vlink="#FFFFFF" alink="#CC6600">
  <%dim rs,name,tsql, rst
      username=Session("userName")
        set rs=server.CreateObject("ADODB.RecordSet")
        set rst=server.CreateObject("ADODB.RecordSet")
            rs.open "select * from admin where username='"&username&"'",conn,1,1
            if rs.eof then
response.redirect "login.asp"
response.end
end if
%>

<table width="752" height="169" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" bgcolor="#FFFFFF" style="border-collapse: collapse">
  <tr>
    <td width="750" height="20" bgcolor="#C0C0C0">
    <p style="text-indent: 10">
              <font color="#111111">你的位置&gt;&gt;</font><a href="index.asp"><font color="#111111"><%=fly_user%></font></a><font color="#111111">&gt;&gt;<%=rs("username")%>的用户资料修改</font></td>
  </tr>
  <tr>
    <td width="100%" height="137">
  
       <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" height="243">
      <tr>
        <td width="100%" height="228" align="center">
        <form name=pass method="post" action="usereditok.asp">
         <table width="43%" height="115" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#C0C0C0" id="AutoNumber2" style="border-collapse: collapse">
          <tr>
            <td width="20%" height="54" align="center">
            <p align="center"><font color="#FF00FF">您的用户名称:</font></td>
            <td width="81%" height="54" colspan="2"><font color="#FF00FF"><input name="username" type="hidden" id="username" value="<%=username%>" size="10">
            <%=rs("username")%></font></td>
          </tr>
          <tr>
            <td width="20%" height="55" align="center">
            <p align="center"><font color="#008000">您的用户密码:</font><font color="#FF0000">**</font></td>
            <td width="37%" height="40">
            <INPUT TYPE="password" size=20 NAME="passwd" class=smallInput value="<%=rs("passwd")%>" style="border:1px solid #800000; "> </td>
            <td width="48%" height="104" rowspan="5"><%username=Session("userName")%>
<%if username<>"" then%><%if rs("small") then%>
            <p align="center">
<a target="_blank" href="displayphoto.asp?id=<%=rs("id")%>">
<img border="0" src="displayphoto.asp?id=<%=rs("id")%>" width="150" height="130"></a><%else%><%if rs("sex")="男" then%>
<img border="0" src="img/photo.gif" width="150" height="130">
<%else%>
<img border="0" src="img/photov.gif" width="150" height="130">
<%end if%><%end if%><%end if%>

             </td>
          </tr>
          <tr>
            <td width="20%" height="48" align="center"><font color="#008000">密码提示问题:</font><font color="#FF0000">**</font></td>
            <td width="37%" height="40">
            <INPUT TYPE="text" size=20 NAME="ask" class=smallInput value="<%=rs("ask")%>" style="border:1px solid #800000; "></td>
          </tr>
          <tr>
            <td width="20%" height="21" align="center"><font color="#008000">密码提示答案:</font><font color="#FF0000">**</font></td>
            <td width="37%" height="40">
            <INPUT TYPE="text" size=20 NAME="answer" class=smallInput value="<%=rs("answer")%>" style="border:1px solid #800000; "></td>
          </tr>
          <tr>
<td width="21%" height="32" align="center">         
                       <font color="#008000">&nbsp;您来自何方 :</font></td>
<td width="37%" height="40">
                       <font color="#FFFFFF">
                       <input name=addr size="20" class="smallInput" maxlength="10" style="border: 1px solid #800000; " value="<%=rs("addr")%>"></font></td>
          </tr>
          <tr>
            <td width="20%" height="38" align="center"><font color="#008000">OICQ号码:</font></td>
            <td width="37%" height="40">
            <INPUT TYPE="text" size=20 NAME="oicq" class=smallInput value="<%=rs("oicq")%>" style="border:1px solid #800000; "></td>
          </tr>
          <tr>
            <td width="20%" height="12" align="center"><font color="#008000">电子邮件地址:</font><font color="#FF0000">**</font></td>
            <td width="37%" height="40">
            <INPUT TYPE="text" size=20 NAME="email" class=smallInput value="<%=rs("email")%>" style="border:1px solid #800000; "></td>
            <td width="48%" height="12"><p align="center">
                        <a href="sendphoto.asp" class="STYLE1" style="text-decoration: none">上传照片</a>(相片大小128*128)</td>
          </tr>
          <tr>
            <td width="100%" height="21" colspan="3">
            <p align="center"><font color="#008000">个人签名:</font><font color="#FF0000">**</font></td>
          </tr>
          <tr>
            <td width="100%" height="54" colspan="3">
            <p align="center">
            <textarea rows="4" INPUT TYPE="text" size=10 NAME="infor"  class=smallInput cols="66" style="border: 1px solid #800000; background-color: #FFFFFF"><%=rs("infor")%></textarea> </td>
          </tr>
          <tr>
            <td width="100%" height="25" colspan="3">
            <p align="center">
          <INPUT name="change" class=buttonface value="修改" type='submit' style="color: #000000; border: 1px solid #008000; background-color: #FFFFFF"></td>
          </tr>
        </table>
        </form>
   </td>
      </tr>
      <tr>
        <td width="100%" height="15" align="center" bgcolor="#E6E6E6">
<font color="#006CD9"> </font><font color="#FF0000">注</font><font color="#006CD9">:标</font><font color="#FF0000">**</font><font color="#006CD9">者为必填项 <script LANGUAGE="JavaScript">
function goHist(a)
{
   history.go(a);   
}
</script>
修改后,请刷新页面,即可看到修改后的内容。</font><form METHOD="post">
  <p align="center">
  <input TYPE="button" VALUE="&lt;--返回" onClick="goHist(-1)" style="background-color: #FFFFFF; border: 1px solid #000080; ">
  </p>
  </form>
        </td>
      </tr>
    </table>
    </td>
  </tr>
</table><%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

0

主题

4

回帖

5

积分

清职客人

kood

 楼主| 发表于 2007-9-29 23:44 | 显示全部楼层

可怜

?;P
回复

使用道具 举报

140

主题

606

回帖

1554

积分

清职生活

发表于 2007-9-29 23:58 | 显示全部楼层
再调试看看吧.

认真看看那里错了.

友情帮顶.
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 加入会员

本版积分规则

Archiver|手机版|小黑屋|清职在线BBS站 ( 粤R:000003 )

GMT+8, 2025-8-30 16:10 , Processed in 0.078038 second(s), 27 queries .

Powered by Discuz! X3.5

© 2006-2025 QYPT.COM

快速回复 返回顶部 返回列表