asp程序设计及应用源程序资料汇编Word文档下载推荐.docx
- 文档编号:22835929
- 上传时间:2023-02-05
- 格式:DOCX
- 页数:185
- 大小:67.04KB
asp程序设计及应用源程序资料汇编Word文档下载推荐.docx
《asp程序设计及应用源程序资料汇编Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《asp程序设计及应用源程序资料汇编Word文档下载推荐.docx(185页珍藏版)》请在冰豆网上搜索。
与&
pre&
的区别
春晓
春眠不觉晓,处处闻啼鸟。
夜来风雨声,花落知多少。
PREwidth=1>
/PRE>
例2-4:
标记的使用<
!
--注释
本程序的功能是:
制作简单网页熟悉基本标记的使用!
-->
Palign=center>
三种标记的使用!
HR>
DIValign=center>
我在中间!
中间<
/DIV>
DIValign=left>
我在左边!
左边<
DIValign=right>
我在右边!
右边<
例2-5:
列表示例<
blue"
OL>
计算机新书<
LI>
ASP程序设计<
/LI>
HTML网页设计<
FrontPage使用指南<
/OL>
UL>
英语新书<
外经贸英语<
实用英语翻译<
朗文英语语法<
/UL>
例2-6:
字符格式设置<
CENTER>
FONTface="
隶书"
size=7color="
我是&
font&
标记!
H1align=center>
h1&
U>
U&
/U>
S>
S&
/S>
B>
B&
/B>
I>
I&
/I>
BLINK>
BLINK&
/BLINK>
例2-7:
多层表格嵌套实例!
DIValign="
center"
!
--第一个表格-->
TABLEborder="
1"
width="
100%"
TR>
TDwidth="
Palign="
跟我学网页制作<
/TD>
/TR>
--第二个表格-->
9%"
rowspan="
2"
IMGborder="
0"
src="
ACE.GIF"
147"
height="
133"
57%"
基础知识简介<
divalign="
--第三个表格-->
33%"
align="
第一讲<
HTML简介<
第二讲<
HTML标记<
第三讲<
CSS基础<
/TABLE>
HTML最新课堂<
高级应用技术<
多层表格嵌套示例<
/CENTER>
例2-8:
输入域例题!
FORMmethod="
post"
action="
TABLE.ASP"
姓名:
INPUTtype="
text"
name="
T1"
size="
20"
密码:
password"
T2"
你会什么CGI编程语言:
checkbox"
C1"
value="
ON"
VBSCRIPT
C2"
JAVASCRIPT
C3"
PHPSCRIPT
C4"
ASPSCRIPT
你最擅长那种编程语言:
radio"
R1"
V1"
V2"
V3"
V4"
checked>
简介:
TEXTAREArows="
4"
S1"
cols="
rows="
/TEXTAREA>
/p>
submit"
提交"
B1"
reset"
全部重写"
B2"
/FORM>
例2-9:
选择域!
output2.ASP"
请选择喜欢的颜色:
SELECTname="
HOBBY"
multiple>
OPTIONvalue="
红色"
红色<
/OPTION>
蓝色"
蓝色<
绿色"
绿色<
黑色"
黑色<
白色"
白色<
紫色"
紫色<
/SELECT>
确定"
取消"
例2-10:
FRAMESET示例<
FRAMESETcols="
*,50%"
FRAMESETrows="
70%,30%"
FRAMEsrc="
biaoji.HTM"
head.HTM"
/FRAMESET>
25%,25%,20%"
preexa.HTM"
xuanzeyu.HTM"
shuruyu.HTM"
例2-11:
CSS样式<
STYLEtype="
text/css"
--
H3{font-family:
arial;
font-size:
12pt;
font-style:
normal;
color:
blue;
}
/STYLE>
CSS样式文本!
arial,12pt,normal,blue!
例2-12:
BODY{font-family:
"
;
font-size:
20pt;
color:
orange}
-->
css实例<
定义HTML标记样式表<
例2-13:
id方法与class方法的使用与区别!
.classstyle{font-family:
黑体"
14pt;
blue}
#idstyle{font-family:
green}
Pclass="
classstyle"
align=center>
使用class方法定义P<
FONTid="
idstyle"
使用id方法定义FONT!
例3-1:
FONTSIZE=7>
%Response.Write"
欢迎使用VBScript脚本语言!
%>
例3-2:
SCRIPTLANGUAGE=VBScriptRUNAT=Server>
SubWelcome
Fori=1To2
Response.Write"
fontsize=7>
/fontsize>
Next
EndSub
/SCRIPT>
%CallWelcome%>
例3-3:
客户端脚本编写举例程序<
SCRIPTLANGUAGE=VBScriptEVENT="
OnClick"
FOR="
Button1"
--
DimfrmTmp'
声明一个变量
SetfrmTmp=Document.Form1
IfIsNumeric(frmTmp.Text1.Value)Then
IffrmTmp.Text1.Value<
10orfrmTmp.Text1.Value>
30Then
MsgBox"
请输入10到30之间的数字!
Else
FrmTmp.Submit'
输入正确,传递到服务器
EndIf
Else
MsgBox"
请输入数字!
Endif
BODYbgColor="
White"
请输入10到30之间的数字:
FORMNAME="
Form1"
INPUTNAME="
Text1"
TYPE="
TEXT"
BUTTON"
VALUE="
例3-4:
将单行语句分成多行程序举例<
SCRIPTLANGUAGE="
SubShowMessage
strExmp="
欢迎您光临本网站,"
&
_
"
您可以浏览最新图书信息,"
如果您有什么意见和建议,请来信!
MsgBoxstrExmp
EndSub
CallShowMessage
……
例3-5:
%@LANGUAGE=VBScript%>
%OptionExplicit
DimstudentAge
DimstudentA
例3-6:
%OptionExplicit
DimintX'
声明脚本级变量
intX=1'
给脚本级变量赋值
SetLocaIVariab1e'
调用过程修改过程级变量的值
Response.WriteintX'
将脚本级变量的值发送到浏览器,值仍为1
SubSetLocalVariab1e
声明过程级变量
IntX=2'
给过程级变量赋值
EndSub
例3-7:
%OptionExplicit
IntX=1'
SetLocalVariable'
调用过程修改变量的值
将脚本级变量的值发送到浏览器,值为2
SubSetLocalVariable
例3-8:
MsgBox使用方法<
DimintResult
intResult=MsgBox("
VBScript是很有用的,"
chr(13)&
chr(10)&
你很_
想学好VBScript吗?
4+32,"
请你选择:
)
ifintResult=6then
MsgBox("
你是个好学生,我们会尽全力的!
一起努力吧!
else
你好残忍,你就这样放弃了我!
endif
/Script>
例3-9:
InputBox函数的使用<
DimstrUserName,strUserAddress
strUserName=InputBox("
请输入您的名字:
"
用户信息记录"
strUserAddress=InputBox("
请输入您的住址:
MsgBox("
您的基本信息为:
strUserName_
住址:
strUserAddress)
例3-10:
连接运算程序举例<
SCRIPTlanguage="
strCountry="
中国"
strCity="
上海"
intNum=22
strResult1="
11"
&
intNum
strResult2="
+intNum
strAddress=strCity&
是"
+strCountry&
的一个城市。
MsgBoxstrResult1&
(&
连接)"
_
strResult2&
(+连接)"
strAddress&
callShowMessage
例3-11:
选择结构程序举例1<
dimx,y,z
x=2
ifx>
0then
y=x
z=-x
else
y=-x
z=x
'
以对话框的形式输出x,y和z的值
x的值为"
x&
y的值为"
y&
z的值为"
z
callShowMessage'
调用ShowMessage过程
例3-12:
选择结构程序举例2<
dimx,y
x=InputBox("
请输入x的值:
ifnotisnumeric(x)then
输入错误,请输入数字!
elseifx>
y=x
elseifx<
0then
y=-x
y=0
ifisnumeric(x)then
y'
以对话框的形式输出x和y的值
例3-13:
多分支结构程序举例<
dimx
请输入x的值(1-7):
ifnotisnumeric(x)thenx="
selectcasex
case"
case1
星期一"
case2
星期二"
case3
星期三"
case4
星期四"
case5
星期五"
case6
星期六"
case7
星期日"
caseelse
请输入1-7中的数字!
endselect
例3-14:
For循环结构程序举例<
SCRIPTLANGUAGE=VBScript>
dimi,intSum,flag,result
intSum=0
result="
Fori=3To100Step2
flag=1
Forj=2Toi-1Step1
Ifimodj=0Then
flag=0
ExitFor
EndIf
Next
Ifflag=1then
result=result&
i&
Next
3到100之间的素数为:
result
......
例3-15:
Do循环结构程序举例<
/TITLE
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- asp程序设计及应用 源程序资料汇编 asp 程序设计 应用 源程序 资料汇编