找回密码
 立即加入
搜索

查看: 2032|回复: 8

请教ASP的有关问题??

[复制链接]
风无影 发表于 2004-5-11 22:15:01 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转闽南师范大学。

您需要 登录 才可以下载或查看,没有账号?立即加入

×
<>哪个学长帮忙看如何用ASPVBScript写个学生登录信息验证</P>
" }: Y5 L2 r$ `' ?% @, x! v7 Z  [<>错误转向错误页</P>
: Y) u; B& T% D! O* |<>正确转向主页,,,</P>6 F0 P* q5 [& L3 C1 I& g
<>或者帮我看看我的代码有没有错::</P>
1 @- t1 X2 c7 k. B0 @<>&lt;% uid=request.Form(uid): `6 g8 X8 c3 u, U% B
pwd=request.Form(pwd)</P>  A' `% G: m" k! u3 F
<>set conn =server.CreateObject("ADODB.Connection")
: q, Z# s1 ]( qconn.open="dsn=zuoye;uid=zuoye;pwd=000"</P>
, a- p/ B. j, e% d) a<>sql="select*from user where id='"&amp;userid&amp;"'", g7 e; `' B9 U$ s4 c: u/ ?
set.res=conn.execute(sql); u  g) f  d- G, H
if res.eof then 0 a5 @9 w! i5 W5 v9 n" [1 }+ ?3 T
response.redirect("error.asp")
1 G, j4 e7 \* `2 M* w# c, rresponse.end1 L* \7 ^5 X" J3 p6 u7 C. i% Q7 x! S
end if 4 E$ V1 [& M0 x& `. \& p! u
if res("mm")=pwd then
& |* w. z# N1 A6 r2 d. u/ x$ xsession("xm")=res("xm")
4 F$ z3 P+ E; k( l+ b% mresponse.redirect("main.asp")2 {2 U% v( Z, k& @* S7 Z) B, V
response.end# m! M, E, z& U$ O' B& w; T
else7 t- X" J, s$ Z& |* w) j
response.redirect("error.asp")
7 J, ^" B8 H, a" }* }* S2 X' _response.end& {% ?4 q3 p: z( ^* j3 w1 n! e
end if
  t: i0 f  m+ v/ c: ]* u3 }%&gt;</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
blackman 发表于 2004-5-12 00:10:59 | 显示全部楼层
<>如果你有电脑报合订本2003看一下上册的后面就有讲怎么做,我一般不直接写代码</P><>你那边多了一个点</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

麦客 发表于 2004-5-12 04:10:13 | 显示全部楼层
<>直接写还不累死呀,我不直接写,不过我正在学直接写。</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

blackman 发表于 2004-5-12 06:08:50 | 显示全部楼层
<>http://www.zzsybbs.com/forum/dispbbs.asp?boardID=8&amp;ID=192&amp;page=2</P><>这里面希望对你有帮助</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

麦客 发表于 2004-5-14 04:50:46 | 显示全部楼层
郁闷哦,我也被卡住了,还有一个问题没解决,谁帮我解决呀!
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

blackman 发表于 2004-5-14 05:02:56 | 显示全部楼层
什么问题
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

舒跑 发表于 2004-5-14 20:42:43 | 显示全部楼层
<>呵呵,版主我对网页不太了解的。</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

networm 发表于 2004-5-15 06:46:39 | 显示全部楼层
<>只是一点</P><>密码是sa不是zuoye</P><>如果不是你自己用其它的用户 的话</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

vicwr 发表于 2004-5-16 00:57:17 | 显示全部楼层
<>&lt;!--6 x7 ~0 p' H0 b; U% h9 o* _
\'*  01计算机本科师范班同学信息管理) }8 R* o3 A8 p3 X+ Z
\'*% I5 ~2 B$ ^5 H: D) o' q
\'*  版权所有: victory studio) l* W' v. m# N5 X9 k9 D
*) q4 `( E5 H8 X3 l+ l
--&gt;
# x+ t7 x6 |9 N&lt;!--****************************************************************************************************--&gt;0 l, q* q6 v" @! ]
&lt;% @ language=vbscript%&gt;
" K* T6 c0 @+ Q+ L* i/ T! n' ^&lt;%8 ~; y! c, a$ u* K7 S
dim upassword,counts,name  u: O0 b# k2 \1 {) }: @
counts=trim(request.form(\"counts\"))
+ ]: n5 ?) u" \& n' J$ I upassword=trim(request.form(\"upassword\"))
6 Q- H/ S% j7 Y7 g' i0 y 4 ~" L& g0 p! H7 X! e# A
set conn=server.createobject(\"adodb.connection\")6 i4 w5 ^) I; T/ n3 X% `
conn.open \"dsn=01js;uid=login;pwd=11\"
3 v) X& |. }1 d. p" F) q
! z5 J/ G6 f8 @  f- A# O set res=conn.execute(\"select * from pass_table where counts=\'\"&amp;counts&amp;\"\'and password=\'\"&amp;upassword&amp;\"\'\"): o5 V: m5 Y  Z4 ~' e
set infor=conn.execute(\"select * from infor where counts=\'\"&amp;counts&amp;\"\'\")
" |+ s4 |( }8 l+ B$ v9 i' q%&gt;
$ L: c  K* s$ b- Z&lt;!--*****************************************************************************************************--&gt;) a1 }" s+ c5 O; [
&lt;% if res.eof then%&gt;
( _9 n6 w" w3 T1 h: `&lt;%
$ @# E9 T# @4 ` res.close  K4 e# S  g6 R  F/ G0 X
set res=nothing
( c4 M* {9 s5 j0 Z) C  j conn.close+ d( i( z# S2 D! z' [( S* r" N# ]
set conn=nothing
/ A# C4 g; O4 E/ X" h response.redirect(\"error.htm\")
+ Y! a8 k3 w& ]8 r, P' [4 @8 m/ w%&gt;
, N/ ^9 W6 P; i, }&lt;!--------------------------------------------------------------------------------------------------------&gt;
) C; C* O* ]% Q% b& x% r&lt;%else%&gt;) O3 W$ D) p% B3 ]- F
&lt;%
8 T/ b7 D2 c4 f3 d3 B7 }/ f7 p session(\"counts\")=counts
" q( j' x. R5 u: Z, C session(\"upassword\")=upassword
6 M) Z! q' Q$ r3 s session(\"name\")=infor(\"name\")
, ?6 H' f; h- X9 t' k0 t session(\"flag\")=1
) I. L  X- E$ g4 i1 W2 \ response.redirect(\"main.asp\") ( P0 J- b+ @/ h4 r6 L
%&gt;</P><>&lt;%end if%&gt;</P><>这是我以前写的,运行成功。自己看啦,这都很简单的东西!!</P>
宣传/支持龙江曦月.龙江曦月需要理解,适宜长居
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即加入

本版积分规则

手机版|龙江曦月 ( 闽ICP备05009150号-1 )闽公安网备35060202000316

GMT+8, 2025-5-25 07:45 , Processed in 0.067333 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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