找回密码
 入驻
搜索
楼主: 因为帅烦

[求助帖]找asp.net师傅

[复制链接]
发表于 2006-10-23 13:44:33 | 显示全部楼层

想速成,打基础喂。

;P 有编程基础的,一个月都可以了。。。
回复

使用道具 举报

发表于 2006-10-23 13:45:39 | 显示全部楼层
原帖由 wei50922 于 2006-10-23 13:44 发表
;P 有编程基础的,一个月都可以了。。。

请问,什么叫有基础?????

有C++ VB的基础得吗????
回复

使用道具 举报

发表于 2006-10-23 13:54:52 | 显示全部楼层

编程思路,逻辑

;P,这些达到了,基本上没问题了。。。小弟假期到现在一直啃ASP,啃了四个月,暂时达到这水准,而且是在编程的生死边缘中挣扎到现在。。。。汗。。。
Sub UserLoginClass()        '操作员登录
        Call UrlInfor()        '加载链接信息
        Call UserLoginForm(ValUser,ValPwd)'加载获取登录表单信息
        Call LoginPass(ValUser,ValPwd)'加载登录过程
End Sub
'------------------------------------------------------------------
Sub UserLoginForm(StrUser,StrPwd)        '获取登录表单信息
        StrUser=Trim(Request.Form("t1"))        '用户名
                Call WriteB(ChkStrNull(StrUser),UserInfor("Login",1),UrlLogin)
        StrPwd=Trim(Request.Form("t2"))        '密码
                Call WriteB(ChkStrNull(StrPwd),UserInfor("Login",2),UrlLogin)
End Sub
'-------------------------------------------------------------------
Sub LoginPass(StrUser,StrPwd)        '登录过程
        Call ConnOpen(Conn)        '创建连接数据库
        Call AdminTableInfor()'        加载数据表信息
        Set Rs=RsSet(Conn,3,1,"Select Top 1 "&AdminId&","&AdminUid&","&AdminPwd&","&UseApp&" from "& AdminTable &" Where "&AdminUid&"='"&StrUser&"'")        '函数RsSet查询数据表
                If Rs.RecordCount>0 Then
                        If Rs(AdminPwd)=StrPwd Then       
                                If Rs(UseApp)<>0 then        '验证是否已通过审核                               
                                        Session(AdId)=Rs(AdminId)
                                                Call RsClose(Rs)
                                                Call ConnClose(Conn)
                                                Response.Redirect UrlIndex
                                                Response.End
                                Else       
                                        Call RsClose(Rs)
                                        Call ConnClose(Conn)
                                        Call WriteA(UserInfor("Login",6),UrlLogin)
                                End If
                        Else
                                Call RsClose(Rs)
                                Call ConnClose(Conn)       
                                Call WriteA(UserInfor("Login",4),UrlLogin)
                        End If
                Else
                        Call RsClose(Rs)
                        Call ConnClose(Conn)
                        Call WriteA(UserInfor("Login",3),UrlLogin)
                End If               
End Sub

谁来解说下,里面的参数传递应用。。。
回复

使用道具 举报

发表于 2006-10-23 13:56:49 | 显示全部楼层
能看懂大部分.....:L :L :L

但是写不出这样的....:( :( :(
回复

使用道具 举报

发表于 2006-10-23 13:59:40 | 显示全部楼层
:Q :Q :Q
丢人啊~~~~少来嚣张~跟我跟猪爷说~~~~~你就知道错~~~~~~

:lol :lol
回复

使用道具 举报

发表于 2006-10-23 14:00:30 | 显示全部楼层

再说下去,今晚得有人看我跳情人湖了

汗。。。开工先。。。
回复

使用道具 举报

发表于 2006-10-23 14:00:57 | 显示全部楼层
原帖由 yy100 于 2006-10-23 13:59 发表
:Q :Q :Q
丢人啊~~~~少来嚣张~跟我跟猪爷说~~~~~你就知道错~~~~~~

:lol :lol

美女,你说谁呢???
回复

使用道具 举报

发表于 2006-10-23 14:01:41 | 显示全部楼层

师妹不给点面子师兄。

:L 怕了你了。。闪人。。。就会打小报告。。
回复

使用道具 举报

发表于 2006-10-23 14:01:46 | 显示全部楼层
说你楼上的呗~~全世界都知道他最嚣张
回复

使用道具 举报

发表于 2006-10-23 14:03:27 | 显示全部楼层
他很嚣张吗??????不过是没我那么低调。。。。。。:L
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 入驻

本版积分规则

QQ|Archiver|手机版|小黑屋|思明论坛

GMT+8, 2024-11-22 03:45 , Processed in 0.077682 second(s), 13 queries .

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

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