说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB中DOS文件名与长文件名的转换

HTML文档下载 WORD文档下载 PDF文档下载
VB中DOS文件名与长文件名的转换

  自从进入Win95时代以来,Win95的长文件名给人们带来了很多方便,但是由于原来的DOS只支持8.3格式,即8个主文件名加上3个扩展名,所以所有Win95的长文件名都有一个DOS名,具体方法为取原长文件名前6位加~num(其中num为现目录中不重名的序号)。现在的VB已完全支持了长文件名,但是有一点可能没有注意到,即当用command()接收从命令行传来的参数时,如果参数是长文件名,则被强制转换成为DOS名,即8.3格式文件名。由于这两种文件名通用,所以一般情况下不会有什么问题。但遇到特殊场合就不行了。有没有办法再把8.3格式的文件名转换为原来的长文件名呢?答案是:可以。
  让我们编程来回答这个问题:
  首先建立一个窗体,在窗体上加两个TEXT控件,其中第一个TEXT的TEXT属性为“显示命令行参数”,第二个TEXT的TEXT属性为“显示转换后文件名”,再建立一个 commandbutton 控件,其caption属性为“显示”,具体原代码如下:
  ′-------通用,声明:
  Dim dosfilename As String ′声明dos 文件名
  Dim longfilename As String ′声明长文件名
  ′------------
  Private Sub Command1_Click()
  Text1.Text = dosfilename
  Text2.Text = longfilename
  End Sub
  ′--------
  Private Sub Form_Load()
  dosfilename = Command$() ′从命令行取得参数
  longfilename = Dir(dosfilename) ′得到长文件名
  End Sub
  接着生成EXE文件,然后将一个长文件名的文件图标拖到新生成的EXE文件上去,点击EXE文件的commandbutton 就可以看到转换结果了。
  (马 麟)

