会员登录 用户名: 密码: 登录 新会员注册 [找回密码]
当前位置:编程论坛 >> Web开发技术 >> ASP编程论坛 >> 我是个初学者请各位高人指点一下小弟不清楚的代码谢谢
首页
中资源
  发表一个新主题  发表一个新投票  回复主题 您是本帖的第 1198 个阅读者浏览上一篇主题  刷新本主题   平板显示贴子 浏览下一篇主题
 * 贴子主题:我是个初学者请各位高人指点一下小弟不清楚的代码谢谢 悬赏分50 [提问中] 报告本帖给版主  显示可打印的版本  把本贴打包邮递  把本贴加入论坛收藏夹  发送本页面给朋友  把本贴加入IE收藏夹 
 liuhe0103 帅哥哟,离线,有人找我吗?
  
  
  等 级:初出江湖
  积 分:30
  专家分:0
  提问帖:4/2
  回答帖:0
  总帖数:9
  经验值:78
  注 册:2007-12-23
给liuhe0103发送一个短消息 把liuhe0103加入好友 查看liuhe0103的个人资料 搜索liuhe0103在ASP编程论坛的所有贴子  引用回复这个贴子 回复这个贴子
发贴心情 

我是个初学者请各位高人指点一下小弟不清楚的代码谢谢

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>//什么意识?
<!--#include file="conn.asp" -->//什么意识?
<%
Dim index_login
Dim index_login_numRows

Set index_login = Server.CreateObject("ADODB.Recordset")
index_login.ActiveConnection = MM_database_STRING//这整句是做什么的?MM_database_STRING好像没被赋过值啊?
index_login.Source = "SELECT name, password FROM user"
index_login.CursorType = 0//这一段index_login.都是什么意识?
index_login.CursorLocation = 2
index_login.LockType = 1
index_login.Open()

index_login_numRows = 0
%>
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")//什么意识?
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("username"))//cstr()是干什么的?
If MM_valUsername <> "" Then
  MM_fldUserAuthorization=""
  MM_redirectLoginSuccess="succeed.asp"//这个地方是什么意识?
  MM_redirectLoginFailed="index.asp"//这个地方是什么意识?
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
  MM_rsUser.ActiveConnection = MM_database_STRING//这个是什么意识?MM_database_STRING他又是什么?
  MM_rsUser.Source = "SELECT name, password"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM user WHERE name='" & Replace(MM_valUsername,"'","''") &"' AND password='" & Replace(Request.Form("password"),"'","''") & "'"
  MM_rsUser.CursorType = 0
  MM_rsUser.CursorLocation = 2
  MM_rsUser.LockType = 3
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And true Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect(MM_redirectLoginSuccess)
  End If
  MM_rsUser.Close
  Response.Redirect(MM_redirectLoginFailed)
End If
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd";>
<html xmlns="http://www.w3.org/1999/xhtml";>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
<link href="css/style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
body {
 background-color: #EFEFF7;
}
-->
</style>
</head>

<body><form ACTION="<%=MM_LoginAction%>" method="POST" name="login" id="login" onSubmit="MM_validateForm('username','','R','password','','R');return document.MM_returnValue">//onSubmit这段都什么意识?
<br />
<table width="30%" height="150" border="0" align="center" cellpadding="0" cellspacing="0" class="border20">
          <tr align="center">
            <td height="30" colspan="2">系统入口</td>
          </tr>
          <tr>
            <td width="40%" align="right">用户名:</td>
            <td width="60%" height="30">
              <input name="username" type="text" class="form01" id="username" size="15">            </td>
          </tr>
          <tr>
            <td align="right">密 码:</td>
            <td height="30">
              <input name="password" type="password" class="form01" id="password" size="15"></td>
          </tr>
          <tr align="center">
            <td height="30" colspan="2">
              <input class="border21" type="submit" name="Submit" value="[ 登陆 ]">
            </td>
          </tr>
  </table>
      
        
      </form>
</body>
</html>[/size][/size]

这里面用MM开头的很多都是变量吗?为什么没定义?


[此贴子已经被作者于2007-12-23 19:05:33编辑过]
发帖:2007-12-23 18:59:00
  鲜花(0)  鸡蛋(0)

本主题贴数10,分页:[上一页] [1] [下一页]

 *树形目录 顶端 
主题:  我是个初学者请各位高人指点一下小弟不清楚的代码谢谢(4051字) - liuhe0103,2007年12月23日
    回复:  俺也是从DW开始学起的,感觉它生成的代码垃圾很多,不如自己写的简练,建议楼主还是学学ASP吧,没什..(121字) - 脏污迹,2008年5月7日
    回复:  第一句是脚本语言第二句是“调用数据库文件 建议你多看看ASP内直对象,还有A..(118字) - zpm1986,2008年1月3日
    回复:  同意6楼的意见,最好自己手写代码!DW里用的是集成的,那些开头以MM_东东都是变量..(74字) - heidu004,2007年12月25日
    回复:  楼主的这段代码好像是用Dreamweaver直接拖拉而自动生成的代码用来做登录界面的,如果自己写的..(205字) - eaglehaozz,2007年12月24日
    回复:  第一句是脚本语言用的是VB,编码标准用的是“简体中文”第二句是引用文件“conn.asp”应该是用..(106字) - eaglehaozz,2007年12月24日
    回复:  <%@LANGUAGE="VBSCRIPT" CODEPAGE..(115字) - liuhe0103,2007年12月24日
    回复:  求求各位大虾就给小弟指点一下迷津吧!(36字) - liuhe0103,2007年12月23日
    回复:  谢谢!可是老师没讲这个就要交作业,没时间啊如果时间充足的话我一定从基础看起!..(76字) - liuhe0103,2007年12月23日
    回复:  MM_database_STRING等可能是另外一个文件(比如conn.asp)中定义的变量和常量..(126字) - 蓝蔓龙,2007年12月23日

 *快速回复:我是个初学者请各位高人指点一下小弟不清楚的代码谢谢  [ 回帖是一种美德 :) ]
会员账号 用户名    还没注册?    密码    忘记密码?
内容
  • HTML标签: 不可用
  • UBB标签: 可用
  • 贴图标签: 可用
  • 多媒体标签:可用
  • 表情字符转换:可用
  • 上传图片:不可用
  • 最多15KB
  • 点击表情图即可在帖子中加入相应的表情
                                
    邮件回复 显示签名   [Ctrl+Enter直接提交贴子]