基于asp.net的web页面动态控件创建以及使用_第1页
基于asp.net的web页面动态控件创建以及使用_第2页
基于asp.net的web页面动态控件创建以及使用_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、    摘要:web设计中,有很多场合,页面的控件要动态创建甚至只能动态创建,这样可以增加页面的灵活性,但是给程序员带来了一些麻烦,比如要使用动态创建的控件,怎么使用,都是要求解决的问题,本文基于,简要介绍了页面的控件如何动态创建,同时也介绍了怎么使用这些动态创建的控件的方法。前言:自从Microsoft在2000年推出了.net framework以来,给基于internet编程的程序员带来了巨大的福音,.net framework大大简化了web页面设计的繁杂,可见即可得的页面效果大大简化了页面设计程序员的工作任务,code behind技术将页面与

2、代码分离,减少了web页面的无序状态,其中大量可以复用的控件可以无缝的被浏览器使用,由于互联网上95%的浏览器均是Microsoft的Internet Explorer,程序员大可以放心的使用这些控件而不用担心浏览器的兼容性,本文从Microsoft的.net和com控件开始,给出具体例子说明如何在页面上动态创建控件,以及怎么来使用这些动态创建的控件。其中具体使用的语言是。1.       Microsoft控件目前用于浏览器的动态数据浏览方式主要有以下两种,(1).使用java applet。(2).使用可以在浏览器中运用

3、的控件。两种方法各有利弊,使用java applet,页面执行较慢,编程复杂,可复用性不大,这种方式现在使用较少;越来越多的程序员较倾向于使用控件。其中我们在web中大多数时候是使用到.net 的web control和html control以及一些数据操作控件。一般的,在web设计中,通常使用拖拽的方式,将空间放置到页面,然后设置属性就可以了,然后再后台程序中编程使用就可以了。这种方式操作起来很方便,可见即可得,同时引用这些放置好的控件也很方便,但是在有些情况下,我们却不得不要动态创建控件,比如对一一个数据库中的某一些字段,对于不同身份的用户,见到的字段数目是不一样的;还有就是对于不同身份

4、的用户对于某一控件的使能状态是不一样的,我们不能再页面设计时采用一个标准,最好的方式就是动态创建控件,对于不同的情况,通过程序来控制,放置在页面上的控件的数目也通过程序来控制。然后通过程序来引用这些创建好的控件。2.       创建控件对于程序员来说,用例子说话是最好的方式来提供解决方案,我将在页面上动态的放置一些标签(label)和文本框(textbox),这些文本框里头放置的是从dataset取到的数据,同时我把这些文本框放置到一个表格的相应单元格里,可以实现有序的放置,首先在页面添加一个table。然后根据需要创建不

5、同的列数和行数,如下为动态创建这些文本框的代码:Dim i As Integer                For i = 0 To IntRowCount - 1                    Dim r As TableRo

6、w = New TableRow()                    Dim c1 As TableCell = New TableCell()                    Dim m

7、yLabel1 As Label = New Label()                   这里设置该label的ID,对于不同的label,必须设置成不同的ID,我这里设置成前缀lbl1加字段名的组合,例如lbl1xlmc等。              

8、0;     myLabel1.ID = "Lbl1" & Trim(OleDsField.Tables("Field").Rows(i).Item("column_name").ToString()下面的条件语句是为了判断数据库中在字段的值是否为空,根据条件赋予label不同的文本。                &#

9、160;   If OleDsField.Tables("Field").Rows(i).Item("column_title").GetType.ToString = "System.DBNull" Then                        myLabe

10、l1.Text = ""                    Else                        myLabel1.T

11、ext = Trim(OleDsField.Tables("Field").Rows(i).Item("column_title")                    End If                    Dim c2 As TableCell =

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论