DataGrid巧用实现目录浏览

2016-01-29 14:00 5 1 收藏

DataGrid巧用实现目录浏览,DataGrid巧用实现目录浏览

【 tulaoshi.com - ASP.NET 】

/*
豆腐制作 都是精品
http://www.asp888.net 豆腐技术站
如转载 请保留版权信息
*/
我们都知道 asp+ 的 DataGrid 可以绑定 ADO 可以绑定 XML,没有想到 连目录结构都可以绑定!不信,就看

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

<%@ Import Namespace="System.IO" %
<html
<titleDataGrid 巧用实现 目录浏览!!!</title
<script language="C#" runat="server"
void Page_Load(Object Src, EventArgs E){
ArrayList ar = new ArrayList();
Directory[] dirs = Directory.GetDirectoriesInDirectory(Server.MapPath("/"));
foreach (Directory dir in dirs) {
foreach (File f in dir.GetFiles("*.aspx")) //如果是 想要 列出别的类型的文件,只要修改这个就可以了
{
ar.Add(f.Name);
}
}
dg.DataSource = ar;
dg.DataBind();
}
</script
</head
<body
<form method="post" runat="server"
<asp:DataGrid
Id="dg"
Runat="Server"
headerstyle-backcolor="#666699"
headerstyle-forecolor="#FFFFFF"
itemstyle-backcolor ="#EEEEEE"
alternatingitemstyle-backcolor="#FFFFFF"
alternatingitemstyle-forecolor="#000000"
/
</form
</body

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

来源:http://www.tulaoshi.com/n/20160129/1492236.html

延伸阅读
标签: ASP
  以前写了一个自动生成网站的建站系统.可是最近要写一个不要自动生成,而是要做到: http://www.knowsky.com/用户名 所以我想一个用户建立一个目录.可是我想如果上W个用户.那不是我要建立上W个目录. 所以我采用IIS的404错误和对错误信息的分析写了一个自动转向的代码. 先把IIS的所有404错误.指到:URL:/website.asp?webname=$V 然后在网站...
标签: ASP
数据库结构(共使用了两个表) 1.tblCategory 字段名 类型 Root binary 说明树关或开(目录的根) ID 自动编号 关键字 Sort integer 识别该字段内容的整数(如果root是开状态sort为0)表示显示的目录的顺序 Name text(255)可以包含html中的标识符 HREF text(255) 允许空 2.tblPages ID 自动编号 Sort integer 关键字 Name text...
提起做目录,总是会有朋友发牢骚,该怎么做呢?难道有手动制作,哇,不敢想象...,为帮大家解除烦恼,下面通过实例与大家分享下WPS文字中目录如何自动生成,新手朋友莫错过哦! 简要概述 首先从左上角的"标题1 标题2 标题3"中选择一个并输入一个标题名字,接着点击"引用"及"插入目录",在目录对话中根据需要设...
标签: 电脑入门
有朋友送来一份编辑完成的论文,包括有手工编制完成的目录,如图1所示。 图1 但是他怎 么也不能使右侧的页码能完全对齐。怎样才能使页码完全对齐呢? 经过询问知道,页码是手工逐个添加的,前引导符是多个省略号。由于论文已经是最终稿,不需要修改,所以对相应的标题使用样式然后使用WPS 2010本身的功能自动生成目录已经没有什么必要了...
标签: Web开发
代码如下: % ' make sure you have the 6 dir_*.gif files! ' yes, you can copy ours if ya want too.. :) ' http://line9.com/img/dir_dir.gif .. etc. Function ShowImageForType(strName) strTemp = strName If strTemp "dir" Then strTemp = LCase(Right(strTemp, Len(strTemp) - InStrRev(strTemp, ".", -1, 1))) End If Select Case ...

经验教程

557

收藏

59
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部