Dim
成都创新互联公司服务项目包括岑巩网站建设、岑巩网站制作、岑巩网页制作以及岑巩网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,岑巩网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到岑巩省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!
dir
As
New
IO.DirectoryInfo("C:\TDDownload")
//
目录下就一个文件夹
If
dir.GetDirectories.Length
Then
MessageBox.Show(dir.GetDirectories.GetValue(0).ToString())
End
If
//
目录下多个文件夹
'For
Each
d
As
IO.DirectoryInfo
In
dir.GetDirectories
'
MessageBox.Show(d.FullName)
'Next
这个只有一个目录一个目录的去查找了,你看系统查找都是这样的
Server.MapPath("~") "\" "Web.config"Server.MapPath("~") 是取当前目录上一级的路径Server.MapPath(".") 是取当前目录的路径
如果一名开发者希望在代码中使用相对路径而非绝对路径 那么设定当前工作路径的能力迟早会派上用场 在本教程中 我说明如何用 VB NET 设定当前工作路径
在代码中 由于相对路径可以简化代码 它一般成为我们的首选路径 但是 解释相对与当前工作目录有关 因此 将当前工作目录修改到一个需要的位置允许开发者在代码中使用相对路径
为了确定当前工作路径 我使用 Directory 对象的 GetCurrentDirectory 方法 同时 为修改当前工作路径 我应用 Directory 对象的 SetCurrentDirectory 方法 此外 您可以利用 Path 对象的 GetFullPath 方法 它允许您把使用当前工作路径的一个相对路径转换成绝对路径
实例
在表格中增加一个列表框( listbox )控件 listbox 并在 列表 A 中添加代码 运行代码时 结果 如图 所示
在此例中 我首先显示一个当前工作目录(利用 Directory 类的 GetCurrentDirectory 方法) 然后我用 GetFullPath 方法向它提交一个文件名(在本例中为 text txt ) 这两个行为的结果被逐条添加到列表框 Listbox 中
lishixinzhi/Article/program/net/201311/12881
售后响应及时
7×24小时客服热线数据备份
更安全、更高效、更稳定价格公道精准
项目经理精准报价不弄虚作假合作无风险
重合同讲信誉,无效全额退款