还剩29页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
实验一IIS设置及HTML基础
1、实验目的和要求
1、掌握IIS的设置方法,能够使用IIS发布自己的网页或网站
2、熟悉HTML的基本语言格式,掌握常用的HTML标记
一、
1、htmlheadtitle红色背景,蓝色字体/title/headbodybgcolor=#FF0000pfontcolor=#0000FF红色背景,蓝色字体/font/p/body/html
2、htmlheadtitle一个普通列表/title/headbodytext=bluedl dt中国城市/dt dd北京/dd dd上海/dd dd广州/dd dt美国城市/dt dd华盛顿/dd dd芝加哥/dd dd纽约/dd/dl/body/html
3、htmlheadtitle/title/headbodytext=blueolp中国城市/pli北京/lili上海/lili广州/li/olulp美国城市/pli华盛顿/lili芝加哥/lili纽约/li/ul/body/html
4、htmlheadtitle文本标志的综合示例/title/headbodytext=blueh1最大的标题/h1h3使用h3的标题/h3h6最大的标题/h6pb黑体字文本/b/ppi斜体字文本/i/ppu下加一划线文本/u/pptt打字机风格的文本/tt/ppcite引用方式的文本/cite/ppem强调的文本/em/ppstrong加重的文本/strong/ppfontsize=+1color=redsize取值“+1”、color取值“red”时的文本/font/p/body/html
5、htmlheadtitle图像标志的综合示例/title/headbodypalign=centerimgsrc=.样品.jpg网页制作WIDTH=468HEIGHT=60/phrwidth=600size=1color=#0000FF/body/html
6、htmlheadtitle表格标志的综合示例/title/headbodytableborder=1width=80%bgcolor=#E8E8E8cellpadding=2bordercolor=#0000FFbordercolorlight=#7D7DFFbordercolordark=#0000A0 tr thwidth=33%colspan=2valign=bottom意大利/th thwidth=36%colspan=2valign=bottom英格兰/th thwidth=36%colspan=2valign=bottom西班牙/th /tr tr tdwidth=16%align=centerAC米兰/td tdwidth=16%align=center佛罗伦萨/td tdwidth=17%align=center曼联/td tdwidth=17%align=center纽卡斯尔/td tdwidth=17%align=center巴塞罗那/td tdwidth=17%align=center皇家社会/td /tr tr tdwidth=16%align=center尤文图斯/td tdwidth=16%align=center桑普多利亚/td tdwidth=17%align=center利物浦/td tdwidth=17%align=center阿申纳/td tdwidth=17%align=center皇家马德里/td tdwidth=17%align=center……/td /tr tr tdwidth=16%align=center拉齐奥/td tdwidth=16%align=center国际米兰/td tdwidth=17%align=center切尔西/td tdwidth=17%align=center米德尔斯堡/td tdwidth=17%align=center马德里竞技/td tdwidth=17%align=center……/td /tr/table/body/html
7、如ahref=http://xld.home.chinaren.net/这是我的网站/a
8、ScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgsdimaasinteger=0whilea20a=a+1ifamod5=0thenresponse.writefontsize=6color=0000ff蓝色文本!/fontelseresponse.writefontsize=6color=FF0000红色文本!/fontendifEndWhileEndSub/Scripthtmlheadtitle显示蓝色、红色文本/title/headbody/body/html
9、ScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgsdimaasinteger=2dimbasstring=whilea10b=b+fontsize=+convert.tostringa+当前的字体大小为+convert.tostringa+号字br/fonta=a+2EndWhilemessage.text=bEndSub/Scripthtmlheadtitle显示不同大小的字体/title/headbodyasp:Labelid=messagerunat=server//body/html实验二普通Web控件的使用
一、实验目的和要求
1、掌握Web控件的使用方法,如文本框、单选框、复选框、下拉列表、文本区域、按钮等,了解各种控件的相关属性及设置方法
2、掌握HTML控件的使用方法,如文本框、单选框、复选框、下拉列表、文本区域、按钮等,了解各种控件的相关属性及设置方法
3、掌握验证控件的使用方法,了解各种控件的相关属性及设置方法
二、
1、HtmlHeadTitleLabel控件和TextBox控件的使用/Title/HeadBodyFormRunat=ServerE-mail asp:TextBoxId=TextBox1BackColor=LightGreenOnTextChanged=TextBox1_TextChangedForeColor=BlueRunat=Server/pasp:LabelId=Label1BackColor=LightBlueForeColor=RedRunat=Server/pasp:ButtonId=Button1Text=提交Runat=Server//Form/Body/HtmlScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgsTextBox
1.MaxLength=50EndSubSubTextBox1_TextChangedSenderAsObjecteAsEventArgsLabel
1.Text=TextBox
1.TextTextBox
1.Enabled=FalseEndSub/Script
2、HtmlHeadTitleTextBox控件的使用/Title/HeadBodyFormRunat=ServerID号asp:TextBoxId=txtNameTextMode=SingleLineRunat=Server/Br密码asp:TextBoxId=txtPwdTextMode=PasswordRunat=Server/Br留言asp:TextBoxId=txtMessageRows=3TextMode=MultiLineRunat=Server/pasp:ButtonId=SubmitText=提交OnClick=Submit_ClickRunat=Server/HrId=Hr1Visible=FalseRunat=Server//Form/Body/HtmlScriptLanguage=VBRunat=ServerSubSubmit_ClickSenderAsObjecteAsEventArgsDimResultAsStringHr
1.Visible=TrueResult=ID号txtName.TextBrResult=Result密码txtPwd.TextBrResult=Result留言ReplacetxtMessage.TextChr13BrHr
1.InnerHtml=ResultEndSub/Script
3、HtmlHeadTitleRadioButton控件和RadioButtonList控件的使用/Title/HeadBodyFormRunat=Server您的姓名asp:TextBoxId=txtNameRunat=Server/p您最喜欢的书的类别Brasp:RadioButtonId=radBook1GroupName=radBookText=科学类CheckedRunat=Server/asp:RadioButtonId=radBook2GroupName=radBookText=文学类Runat=Server/asp:RadioButtonId=radBook3GroupName=radBookText=历史类Runat=Server/asp:RadioButtonId=radBook4GroupName=radBookText=教育类Runat=Server/Br您最喜欢的付款方式Brasp:RadioButtonListId=radPayRunat=Serverasp:ListItemSelected网上支付/asp:ListItemasp:ListItem邮寄/asp:ListItemasp:ListItem电汇/asp:ListItem/asp:RadioButtonListBrasp:ButtonId=SubmitText=提交OnClick=Submit_ClickRunat=Server/HrId=Hr1Visible=FalseRunat=Server//Formasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubSubmit_ClickSenderAsObjecteAsEventArgsDimResultAsStringHr
1.Visible=TrueResult=您的姓名txtName.TextBrResult=Result您最喜欢书的类别IfradBook
1.CheckedThenResult=ResultradBook
1.TextIfradBook
2.CheckedThenResult=ResultradBook
2.TextIfradBook
3.CheckedThenResult=ResultradBook
3.TextIfradBook
4.CheckedThenResult=ResultradBook
4.TextResult=ResultBr您最喜欢的付款方式radPay.SelectedItem.TextLabel
1.Text=ResultEndSub/Script
4、HtmlHeadTitleRadioButtonList控件进一步的使用/Title/HeadBodyFormRunat=Server您的姓名asp:TextBoxId=txtNameRunat=Server/p您所从事的职业Brasp:RadioButtonListId=radWorkRepeatDirection=HorizontalRepeatColumns=3OnSelectedIndexChanged=radWork_ChangedAutoPostBack=TrueRunat=Serverasp:ListItemSelected教师/asp:ListItemasp:ListItem工程师/asp:ListItemasp:ListItem医生/asp:ListItem asp:ListItem自由职业者/asp:ListItem asp:ListItem公务员/asp:ListItem asp:ListItem其他/asp:ListItem/asp:RadioButtonListPHrId=Hr1Visible=FalseRunat=Server//Formasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubradWork_ChangedSenderAsObjecteAsEventArgsDimResultAsStringHr
1.Visible=TrueResult=您的姓名txtName.TextBrResult=Result您的职业radWork.SelectedItem.TextLabel
1.Text=ResultEndSub/Script
5、HtmlHeadTitleCheckBox控件和CheckBoxList控件的使用/Title/HeadBodyFormRunat=Server您的兴趣爱好Brasp:CheckBoxId=Hobby1Text=运动AutoPostBackRunat=Server/Brasp:CheckBoxListId=SportRepeatDirection=HorizontalRunat=Serverasp:ListItem足球/asp:ListItemasp:ListItem长跑/asp:ListItemasp:ListItem健美/asp:ListItemasp:ListItem其他/asp:ListItem/asp:CheckBoxListBrasp:CheckBoxId=Hobby2Text=音乐AutoPostBackRunat=Server/Brasp:CheckBoxListId=MusicRepeatDirection=HorizontalRunat=Serverasp:ListItem流行音乐/asp:ListItemasp:ListItem古典音乐/asp:ListItemasp:ListItem摇滚音乐/asp:ListItemasp:ListItem其他音乐/asp:ListItem/asp:CheckBoxListBrasp:ButtonId=SubmitText=提交OnClick=Submit_ClickRunat=Server/HrId=Hr1Visible=FalseRunat=Server//Formasp:LabelId=Label1Runat=Server/asp:LabelId=Label2Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgsIfHobby
1.CheckedThenSport.Enabled=TrueElseSport.Enabled=FalseEndIfIfHobby
2.CheckedThenMusic.Enabled=TrueElseMusic.Enabled=FalseEndIfEndSubSubSubmit_ClickSenderAsObjecteAsEventArgsDimResultAsStringDimIAsIntegerHr
1.Visible=TrueIfSport.SelectedIndex=0ThenResult=Ul您喜欢的运动有ForI=0ToSport.Items.Count-1IfSport.ItemsI.SelectedThenResult=ResultLiSport.Itemsi.Text/LiEndIfNextEndIfResult=Result/UlIfMusic.SelectedIndex=0ThenResult=ResultUL您喜欢的音乐有ForI=0ToMusic.Items.Count-1IfMusic.ItemsI.SelectedThenResult=ResultLiMusic.Itemsi.Text/LiEndIfNextEndIfResult=Result/ULLabel
1.Text=ResultEndSub/Script
6、HtmlHeadTitleListBox控件和DropDownList控件的使用/Title/HeadBodyFormRunat=Server您的姓名asp:TextBoxId=txtNameRunat=Server/Br您最喜欢的书的类别Brasp:ListBoxId=lstBookRunat=Serverasp:ListItemselected科学类/asp:ListItemasp:ListItem文学类/asp:ListItemasp:ListItem历史类/asp:ListItemasp:ListItem教育类/asp:ListItem/asp:ListBoxP您最喜欢的付款方式asp:DropDownListId=ddlPayRunat=Serverasp:ListItem网上支付/asp:ListItemasp:ListItem邮寄/asp:ListItemasp:ListItem电汇/asp:ListItem/asp:DropDownListBrasp:ButtonId=SubmitText=提交OnClick=Submit_ClickRunat=Server/HrId=Hr1Visible=FalseRunat=Server//Formasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubSubmit_ClickSenderAsObjecteAsEventArgsDimResultAsStringHr
1.Visible=TrueResult=您的姓名txtName.TextBrResult=Result您最喜欢书的类别lstBook.SelectedItem.TextResult=ResultBr您最喜欢的付款方式ddlPay.SelectedItem.TextLabel
1.Text=ResultEndSub/Script
7、HtmlTitleButton控件和LinkButton控件的使用/TitleBodyFormRunat=Serverasp:ButtonId=Button1Text=请单击OnClick=Button1_ClickRunat=Server/Pasp:LinkButtonId=LinkButton1Text=看看有什么不同OnClick=LinkButton1_ClickRunat=Server//Form/Body/HtmlScriptLanguage=VbRunat=ServerSubButton1_ClickSenderAsObjecteAsEventargsresponse.write谢谢点击!EndSubSubLinkButton1_ClickSenderAsObjecteAsEventargsresponse.write注意LinkButton控件的外观与HyperLink控件相同,但功能与Button相同如果要在单击控件时链接到另一个Web页,请使用HyperLink控件EndSub/Script
8、HtmlTitleHyperLink控件的使用/TitleBodyasp:HyperLinkId=HyperLink1NavigateUrl=http://www.
163.comRunat=Server单击访问网易/asp:HyperLinkPasp:HyperLinkId=HyperLink2ImageUrl=netease.gifNavigateUrl=http://www.
163.comRunat=Server//Body/Html
9、HtmlHeadTitleRadioButtonList控件进一步的使用/Title/HeadBodyFormRunat=Serverasp:PanelId=Step1Style=BackGround-Color:LightBlue;Color=RedRunat=Server您的姓名asp:TextBoxId=txtNameRunat=Server/p您所从事的职业Brasp:RadioButtonListId=radWorkRepeatDirection=HorizontalRepeatColumns=3Runat=Serverasp:ListItemSelected教师/asp:ListItemasp:ListItem工程师/asp:ListItemasp:ListItem医生/asp:ListItemasp:ListItem自由职业者/asp:ListItemasp:ListItem公务员/asp:ListItemasp:ListItem其他/asp:ListItem/asp:RadioButtonListasp:ButtonId=Submit1Text=下一步OnClick=Submit1_ClickRunat=Server//asp:Panelasp:PanelId=Step2Style=BackGround-Color:LightGreen;Color=RedRunat=Server您喜欢的运动Brasp:CheckBoxListId=SportRepeatDirection=HorizontalRunat=Serverasp:ListItem足球/asp:ListItemasp:ListItem长跑/asp:ListItemasp:ListItem健美/asp:ListItemasp:ListItem其他/asp:ListItem/asp:CheckBoxListBr您喜欢的音乐Brasp:CheckBoxListId=MusicRepeatDirection=HorizontalRunat=Serverasp:ListItem流行音乐/asp:ListItemasp:ListItem古典音乐/asp:ListItemasp:ListItem摇滚音乐/asp:ListItemasp:ListItem其他音乐/asp:ListItem/asp:CheckBoxListBrasp:ButtonId=Submit2Text=下一步OnClick=Submit2_ClickRunat=Server//asp:Panelasp:PanelId=Step3Style=BackGround-Color:LightYellow;Color=RedRunat=Server您最喜欢的书的类别Brasp:ListBoxId=lstBookRunat=Serverasp:ListItemselected科学类/asp:ListItemasp:ListItem文学类/asp:ListItemasp:ListItem历史类/asp:ListItemasp:ListItem教育类/asp:ListItem/asp:ListBoxP您最喜欢的付款方式asp:DropDownListId=ddlPayRunat=Serverasp:ListItem网上支付/asp:ListItemasp:ListItem邮寄/asp:ListItemasp:ListItem电汇/asp:ListItem/asp:DropDownListBrasp:ButtonId=Submit3Text=提交OnClick=Submit3_ClickRunat=Server//asp:Panel/Formasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgsIfNotPage.IsPostBackThenStep
1.Visible=TrueStep
2.Visible=FalseStep
3.Visible=FalseEndIfEndSubSubSubmit1_ClickSenderAsObjecteAsEventArgsDimResultAsStringResult=您的姓名txtName.TextBrResult=Result您的职业radWork.SelectedItem.TextLabel
1.Text=Resultlabel
1.Visible=FalseStep
1.Visible=FalseStep
2.Visible=TrueStep
3.Visible=FalseEndSubSubSubmit2_ClickSenderAsObjecteAsEventArgsDimResultAsStringDimIAsIntegerResult=Label
1.TextIfSport.SelectedIndex=0ThenResult=ResultBr您喜欢的运动有ForI=0ToSport.Items.Count-1IfSport.ItemsI.SelectedThenResult=ResultSport.Itemsi.Text、EndIfNextEndIfIfMusic.SelectedIndex=0ThenResult=ResultBr您喜欢的音乐有ForI=0ToMusic.Items.Count-1IfMusic.ItemsI.SelectedThenResult=ResultMusic.Itemsi.Text、EndIfNextEndIfStep
1.Visible=FalseStep
2.Visible=FalseStep
3.Visible=TrueLabel
1.Text=ResultEndSubSubSubmit3_ClickSenderAsObjecteAsEventArgsDimResultAsStringDimIAsIntegerResult=Label
1.TextResult=ResultBr您最喜欢书的类别lstBook.SelectedItem.TextResult=ResultBr您最喜欢的付款方式ddlPay.SelectedItem.TextResult=Result/UlLabel
1.Text=ResultLabel
1.Visible=TrueEndSub/Script实验三增强Web控件和数据验证Web控件的使用
一、实验目的和要求
1、掌握Web控件AdRotactor的使用方法
2、掌握Web控件Calendar的使用方法
3、掌握验证控件的使用方法,了解各种控件的相关属性及设置方法
1、ads.xmlAdvertisementsAdImageUrlnetease.gif/ImageUrlNavigateUrlhttp://www.
163.com/NavigateUrlAlternateTextNetEase/AlternateTextImpressions1/ImpressionsCaptionWelcometoNetease/CaptionKeywordChineseWebsite/Keyword/AdAdImageUrlsina.gif/ImageUrlNavigateUrlhttp://www.sina.com.cn/NavigateUrlAlternateTextSina/AlternateTextImpressions1/ImpressionsCaptionWelcometoSina/CaptionKeywordChineseWebsite/Keyword/AdAdImageUrlYahoo.jpg/ImageUrlNavigateUrlhttp://www.yahoo.com/NavigateUrlAlternateTextYahoo/AlternateTextImpressions1/ImpressionsCaptionWelcometoYahoo/CaptionKeywordForeignWebsite/Keyword/AdAdImageUrlhotmail.gif/ImageUrlNavigateUrlhttp://www.hotmail.com/NavigateUrlAlternateTexthotmail/AlternateTextImpressions1/ImpressionsCaptionWelcometoHotmail/CaptionKeywordForeignWebsite/Keyword/Ad/Advertisementssy3_
1.aspxHtmlHeadTitleAdRotator控件的使用/Title/HeadBodyasp:AdRotatorId=AdRotator1BorderWidth=2BorderColor=BlackTarget=_BlankKeywordFilter=ChineseWebsiteAdvertisementFile=ads.xmlOnAdCreated=AdRotator1_CreatedRunat=Server/nbspnbspnbspnbspnbspnbspasp:AdRotatorId=AdRotator2BorderWidth=2BorderColor=BlackTarget=_BlankKeywordFilter=ForeignWebsiteAdvertisementFile=ads.xmlOnAdCreated=AdRotator2_CreatedRunat=Server/Brasp:LabelId=Label1Runat=Server/nbspnbspnbspasp:LabelId=Label2Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubAdRotator1_CreatedSenderAsObjecteAsAdCreatedEventArgsIfLene.AdPropertiesCaption0ThenLabel
1.Text=AdRotator1:e.AdPropertiesCaptionEndIfEndSubSubAdRotator2_CreatedSenderAsObjecteAsAdCreatedEventArgsIfLene.AdPropertiesCaption0ThenLabel
2.Text=AdRotator2:e.AdPropertiesCaptionEndIfEndSub/Script
2、HtmlHeadTitleCalendar控件的使用/Title/HeadBodyFormRunat=Serverasp:CalendarId=Calendar1BackColor=LightBlueForeColor=RedBorderWidth=3BorderStyle=SolidBorderColor=RedCellPadding=2CellSpacing=2ShowGridLines=TrueFirstDayOfWeek=MondayTitleStyle-BackColor=DarkBlueTitleStyle-BorderWidth=3TitleStyle-BorderColor=BlackTitleStyle-Height=40DayHeaderStyle-BorderColor=BlackDayHeaderStyle-BorderWidth=2DayHeaderStyle-BackColor=LightYellowDayHeaderStyle-ForeColor=DarkGreenDayHeaderStyle-Height=35DayStyle-Width=50DayStyle-Height=15TodayDayStyle-BorderWidth=3TodayDayStyle-BackColor=RedTodayDayStyle-ForeColor=BrownWeekEndDayStyle-BackColor=PalegoldenrodWeekEndDayStyle-Width=40WeekEndDayStyle-Height=15SelectedDayStyle-BorderColor=FireBrickSelectedDayStyle-BorderWidth=3OtherMonthDayStyle-BackColor=OlivedrabOnSelectionChanged=Date_SelectedRunat=Server//FormHrasp:LabelId=Label1Runat=Server//Body/HtmlscriptLanguage=VBRunat=ServerSubDate_SelectedSenderAsObjecteAsEventArgsLabel
1.Text=日期Calendar
1.SelectedDate.ToShortDateStringEndSub/script
3、HtmlHeadTitleRequiredFieldValidator控件的使用/Title/HeadBodyFormRunat=Server用户名asp:TextBoxId=txtNameRunat=Server/asp:RequiredFieldValidatorId=RFValid1ControlToValidate=txtNameRunat=Server*不可缺少/asp:RequiredFieldValidatorP密码asp:TextBoxId=txtPasswordTextMode=PasswordRunat=Server/asp:RequiredFieldValidatorId=RFValid2ControlToValidate=txtPasswordRunat=Server*不可缺少/asp:RequiredFieldValidatorPasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server/p/FormHrasp:LabelId=Label1Runat=Server//body/htmlscriptLanguage=VBrunat=serverSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=用户名txtName.TextBrResult=Result密码txtPassword.TextBrLabel
1.Text=ResultEndIfEndSub/script
4、HtmlHeadTitleRequiredFieldValidator控件的使用/Title/HeadBodyFormRunat=ServerH2高考考生登记表/H2考生姓名asp:TextBoxId=txtNameRunat=Server/asp:RequiredFieldValidatorId=RFValid1ControlToValidate=txtNameRunat=Server*不可缺少/asp:RequiredFieldValidatorP考生年龄asp:TextBoxId=txtAgeRunat=Server/asp:RangeValidatorId=RValid1Type=IntegerMinimumValue=18MaximumValue=80ControlToValidate=txtAgeRunat=Server有效范围18-80/asp:RangeValidatorPasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//body/htmlscriptLanguage=VBrunat=serverSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=姓名txtName.TextBrResult=Result年龄txtAge.TextBrLabel
1.Text=ResultEndIfEndSub/script
5、
6、HtmlHeadTitleCompareValidator控件的使用/Title/HeadBodyFormrunat=server请输入注册入学的时间Brasp:TextBoxid=txtEnterrunat=server/asp:CompareValidatorid=CValid1runat=serverControlToValidate=txtEnterType=DateValueToCompare=2001/09/01Operator=GreaterThanEqual必须在2001年9月1日以后(含9月1日)/asp:CompareValidatorpasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=注册入学的时间txtEnter.TextBrLabel
1.Text=ResultEndIfEndSub/script
7、HtmlHeadTitleCompareValidator控件的使用/Title/HeadBodyFormrunat=server请输入密码Brasp:TextBoxId=txtPswTextMode=Passwordrunat=server/Br请输入一遍密码Brasp:TextBoxId=txtConfirmTextMode=Passwordrunat=server/Brasp:CompareValidatorId=CValid1runat=serverControlToValidate=txtConfirmType=StringControlToCompare=txtPswOperator=Equal所输入的密码不一致,请重新输入!/asp:CompareValidatorBrasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//Body/HtmlScriptLanguage=VBRunat=ServerSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=密码txtPsw.TextBrLabel
1.Text=ResultEndIfEndSub/script
8、HtmlHeadTitleValidationSummary控件的使用/Title/HeadBodyFormRunat=ServerH2学生情况登记表/H2学生姓名Brasp:TextBoxId=txtNameRunat=Server/asp:RequiredFieldValidatorId=RFValid1ControlToValidate=txtNameErrorMessage=学生姓名Runat=Server*不可缺少/asp:RequiredFieldValidatorBr学生年龄Brasp:TextBoxId=txtAgeRunat=Server/asp:RangeValidatorId=RValid1Type=IntegerMinimumValue=18MaximumValue=80ControlToValidate=txtAgeErrorMessage=学生年龄Runat=Server有效范围18-80/asp:RangeValidatorBr注册入学的时间Brasp:TextBoxid=txtEnterrunat=server/asp:CompareValidatorid=CValid1runat=serverControlToValidate=txtEnterType=DateValueToCompare=2001/09/01Operator=GreaterThanEqualErrorMessage=注册入学时间必须在2001年9月1日以后(含9月1日)/asp:CompareValidatorBrasp:ValidationSummaryId=ValSumHeaderText=尚未通过的项目有DisplayMode=BulletListRunat=Server/asp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//body/htmlscriptLanguage=VBrunat=serverSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=学生姓名txtName.TextBrResult=Result学生年龄txtAge.TextBrResult=Result注册入学时间txtEnter.TextBrLabel
1.Text=ResultEndIfEndSub/script
9、HtmlHeadTitleRegularExpressionValidator控件的使用/Title/HeadBodyFormRunat=Server姓名(拼音)Brasp:TextBoxId=txtNameRunat=Server/asp:RegularExpressionValidatorId=REValid1Runat=ServerControlToValidate=txtNameValidationExpression=[A-Z]{1}[a-z]{0}[]{1}[A-Z]{1}[a-z]{0}请输入姓名拼音,如DingWenli/asp:RegularExpressionValidatorBr邮件编码Brasp:TextBoxId=txtZipRunat=Server/asp:RegularExpressionValidatorId=REValid2Runat=ServerControlToValidate=txtZipValidationExpression=[0-9]{6}请输入邮政编码,如200092/asp:RegularExpressionValidatorPasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//body/htmlscriptLanguage=VBrunat=serverSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=姓名(拼音)txtName.TextBrResult=Result邮政编码txtZip.TextBrLabel
1.Text=ResultEndIfEndSub/script
10、HtmlHeadTitleRegularExpressionValidator控件的使用/Title/HeadBodyFormRunat=Server电子邮件asp:TextBoxId=txtE_mailRunat=Server/asp:RegularExpressionValidatorId=REValid1Runat=ServerControlToValidate=txtE_mailValidationExpression=[A-Za-z0-9_\-\.]{1}@[A-Za-z0-9_\-\.]{3}请输入电子邮件如lifeng@sohu.com/asp:RegularExpressionValidatorP家庭地址asp:TextBoxId=txtAddrSize=40Runat=Server/asp:RegularExpressionValidatorId=REValid2Runat=ServerControlToValidate=txtAddrValidationExpression=.{1}[区县]{1}.{1}路[0-9]{1}弄[0-9]{1}号[0-9]{1}室请输入地址,如松江区国小路2弄34号901室/asp:RegularExpressionValidatorPasp:ButtonId=Button1Text=提交OnClick=Button1_ClickRunat=Server//FormHrasp:LabelId=Label1Runat=Server//body/htmlscriptLanguage=VBrunat=serverSubButton1_ClicksenderAsObjecteAsEventArgsIfPage.IsValidThenDimResultAsStringResult=电子邮件txtE_mail.TextBrResult=Result家庭地址txtAddr.TextBrLabel
1.Text=ResultEndIfEndSub/script实验四利用ADO.NET访问数据库
一、实验目的和要求
1、了解ADO.NET的常用对象
2、利用Command对象和DataReader对象读取数据
3、利用DataCommand对象读取数据
4、数据表的添加和修改
1、%@ImportNamespace=System.Data%%@ImportNamespace=System.Data.OleDb%HtmlHeadBodyH2Align=Center读取字段信息/h2%声明变量DimConnasOleDbConnectionDimCmdAsOleDbCommandDimdrAsOleDbDataReaderDimConnStrAsStringDimRowAsTableRowDimCellAsTableCellDimIAsInteger建立数据库连接,并打开数据表ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=_Server.MapPathstud.mdb如未设置odbc数据源,可使用绝对地址方式,如ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=C:\DocumentsandSettings\Administrator\桌面\新建文件夹\PCODE\stud.mdbconn=NewOleDbConnectionConnStrconn.OpenCmd=NewOleDbCommandselect*fromstudentconndr=Cmd.ExecuteReader设置表头Row=NewTableRowCell=NewTableCellCell.Text=字段序号Row.Cells.AddCellCell=NewTableCellCell.Text=数据类型Row.Cells.AddCellCell=NewTableCellCell.Text=字段名称Row.Cells.AddCellTable
1.Rows.AddRow读取字段信息ForI=0Todr.FieldCount-1Row=NewTableRowCell=NewTableCellCell.Text=IRow.Cells.AddCellCell=NewTableCellCell.Text=dr.GetDataTypeNameiRow.Cells.AddCellCell=NewTableCellCell.Text=dr.GetNameiRow.Cells.AddCellTable
1.Rows.AddRowNextI关闭数据库dr.CloseConn.Close%asp:TableId=Table1Border=2Align=CenterRunat=Server//Body/Html
2、%@ImportNamespace=System.Data%%@ImportNamespace=System.Data.OleDb%HtmlHeadBodyH2Align=Center读取字段信息/h2%声明变量DimConnasOleDbConnectionDimCmdAsOleDbCommandDimdrAsOleDbDataReaderDimConnStrAsStringDimRowAsTableRowDimCellAsTableCellDimIAsInteger建立数据库连接,并打开数据表ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=_Server.MapPathstud.mdb如未设置odbc数据源,可使用绝对地址方式,如ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=C:\DocumentsandSettings\Administrator\桌面\新建文件夹\PCODE\stud.mdbconn=NewOleDbConnectionConnStrconn.OpenCmd=NewOleDbCommandselect*fromstudentconndr=Cmd.ExecuteReader读取字段名Row=NewTableRowForI=0Todr.FieldCount-1Cell=NewTableCellCell.Text=dr.GetNameIRow.Cells.AddCellNextTable
1.Rows.AddRow读取数据Whiledr.ReadRow=NewTableRowForI=0Todr.FieldCount-1IfNotdr.IsDBNulliThenCell=NewTableCellCell.Text=dr.ItemIRow.Cells.AddCellEndIfNextTable
1.Rows.AddRowEndWhile关闭数据库dr.CloseConn.Close%asp:TableId=Table1Align=CenterBorder=2Runat=Server//body/html
3、%@ImportNamespace=System.Data%%@ImportNamespace=System.Data.oledb%HtmlHeadTitle使用OleDbDataAdapter对象和DataSet对象读取字段信息/Title/HeadBodyFormRunat=Serverasp:RadioButtonId=radTable1GroupName=radTableText=显示数据表1的字段信息CheckedAutoPostBack=TrueRunat=Server/asp:RadioButtonId=radTable2GroupName=radTableText=显示数据表2的字段信息AutoPostBack=TrueRunat=Server/pasp:LabelId=Label1Runat=Server/asp:TableId=Table1Border=3Runat=Server//Form/BodyHeadScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgs声明变量DimCmdAsOleDbDataAdapterDimdsAsDataSet=NewDataSetDimConnStrAsStringDimRowAsTableRowDimCellAsTableCellDimIAsInteger建立数据库连接,并打开数据表ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=_Server.MapPathstud.mdbCmd=NewOleDbDataAdapterselect*fromstudentConnStrCmd.FilldsstudentCmd=NewOleDbDataAdapterselect*fromsubjectConnStrCmd.Filldssubject设置表格的标题Row=NewTableRowCell=NewTableCellCell.Text=字段名Row.Cells.AddCellCell=NewTableCellCell.Text=是否接受NULL值Row.Cells.AddCellCell=NewTableCellCell.Text=是否自动递增Row.Cells.AddCellCell=NewTableCellCell.Text=字段类型Row.Cells.AddCellCell=NewTableCellCell.Text=是否只读Row.Cells.AddCellTable
1.Rows.AddRowDimdtAsDataTableIfradTable
1.CheckedThendt=ds.Tables0Elsedt=ds.Tables1Endif读取表名Label
1.Text=数据表dt.TableName的字段信息读取字段信息ForI=0Todt.Columns.Count-1Row=NewTableRowCell=NewTableCellCell.Text=dt.ColumnsI.CaptionRow.Cells.AddCellCell=NewTableCellCell.Text=dt.ColumnsI.allowdbNullRow.Cells.AddCellCell=NewTableCellCell.Text=dt.ColumnsI.AutoIncrementRow.Cells.AddCellCell=NewTableCellCell.Text=dt.ColumnsI.DataType.ToStringRow.Cells.AddCellCell=NewTableCellCell.Text=dt.ColumnsI.ReadOnlyRow.Cells.AddCellTable
1.Rows.AddRowNextEndSub/Script
4、%@ImportNamespace=System.Data%%@ImportNamespace=System.Data.oledb%HtmlHeadTitle使用OleDbDataAdapter对象和DataSet对象读取数据表内容/Title/HeadBodyFormRunat=Serverasp:RadioButtonId=radTable1GroupName=radTableText=显示数据表1的内容CheckedAutoPostBack=TrueRunat=Server/asp:RadioButtonId=radTable2GroupName=radTableText=显示数据表2的内容AutoPostBack=TrueRunat=Server/pasp:LabelId=Label1Runat=Server/asp:TableId=Table1Border=3Runat=Server//Form/BodyHeadScriptLanguage=VBRunat=ServerSubPage_LoadSenderAsObjecteAsEventArgs声明变量DimCmdAsOleDbDataAdapterDimdsAsDataSet=NewDataSetDimConnStrAsStringDimRowAsTableRowDimCellAsTableCellDimIJAsInteger建立数据库连接,并打开数据表ConnStr=Provider=Microsoft.jet.OLEDB.
4.0;DataSource=_Server.MapPathstud.mdbCmd=NewOleDbDataAdapterselect*fromstudentConnStrCmd.FilldsstudentCmd=NewOleDbDataAdapterselect*fromsubjectConnStrCmd.FilldssubjectDimdtAsDataTableIfradTable
1.CheckedThendt=ds.Tables0Elsedt=ds.Tables1Endif将字段名作为表格标题Label
1.Text=数据表dt.TableName的内容Row=NewTableRowForI=0Todt.Columns.Count-1Cell=NewTableCellCell.Text=dt.ColumnsI.CaptionRow.Cells.AddCellNextTable
1.Rows.AddRow选取数据表内容ForI=0Todt.Rows.Count-1Row=NewTableRowForJ=0Todt.Columns.Count-1Cell=NewTableCellCell.Text=dt.RowsI.ItemJRow.Cells.AddCellNextJTable
1.Rows.AddRowNextIEndSub/Script
5、%@ImportNamespace=System.Data%%@ImportNamespace=System.Data.oledb%HtmlHeadTitle修改数据表内容/Title/HeadBody%建立数据库连接,并打开数据表DimConnStrAsnewoledbconnectionProvider=Microsoft.Jet.OLEDB.
4.0;DataSource=Server.MapPathstud.mdbDimdrAsoledbDataReaderDimCmdAsnewoledbCommandUpdatesubjectSet语文=语文+5ConnStr执行修改connstr.Opencmd.executeNonQuerylabel
1.text=共修改了cmd.executeNonQuery条纪录connstr.close显示表DimRowAsTableRowDimCellAsTableCellDimIAsIntegerconnstr.OpenCmd=NewoledbCommandselect*fromsubjectConnStrdr=Cmd.Executereader读取字段名Row=NewTableRowForI=0Todr.FieldCount-1Cell=NewTableCellCell.Text=dr.GetNameIRow.Cells.AddCellNextTable
1.Rows.AddRow读取数据Whiledr.ReadRow=NewTableRowForI=0Todr.FieldCount-1IfNotdr.IsdbNulliThenCell=NewTableCellCell.Text=dr.ItemIRow.Cells.AddCellEndIfNextTable
1.Rows.AddRowEndWhiledr.closeconnstr.close%asp:TableId=Table1Align=CenterBorder=2Runat=Server/asp:labelid=label1runat=server//body/html。