控件深度投影和阴影效果的实现-Delphi资料 控制Delphi的窗口显示位置 控制Form不能放大、缩小、移动、关闭-Delphi资料 控制系统菜单-Delphi资料 利用Delphi实现支持窗体的自定义函数 轻轻松松在DELPHI3.0中实现三态按钮 全部窗体可使用鼠标移动-Delphi资料 让按钮连续工作--兼谈Delphi元件开发 让彩色光标出现在Delphi程序中 让彩色光标出现在程序中-Delphi资料 在Windows桌面的任务栏上有一个凹陷的区域,其中显示着系统时钟以及一些图标,这个长方形的区域便 如何使用Show方法来显示一个模态窗口-Delphi资料 如何旋转字体-Delphi资料 如何隐藏和显示Windows的任务条-Delphi资料 如何在DELPHI界面上运行可执行文件 设计Form时的快捷键-Delphi资料 生成非矩形窗口-Delphi资料 时隐时现的鼠标-Delphi资料 无标题窗口的移动-Delphi资料 应用程序敏感键的实现-Delphi资料 用Delphi 4.0 设 计 新 型 界 面 用Delphi 实 现 自定 义 颜 色 对 话 框 及 其 构 件 用Delphi 实现自定义颜色对话框及其构件 用Delphi4实现风Word97风格的工具栏 用Delphi 开 发windows 屏 幕 保 护 预 览 程 序 用Delphi设置墙纸 用DELPHI实现无边界窗体的移动 用Delphi实现自定义颜色对话框及其构件 用DEPHI 3.0实现动画ABOUT窗口-Delphi资料 用鼠标拖动无标题窗口-Delphi资料 在Delphi编程中创建一个启动闪现窗口 listView怎么加入打印功能? 如果你拽的话:50分全是你的啦。帮我看看这条sql语句错在那里? Excelsior JET Professional Edition 谁有这个版本啊,破解的??在线等待…… 我的程序编译通过了,为什么测试通不过??代码在下面,大家看看是关于数据库和哈希表的 如何用DELPHI制作卸载程序 为什么我在C++ Builder 中用cgi作webservice访问数据库出错? 关于dinstinct的问题(100分!) 怎样将GIF文件包含到资源文件及如何调用? 如何在程序中屏蔽掉系统热健:如 ctrl+alt+del, alt+tab等等 怎样在子线程的运行过程中获得主窗口的指针? 50分征解50分征解!!!!! 如何在listbox中显示多列,并加上标题(每一列都有自己的标题) 现有一DBF数据库,如何把它倒到SQL里? 没分了,仅此10分求日期的正则表达式,希望帮忙 PPT 文件变得好大 oracle8.1.5中transaction slot的问题 怎样在linux下设置有管理员权限的用户!在线等待!!!! 出学者界面实做---STEP 4 小小的堆栈问题 可不可以在一个视图中加入不同数据库的数据? 为什么我在C++ Builder 中用cgi作webservice访问数据库出错? 求JPAD PRO的破解 PPT 文件里插入Organization Chat 请教static问题 我要离开现在的公司了,去寻求新的发展...... 请教各位高人,一个循环定义问题 Win98下为什么拦截不到从另一线程发过来的自定义消息 public class myclass 与 class myclass 一样吗? dbgrid 中,titleclick事件,如何判断选中的是 哪个字段 呢? 很简单 ADOtable 不支持 FindKey, 请教: 应该如何解决记录定位? 火急请教个“重新验证组织单元”问题! 想做一个报表但设置DataEnvironment的连接失败,不知为何错? 请教!linux下将.h和.c文件编译成动态连接库!!! 你真的懂SQL语句的编写吗?快来,我给你分 重载与模板的问题 出租魏公村西口两居之一 不知哪有好一点的聊天室,各位大虾请推荐几个小弟几个!!!! jsp里面有类似于asp的response.end语法吗? 求教各位大虾,这样的数据库程序如何实现。急切中。。。。。 vb中有没有像CommonDialog选文件的定位文件夹的控件? 怎么一次性加入多个子目录中的CPP文件到VC工程中 关于pos系统数据同步传输,欢迎大家进入讨论! 怎么得到本机的ip地址? 关于package 的问题 关于打开网页的问题 怎么在文本文件中的两行中添加一行?怎么删除一行? “split”分割问题 请教:怎么配置Tomcat可以禁止访问目录 ,比如访问 http://127.0.0.1/test 不会出现文件列表? 请问怎样在对话框窗口中的Edit控件里按下Enter键后不要退出 有关dremveaver ultradev 的动态网页制作问题, 请教高手。。 在delphi中如何实现全屏?? 100分。请大虾帮忙搞定 检查书开头怎么写 帝王的老婆叫什么? 世界爱眼日和世界爱牙日是几月几日? 我们老师要我们写一个关于班级管理的建议 以及对老师的建议,有木有人会写啊?因为班级博客被采纳了,上级的学校领导要把我们的班级博客展现给其他学校的同学们看,明天要进行一个VCR采 500字作文,关于阅兵的,题目是祖国在我心中作文,关于阅兵的,题目是祖国在我心中今年的阅兵, 两小儿辩日反映了中国古代人的什么精神 给我一片700字的《祖国,我终于回来了》读后感 求十一阅兵500字观后感要2009年的 中国古代降妖除魔的人叫啥?类似日本的阴阳师. 请问 怎样记英语课文快 康熙皇帝真是被雍正害死的吗有没有什么历史证据? 初中班级管理中存在哪些问题 我对记忆英语课文有问题 总是记不住一般时候记忆英语课文 有很大困难 记忆一篇文章需要很长时间 而且几天后就忘得干干净净了 谁知道描写古代男子服饰的段落?随便,只要是古代的就好 如何把初中的班级管理好 老是记不住英语课文!1 描写男生笑的段落 “诺你喜欢怪人其实我很美”什么意思? 鲁迅《故乡》的读后感 圆O中,弦AB=24,CD=10,AB的弦心距是5,求CD的弦心距. 初中班级管理计划我班纪律差 怎样记英语课文?最近老记不住 水粉画中 晨曦和傍晚天空的色彩偏向在没有朝霞晚霞的情况下. 若你喜欢怪人 其实我很美 的繁体子怎么写 皇上的妃子喜欢了王爷,怎么办或者你是洛家庶女洛倾城,你与夜丞相家的嫡子,夜城诺两情相悦,但是身份有别,你该怎么办?200字左右 水粉画-天空和水在一张画上,怎么区分画出来.颜色该怎么用呢天空和水在一张画上,怎么区分画出来.颜色该怎么用呢 初中班级管理计划怎么写 康熙是否是自愿传位雍正的?很想知道是逼宫还是因为康熙喜欢乾隆之故或是诏书传位? 初中记叙文 关于友情急求一篇关于友情的记叙文,500字以上,800字以下 以知圆O的半径为5cm,点O到弦AB的距离为3cm,则弦AB的长为_______cm 我与书的故事作文咋写啊 怎么背英语课文 记得牢怎么背英语课文 、记得牢呢 、 火车4小时行驶了600千米;速度和时间的最简整数比是(),比值是()火车4小时行驶了600千米;路程和时间的最简整数比是(150:1),比值是(150),速度和时间的最简整数比是(),比值是() 批评他人一定要谨慎.英语翻译 _________others. 怎样背英语课文又快又牢? 英语翻译只有喜欢没有爱 不是么 英文翻译 康熙、雍正和乾坤是什么关系? 求着一片梁衡的文章:跨越百年的美丽是写居里夫人的 已知圆O的直径为10CM,弦AB=6CM,求圆O到弦的AB的距离初中的题 写下步骤 谁能给个 “没有钱也有幸福”的事例啊,写作文用 《跨越百年的美丽》(梁衡)读后感最好是现写的,不要太长,太深奥,1000字左右 皇上的弟弟,王爷,被皇上发现和宫女私通,会怎么样 写作文时找不到具体的事例,怎么办? 描写老人衣着寒酸的段落快啊,急 皇上的弟弟和宫女私通,被发现会怎么样 写作文时可以不用具体事例吗? 太空育种出现性状变化实质上什么发生改变,这是由于太空的什么特殊条件下改变的 皇上的弟弟和宫女私通,被皇后发现了,会怎么处理? 世界爱牙日是几月几号 太空育种是利用宇宙飞船等把种子带到太空,利用太空的特殊环境诱发种子发生变异,再返回地面选育新品种的过程.太空育种( ) A.能诱发生物产生可遗传的变异 B.产生的变异都是 皇上很宠他,但是有一天发现了这个弟弟和宫女私通,弟弟会不会被处死 请问世界爱牙日是哪一天?我想知道确切的爱牙日是哪天,有急事! 请问,送去太空育种的蔬菜,现在蔬菜个体变的很巨大,这样的变异算不算转基因?这类蔬菜算不算转基因蔬菜 看什么书对写作文有帮助? (1)磁悬浮列车以430千米一小时的速度行驶了100千米,行驶的路程与速度的比是( ) (2)买45本故事书,共需要207元.书的总价与本书的比是( )(3)7分之3=( )÷( )=( ):( )( )÷ 世界爱牙日是哪一天? 写作文介绍什么书最好 1、磁悬浮列车以430千米每小时的速度行驶了100千米,行驶的路程与速度的比是( ).2、买45本故事书,共需207元.书的总价与本数的比是( ).3、7分之3=( )÷( )=( ):( ),( )÷( )=a 几时是世界爱牙日?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