| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 838 人关注过本帖
标题:[求助] 急!关于存储过程的
只看楼主 加入收藏
━╋网情深★
Rank: 1
等 级:新手上路
帖 子:187
专家分:0
注 册:2005-3-18
收藏
 问题点数:0 回复次数:10 
[求助] 急!关于存储过程的

文件如下: <%@ Language=VBScript %> <% dim time_star,time_end,times if Not IsEmpty(Request.Form("submit")) then time_star=Timer() name=Request.Form("name") password=Request.Form("password") if proc_login(name,password)=1 then time_end=Timer() times=time_end-time_star message="验证成功,执行时间为:"&times&"秒</font>" else time_end=Timer() times=time_end-time_star message="验证失败,执行时间为:"&times&"秒</font>" end if end if %> <HTML> <HEAD> <meta http-equiv="Content-Language" content="zh-cn"> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> </HEAD> <BODY> <table align="center" border="0" width="339" id="table2"> <tr> <td><%=message%></td> </tr> </table> <table align="center" border="1" width="465" cellspacing="1" id="table1" height="130" style="border-collapse: collapse" bordercolor="#CCFFFF"> <form action="" method="post"> <tr> <td bgcolor="#CCFFFF" colspan="2" align="center">用户登陆</td> </tr> <tr> <td bgcolor="#CCFFFF" width="179">用户名:</td> <td><input type="text" name="name" size="20" maxlength="30"></td> </tr> <tr> <td bgcolor="#CCFFFF" width="179">密&nbsp; 码:</td> <td><input type="text" name="password" size="20" maxlength="30"></td> </tr> <tr> <td colspan="2" align="center"><input type="submit" value="提 交" name="submit">&nbsp; <input type="button" value="取 消" name="B2"></td> </tr> </form> </table> </BODY> </HTML> <% function proc_login(username,pwd) Set conn=Server.CreateObject("ADODB.Connection") conn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=wu;UID=sa;PWD=sa;DATABASE=meng" Set cmd = Server.CreateObject("ADODB.Command") Set cmd.ActiveConnection=conn cmd.CommandType =adCmdStoredProc cmd.CommandText="userlogin" cmd.Parameters.Append cmd.CreateParameter("@username",adVarChar,adParamInput,30,username) cmd.Parameters.Append cmd.CreateParameter("@password",adVarChar,adParamInput,30,pwd) cmd.Parameters.Append cmd.CreateParameter("ret",adInteger,adParamOutput) cmd.Execute proc_login=cmd("ret") cmd.Cancel conn.Close Set conn=Nothing end function %> 存储过程如下: use meng

CREATE PROCEDURE userlogin @username varchar(30), @password varchar(30), @islogin int output AS if exists(select * from denglu where Name=@username and pow=@password) set @islogin=1 else set @islogin=0 错误类型如下:

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

ADODB.Command 错误 '800a0bb9'

变量或者类型不正确,或者不在可以接受的范围之内,要不就是与其他数据冲突。

/lianxi/proc/login.asp,行57

搜索更多相关主题的帖子: 时间 存储 password message 
2005-09-03 13:44
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
谁知道你的存储过程怎么写的
2005-09-03 14:12
━╋网情深★
Rank: 1
等 级:新手上路
帖 子:187
专家分:0
注 册:2005-3-18
收藏
得分:0 
以下是引用islet在2005-9-3 14:12:47的发言: 谁知道你的存储过程怎么写的
你看贴了吗?都写上了,在中间

[glow=255,red,2] ╭︿︿☆╮ ╭︿︿︿╮ {/ . .\\}oοО缘份使… {/. . \\} ( (oo) ) …我们相识Оοo( (oo) ) ︶︶︶︶….距离总是太远 …︶︶︶︶oοО相处总是太难Оοo伤心伤神不如失去记忆 [/glow]
2005-09-03 15:24
━╋网情深★
Rank: 1
等 级:新手上路
帖 子:187
专家分:0
注 册:2005-3-18
收藏
得分:0 
怎么没有人回复啊!斑竹呢???

[glow=255,red,2] ╭︿︿☆╮ ╭︿︿︿╮ {/ . .\\}oοО缘份使… {/. . \\} ( (oo) ) …我们相识Оοo( (oo) ) ︶︶︶︶….距离总是太远 …︶︶︶︶oοО相处总是太难Оοo伤心伤神不如失去记忆 [/glow]
2005-09-03 15:36
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
我当你调用写在sql数据库中的过程呢

你的写法我没用过 你说意图 我帮你写一个过程
2005-09-03 15:42
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
要是验证用户信息 你完全可以用
……
sql="select user pass from 表  where user='"&amp;user&amp;"' "
rs.open sql,conn,1,1
if rs(1)=pass then
……(密码正确时)
else
……(密码错误时)
end if
2005-09-03 15:45
━╋网情深★
Rank: 1
等 级:新手上路
帖 子:187
专家分:0
注 册:2005-3-18
收藏
得分:0 
谢谢你写的,我要的是存储过程执行的,不是你那种,谁帮帮忙运行一下,看看怎么回事,function proc_login(username,pwd)
这个函数在VB里面执行是正确的,在ASP里就报错,也不知道怎么回事,哎........


麻烦斑竹在运行看看!!!!!!!!!!!!!!很急的

[glow=255,red,2] ╭︿︿☆╮ ╭︿︿︿╮ {/ . .\\}oοО缘份使… {/. . \\} ( (oo) ) …我们相识Оοo( (oo) ) ︶︶︶︶….距离总是太远 …︶︶︶︶oοО相处总是太难Оοo伤心伤神不如失去记忆 [/glow]
2005-09-03 22:58
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
ASP支持VBCSRIPT 不能完全支持VB
2005-09-04 07:53
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 
adVarChar / adParamInput 这两个常量你定义了吗?

天津网站建设 http://www./
2005-09-04 10:33
━╋网情深★
Rank: 1
等 级:新手上路
帖 子:187
专家分:0
注 册:2005-3-18
收藏
得分:0 
以下是引用griefforyou在2005-9-4 10:33:35的发言: adVarChar / adParamInput 这两个常量你定义了吗?
这个还用定义吗?怎么定义啊,麻烦你写一下

[glow=255,red,2] ╭︿︿☆╮ ╭︿︿︿╮ {/ . .\\}oοО缘份使… {/. . \\} ( (oo) ) …我们相识Оοo( (oo) ) ︶︶︶︶….距离总是太远 …︶︶︶︶oοО相处总是太难Оοo伤心伤神不如失去记忆 [/glow]
2005-09-12 14:03
快速回复:[求助] 急!关于存储过程的
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.035789 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved