end if

       If trim(rstemp("userpwd"))=mypassword then

              session("name")=rstemp("UserName")

              'session("securitylevel")=rstemp("securitylevel")

              'response.write "Security Level=" & session("securitylevel")%>

<embed src="asplogin.pbd" width="500" height="300"

application = "asplogin"

window="w_asplogin"

commandparm="<%=mypassword & "," & myname%>">

  </embed> <%else%> 你输入的密码是<%=mypassword%>错误的！正确的是<%=rstemp("userpwd")%><br>

  <a href='index.htm'>重新登录</a><%response.end

       end if

       rstemp.close

       conntemp.close

       set rstemp=nothing

       set conntemp=nothing

%> </p>

</body></html>
 

第三步：利用PowerBuilder创建asplogin.pbl。详细方法为：在应用对象（asplogin）中并不需要任何代码；创建一个类型为Child的窗体（w_asplogin），在其中放置一个按钮，按钮的Click事件中的代码MessageBox('', commandParm())；在PB的Library画板中选中asplogin.pbl，在右键菜单中选择Build Runtime Library，生成PBD文件，一切OK！

第四步：配置数据库。大家可能已经看到，在securityloginrespond.asp中有关与数据库的连接，本例子是用的Ms sql Server。首先，创建Test数据库，创建表users，表中字段UserName（char(10)）、UserPwd（char（10））。接着在ODBC中建立一个系统DSN，（Name=test，登录方式=使用用户登录标识），常见好了之后别忘了Test一下数据库连结。

第五步：配置IIS或Personal Web Server。因为Asp只能在服务器上运行，所以您需要配置IIS，创建一个虚拟站点，把所有用到的文件拷贝到该目录下。文件清单：

1.index.html

2.securityloginrespond.asp

3.asplogin.pbd

注意的问题：

1．  保证你的Web站点时连通的

2．  Pbl中的窗体的类型是Child型的

3．  ODBC的配置方式正确

上一页  [1] [2] [3]