<%@ Language=VBScript %>

是告诉服务器这是用Script脚本编的代码。服务器按照Script的格式解释代码。 
是必须的。


<!--#include virtual="/inc-freehost-function/FreeHostFunctionMain.asp"-->

<!--#include virtual="文件" -->是指包含文件的虚拟路径。而<!--#include file="文件"-->是指包含文件的相对路径。
在同一个虚拟目录内,<!--#include file="Template.asp"-->和<!--#include virtual="Template.asp"-->效果是相同的,但假设虚拟目录名为Inc,则<!--#include virtual="/Inc/Template.asp"-->也可以通过调试,但我们知道<!--#include file="/Inc/Template.asp"-->是绝对要报错的。
如果一个站点下有2个虚拟目录myweb1和myweb2,myweb1下有文件file1.asp,myweb2下有文件file2.asp,如果file1.asp要调用file2.asp,那么在file1.asp中要这样写:<!--#include virtual="myweb2/file2.asp"-->,在这种情况下用#include file是无法实现的,用<!--#include file="myweb2/file2.asp"-->必然报错。相反,在myweb2的文件中包含myweb1中的文件也是一样。如果该被包含文件在某个文件夹下面,只要在虚拟路径中加上该文件夹即可。


If session("admau")="" Then  # Session(会话)Then(然后)

释:把“”赋值给名为admau 的 session 变量,然后

ef=True #True(真正的)

释:

EntitieFramework!意即实体框架!作用是数据表将作为一个实体(类),可以通过C#语言操作!

ec="授权非法,有可能是超时造成的。" ec 可能是说明的输出的意思

End If 

释:

简单说,就是结束。
上面的if表示开始,
而end if就表示结束这个if、

If Not ef Then

If session("canadmhost")="" and session("onlypasusesite")="y" Then

Response.Redirect "onlypasusesite.asp"

释:ASP Response 对象用于从服务器向用户发送输出的结果。Redirect,是把用户重定向到另一个 URL。

End if


===============

Set conn=Server.CreateObject("ADODB.Connection")

释:同意LS的,创建一个数据库连接对象,但是还没有建立连接
conn.open "dbq="&server.mappath("database.mdb")&"; driver={microsoft access driver (*.mdb)}"

Set rs = Server.CreateObject("ADODB.Recordset")dsuser 这个参数可以查

释:连接数据库,连接的对象是adod    b.recordset这是结果,

Sql="Select count(*) from 

释:COUNT 是函数之一。由于它的使用广泛,我们在这里特别提出来讨论。基本上,COUNT 让我们能够数出在表格中有多少笔资料被选出来。它的语法是:

SELECT COUNT("栏位名") 
       FROM "表格名"



==============

/user/logininfo.asp

 

<%
Set dsph = Server.CreateObject("ADODB.Recordset")  ,

释:set rst=Server.CreateObject("ADODB.recordset") 这个是javascript和vbscript里面用于创建一个数据库的记录集.recordset表示记录集.createobject是创建对象的方法.


Sql="Select count(*) from FreeHost.FreeHost_Product_domain where username='"&session("username")&"'"

释:count() 是个聚合函数 ,作用是求表的所有记录数
select * from 表名         , 这个是查询表的所有记录
select count(*) from 表名 , 这个是查询表的所有记录数

where username,选择 “ username”列表

总释:查询表的所有记录数 从 “FreeHost.FreeHost_Product_domain” 的数据库表里,选择 “username” 字段 =会话变量“username

 

dsph.Open Sql,conn,1,1

释:

RecordSet对象的打开方法。
sql为你定义的语句,conn为当前的数据库连接,第一个参数为游标类型,第二个参数为锁定类型。

详细解释http://www.jb51.net/article/10497.htm


if dsph(0)<0 then


%>