set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq=F:\\ajaxpro\\App_Data\\server.mdb"
Dim StrSQL,RS
StrSQL="SELECT*from Manager WHERE ID='"&username&"'"
StrSQL=StrSQL&"AND Pin='"&password&"'"
set rs=server.createobject("adodb.recordset")
rs.open StrSQL,conn,1,1
If rs.EOF then
response.write("<script>alert('用户名或密码错误');history.back();</script>")
response.End()
else
response.Write( "<script>location.href='IP_Address.asp'</script>")
response.End()
End If
在asp页面中，我们常常使用include命令来包含公共文件，比如说页首、页尾的部分，使用公共文件非常方便，但在HTML页面里使用include根本就不起作用。这是因为，include是VBScript的命令，因此可以在asp页面里使用。而HTML静态页面被调用的时候并不经过asp解释器，而是直接发送到用户浏览器，因此include命令就无效了。
对� ......
web service在现在的各系统中得到了广泛的应用。它为我们各系统之间的功能访问，数据交换,起到了不可磨灭的作用。而且还能简化我们的变成，在此就对asp作为webservice客户端稍作探讨。
本文通过将一些具体的业务功能写成XML Web Services并且将这些XML Web Services与ASP程序完美结合，现有的ASP程序就可以象ASP.NE ......
第二个重要的类,作用是类型转换,类名Con_Convert.在页面代码的开头实例化,对象名为Convert,借用了.net的类型转换的对象名称.
这个类主要解决在类型转换时,如果直接使用类型转换函数,会因为变量为空或者格式不对而导致程序报错,而这种报� ......
很多时候,我们采用原始的方法来解决一行内循环3张图片,如果上传者只上传了2张图片,那么2张图片间的距离会很大,因为缺少了一个<td> </td>.
<table border="0" cellpadding="0" cellspacing="0">
<%
dim rs,sqltext
set rs = Server.CreateObject("adodb.recordset")
sqltext="sel ......
