asp基本语法,简要介绍ASP及其功能
ASP的语法格式是什么？
要用ado连接数据库
dim gcn
dim rs
set gcn = Server.CreateObject("ADODB.Connection")
gcn.open "xxx" //xxx=连接字符串,你可以用udl文件来帮助你写这个
set rs =gcn.execute("yyy") //yyy=sql语句，跟你选择的数据库有关
我再给你个插入的sql语句
sqlstr =" inset tableA(a1,b1) values('"request.form("a1")"','"request.form("a2")"')"
下面是一些语法
语句
Call
[call] name [argumentlist]
把控制转移到函数或子程序。当调用函数或子程序时，Call是可写可不写的。但是如果你用了Call,那么argumentlist必须用括号括起来。
Const
[Public | Private] Const constantname=expression
用于申明常数。你可以在一行里申明多个常数，此时你必须用逗号把常数赋值语句隔开。
Dim
Dim varname[ ( [subscripts])][, varname [( [subscripts])]...
创建一个新变量并且分配存储空间。
DO . . . LOOP
语法 1：
Do [{While | Until } condition ]
[statements]
[Exit Do]
[statements]
LOOP
语法 2：
Do
[statements]
[Exit Do]
[statements]
LOOP [{While | Until } condition ]
当条件condition为真时或直到条件condition为真时，两种形式都重复执行语句
Erase
Erase array
清理数组，对于固定长度的数组，重新初始化元素；对于动态数组，重置存储空间。
Exit
Exit Do
退出一个 DO . . . LOOP 循环。
Exit For
退出一个 For . . . Next 循环或For Each . . . Next循环。
Exit Function
退出一个 函数。
Exit Sub
退出一个子程序。
For . . . Next
For counter = start To End [Step step]
[statements]
[Exit For]
[statements]
Next
由loop 计数器指定的次数重复执行statements语句群。
For Each . . . Next
For Each element In group
[statements]
[Exit For]
[statements]
Next [element]
对于每一个在数组或集合中的元素，重复执行statements语句群。
On Error
On Error Resume Next
当一个错误发生时，这条语句就执行紧靠发生错误语句后面的语句，或者执行紧靠调用进程后面的语句。
Option Explicit
Option Explicit
在使用变量之前强制明确定义该变量，可以用Dim,Private,Public或 ReDim语句定义变量。
Private
Private varname[([下标])][, varname[([下标])] . . .
创建私有变量并且分配存储空间。（私有变量只能在定义该变量的脚本中可用）
Public
Public varname[([下标])][, varname[([下标])] . . .
创建公有变量并且分配存储空间。（公有变量在程序的任何地方均可使用）
Randomize
Randomize [number]
给Rnd函数的随机数发生器一个新种子值。
ReDim
ReDim [Preserve] varname(subscripts)[, varname(subscripts)] . . .
修改维的下标，大小；或重置动态数组的大小。Preserve 保护已存数组的数据。
Rem
语法1：
Rem comment
语法2：
‘comment
这两种语句形式都能使注释的句子不被处理。如果Rem和其它语句在同一行上，Rem 语句必须在后且二者之间必须用冒号隔开。
Select Case
Select Case testexpression
[Case expressionlist-n
[statements-n]] . . .
[Case Else expressionlist-n
[elsestatements-n]]
End Select
如果某一个expressionlist 和testexpression 匹配，则执行和expressionlist对应的语句；如果没有一个expressionlist 和testexpression 相匹配，则执行和Case Else 相对应的语句。
Set
Set obectvar= {objectexpression | Nothing}
赋予一个变量或一个性质对象引用。当赋予的值为Nothing 时，使obectva 和任何以前指明的对象解除关系。
Sub
[Public | Private] Sub name [(arglist)]
[statements]
[Exit Sub]
[statements]
End Sub
定义一个子程序，指明名称，参数及代码。
While . . . Wend
While condition
[statements]
[color=Maroon]Wend
不停地连续执行语句statements 直到条件condition为True。
ASP的语法是怎么的？
ASP有两种语法，就是VB和JAVA
VB语言很多人都会，所以学习ASP一般从学习VB语法入手
JAVA就是ASP语言的深度研究了
非高级编程人员只需要学会VB语法便可独立完成ASP网站的开发，比如我这样的，呵呵
下面列举一些ASP的字符函数
Len Len(string|varname) 返回字符串内字符的数目，或是存储一变量所需的字节数。
Trim Trim(string) 将字符串前后的空格去掉
Ltrim Ltrim(string) 将字符串前面的空格去掉
Rtrim Rtrim(string) 将字符串后面的空格去掉
Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串，如果省略第三个参数表示从start字符开始到字符串结尾的字符串
Left Left(string,length) 从string字符串的左边取得length长度的字符串
Right Right(string,length) 从string字符串的右边取得length长度的字符串
LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母
UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母
StrComp StrComp(string1,string2[，compare]) 返回string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1
InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出现的位置
Split Split(string1,delimiter[, count[, start]]) 将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格("")作为分隔符。
count 返回的子字符串数目，-1 指示返回所有子字符串。
start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。
Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) 返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
1、Len函数示例：
下面的示例利用 Len 函数返回字符串中的字符数目：
Dim MyString
MyString = Len("VBSCRIPT") ''MyString 包含 8。
2、Trim、Ltrim、Rtrim函数示例：
下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：
Dim MyVar
MyVar = LTrim(" vbscript ") ''MyVar 包含 "vbscript "。
MyVar = RTrim(" vbscript ") ''MyVar 包含 " vbscript"。
MyVar = Trim(" vbscript ") ''MyVar 包含"vbscript"。
3、Mid函数示例：
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：
Dim MyVar
MyVar = Mid("VB脚本is fun!", 4, 6) ''MyVar 包含 "Script"。
4、Left函数示例：
下面的示例利用Left 函数返回MyString 的左边三个字母：
Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) ''LeftString 包含 "VBS
5、Right函数示例：
下面的示例利用 Right 函数从字符串右边返回指定数目的字符：
Dim AnyString, MyStr
AnyString = "Hello World" ''定义字符串。
MyStr = Right(AnyString, 1) ''返回 "d"。
MyStr = Right(AnyString, 6) '' 返回 " World"。
MyStr = Right(AnyString, 20) '' 返回 "Hello World"。
6、LCase函数示例：
下面的示例利用 LCase 函数把大写字母转换为小写字母：
Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString) '' LCaseString 包含 "vbscript"。
7、 UCase函数示例：
下面的示例利用 UCase 函数返回字符串的大写形式：
Dim MyWord
MyWord = UCase("Hello World") '' 返回"HELLO WORLD"。
8、StrComp函数示例：
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ''定义变量。
MyComp = StrComp(MyStr1, MyStr2, 1) '' 返回 0。
MyComp = StrComp(MyStr1, MyStr2, 0) '' 返回 -1。
MyComp = StrComp(MyStr2, MyStr1) '' 返回 1。
9、InStr示例：
下面的示例利用 InStr 搜索字符串：
Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP"???
SearchChar = "P"??
MyPos = Instr(SearchString, SearchChar)???''返回 9.
注意：返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
10、Split函数示例：
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x",-1,1)
'' MyArray(0) contains "VBScript".
'' MyArray(1) contains "is".
'' MyArray(2) contains "fun!".
Response.Write(MyArray(0))
11、Replace函数示例：
Replace("ABCD", "BC", "12") ''得到A12D
asp 中自定义函数的语法
一、asp里面的函数返回值是不用申明类型的，因为ASP里的变量是万能变量。ASP自定义函数的格式：
%
'----------------------------------------------
function myfunction(str1,str2)
dim str3 '变量申明都用dim
…
操作语句
…
myfunction=str3 '返回值（ASP返回值得方法和其他语言不同，不用return）
end function
'--------------------------------------------
%
二、其他页面引用方法：
1.首先你要写一个函数文件function.asp：
%
function function1(str1,str2)
……
end function
function function2()
……
end function
function function3()
……
end function
function function4()
……
end function
%
2.在要引用的页面user.asp里用include file语句把这个文件包含进去：
!--#include file="function.asp"--
%
'开始引用
dim a,b,c
a=function1(b,c); '引用完成
%
求助ASP语法;谢谢!!!!!
if request.QueryString("act")=login then
这句的login少了双引号？
==========================================
select * from fif where zhanghao='' and passwords=''
看到了没有？两个都是空值，说明参数没传递过来。
==========================================
那把SQL语句输出看看：
sql="select * from fif where zhanghao='"request.form("hao")"'"
sql=sql " and passwords='" request.Form("f_code") "'"
后面加两行：
Response.Write sql
Response.End
==========================================
rst.recordcount0
这个表达式换一下看看：
not rst.eof
asp简单语法?
这个是vbscript调用无返回值的函数的语法。
conn.open 参数
call conn.open(参数)
conn是一个类对象，open是Connection对象里的一个方法(函数)