皮皮网

【html源码的运行】【磁力解析软件源码】【彩票预测 vb源码】lys源码

来源:梦幻家园源码 时间:2024-12-22 23:22:46

1.ASP简单登陆注册谁有。。。
2.分享几个开源的html源码的运行Python游戏代码

lys源码

ASP简单登陆注册谁有。。。

       其实学ASP学主要的是自己要去写

       lysw能坚持一下午便是一个好的开始

       你不要急着一下子作多么好的页面,功能多么强大的页面

       一点一点的来。

       下面帮你理解一下注册和登录的原理。

       Register.asp

       开始不要收集太多用户信息

       先从基本的用户名、密码、磁力解析软件源码性别、QQ号码、地址开始

       用户提交页面代码省略

       主要是后台处理过程:

       <%

       '====省略数据库连接代码====

       Dim Rs,SQL

       Dim Username,PWD,PWD2,Password,sex,QQ,Address

       UserName=Trim(Request.form("Username")) '接受用户提交的用户名

       PWD1=Trim(Request.form("PWD1")) '接受用户提交的密码

       PWD2=Trim(Request.form("PWD2")) '用户名重复确认的密码

       Sex=Trim(Request.form("Sex")) '接受用户提交的性别

       Address=Trim(Request.form("Address")) '接受用户提交的地址

       '====先对提交的信息作基本判断==========

       '更多的功能比如检测Email是否正确等等

       '可以以后慢慢学,先看基本原理

       Dim Founderr,Errmsg

        '先定义一个founderr检查是否有错;errmsg定义错在什么地方

       Founderr=false '初始化founderr为flase(即解析到这里是没有错误的)

       if UserName="" or Len(UserName)> then

       founderr=true '发现错误

       errmsg="用户名不能为空并不得大于个字符"

       end if

       if PWD1="" or Len(PWD1)<6 then

       founderr=true '发现错误

       errmsg="密码必须大于6个字符"

       end if

       if PWD1<>PWD2 then

       founderr=true '发现错误

       errmsg="两次输入的密码不正确!"

       end if

       if Not(ISnumeric(QQ)) or Len(QQ)<4 or Len(QQ)> then

       founderr=true '发现错误

       errmsg="QQ号码不正确"

       end if

       '性别为单选,彩票预测 vb源码默认有一个选中,所以不需要检验

       if Address="" then

       founderr=true '发现错误

       errmsg="您的地址没有填写!"

       end if

       if founderr then '如果出现错误

       Response.write Errmsg '提示错误类型

       else '没有错误则

       Sql="Select * from [User] where UserName='"&UserName&"'"

       Set Rs=Server.CreateObject("adodb.recordset")

       Rs.Open Sql,1,3 '以可写状态打开数据库

       if Not(Rs.eof or rs.bof) then '如果存在该用户

       Response.write Username&"已经被注册,请更换其他注册名"

       else

       Rs.addnew '添加纪录

       Rs("Username")=username '将username插入数据库Username字段中

       Rs("Password")=PWD1 '密码

       Rs("QQ")=QQ

       Rs("Address")=Address

       Rs("Sex")=sex

       Rs.update '更新数据库

       Response.write UserName&"成功注册!"

       end if

       Set rs=nothing

       end if

       %>

       登录页面Login.asp

       用户登录页面代码省略

       主要是unsafe源码在哪里后台处理过程:

       <%

       '同样从简单开始,只验证密码和用户名

       '验证码以后学习完善

       '====省略数据库连接代码====

       Dim Rs,SQL

       Dim Username,PWD

       Username=Trim(Request.form("Username"))

       PWD=Trim(Request.form("Password"))

       Set Rs=Server.createObjcet("adodb.recordset")

       '从数据库中查找用户提交的用户名和密码是否存在!

       Sql="select * from [User] where Username='"&Username&"' and Password='"&PWD&"'"

       Rs.open sql,conn,1,1 '只读方式打开,因为不需要更新数据库

       if RS.eof or rs.bof then '如果为空,即不存在

       Response.write"用户名密码错误"

       else '不为空则

       Session("Username")=Username '纪录用户登录信息

       Response.write"登录成功"

       end if

       Set Rs=nothing

       %>

       这样一个简单的登录和注册就完成了。

分享几个开源的moony尿不湿溯源码Python游戏代码

       以下是一些开源的Python游戏代码分享:

       I wanna,源代码链接:pan.baidu.com/s/1DlULys...

       提取码:kh2h

       Covid-Hero,源代码github地址:github.com/zixinzeng-je...

       The Game of Purifier,源代码github地址:github.com/epcm/PURIFIE...

       进击的豌豆,源代码链接:pan.baidu.com/s/1YcojAC...

       提取码:tsfm

       以上游戏均采用Pygame Zero库(简称Pgzero)开发。Pgzero是Pygame的精简版本,能够实现Pygame库的主要功能,同时屏蔽了复杂的细节,对新手十分友好。

       若想快速了解Pgzero,可以参考下文:

       若要全面系统学习Pgzero,可以参考《趣学Python游戏编程》一书。该书通过十个经典游戏案例,深入浅出地介绍了游戏编程的基本原理,以及Pgzero的具体使用方法。相信学完这本书后你也能开发出上面这样精彩的Python游戏。