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

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资料 全部窗体可使用鼠标点中移动-Delphi资料 让图像旋转-Delphi资料 热启动控制-Delphi资料 如果隐藏和显示Windows的任务条-Delphi资料 如何把文件删除到回收站中-Delphi资料 如何从任务栏上隐藏应用程序的按纽?-Delphi资料 如何得到Windows 的temp路径-Delphi资料 如何得到WINDOWS的SYSTEM路径-Delphi资料 如何得到上一个激活的组件-Delphi资料 如何得到系统目录-Delphi资料 如何得到执行程序的当前路径-Delphi资料 如何访问一个进程的内存空间-Delphi资料 如何关CD机的门?-Delphi资料 如何关闭外部开启的应用程序-Delphi资料 如何获得系统内存的有关信息?-Delphi资料 如何获取硬盘的ID-Delphi资料 如何检查软驱中的软盘和光驱的光盘是否发生变化。-Delphi资料 如何检查一个驱动器是否就绪?并且不出现错误信息-Delphi资料 如何将Wav文件做到EXE文件里-Delphi资料 如何将你的程序放在Windows启动中-Delphi资料 如何控制Ctrl+Alt+Del键-Delphi资料 如何控制壁纸-Delphi资料 如何控制关闭Windows-Delphi资料 如何屏蔽系统功能键-Delphi资料 如何取得Windows的临时文件目录?-Delphi资料 如何确保你的.exe文件仅运行一次!-Delphi资料 如何让 Windows 模拟按键-Delphi资料 如何让程式只执行一份?-Delphi资料 如何让程序只执行一次?-Delphi资料 请问,下面的警告提示什么意思(关于sybase) 那位可以给我描述一下“代表”? 请问有WINsock编程高手么,帮我看一下下面的程序 紧急招聘PB程序员(成都) 关于产品序列号的问题……想了很久了。 这里有几个问题,能者请进! 请教VC项目开发经验 如何让下载的程序变成免费的? 请问有Pdf到Text的转化的源代码么? 能否让下载的程序变成免费的? 请问怎样才能自动复制文本框中的文本到剪贴板? 是否可用简体中文的VB开发翻体中文的应用程序? 使用JavaMail转发邮件 在servlet中是不是不可以引用其它的类中的函数.(这个类不是派生于HttpServlet) 为什么买书配送的光盘文件在BCB工程中打开后不让修改(打开前已转换为存档文件了)? 请教使用OPEN CLIENT 的一个小问题 索求算法 请问能否将下载的程序变成免费的? 现在学习C#不晚吧,:P 关于VB中控制运行实例的问题 请教关于DBGRid的问题。 请问在Java下如何实现文件压缩?有没有现成的接口或者压缩算法代码?多谢 这里下载C#电子书《C#教程》(中文 希望出版社) 我如何才能删除ORACLE中建立的用户??总是提示用户不存在或SQL第归错误等等!! CSDN灌水乐园的惊世大骗局!!CSDN灌水乐园的惊世大骗局!!CSDN灌水乐园的惊世大骗局!! 如何用简体中文VB开发翻体中文软件? 高分请教!!!! 一定加分!!!1111111 在打印或打印预览前如何获取报表页数 求助.希望有人帮忙!! 我用ACTIVE REPORT出了问题....相教 请问如何获得硬盘的序列号? 请问各位,有什么好的方法来为用户分配权限,要多少分就给多少? 我有一个www.cnjava.com,有没有人愿意要这个域名? 请问Delphi中关于fropro数据库的软删除问题!急用!谢谢! 当两个表用主键关联时,删除主表的一条记录,关联表对应的记录能不能自动删除(不用代码)? 大家来谈谈各自在制作网页时的css于inc的运用吧 小弟对Java及C#的一点看法-请大家指正! 高手请进,帮我看看这是什么意思?感谢非常 基于组件的三层应用程序怎么打包?200分相赠!!! 如何执行带OUT参数的ORACLE的存储过程 有谁做过矩阵奇异值分解的程序? 讨论:爱需要表白吗? 请教各位大侠:我用TNMStrm控件发送数据时,怎样实现定时连续发送?我现在发送一次成功,紧接着第二次发送就不行了,出现蓝屏. slide中的滚动条,有NM_RELEASEDCAPTURE事件,是响应mouseup,有没有什么事件响应mousedown的? 再送50分,求大家来讨论用存储过程建datawindow时应注意的事情。 我想做一个网页,实现文本分割,发送短消息! 那为老兄知道SCO OPENSERVER下面PHP的安装方法! 在asp中可不可以不用recordset来开发? 是否有好的ASP书籍 哪里有已经破解了的BAS4.5下载? 调用::GetCurrsorPos()和窗体成员函数GetCurrsorPos()得到的位置都不对???? 工程队修建一条水渠,第一天修了180米.第二天修了全长的4分之1,第三天修的水渠的长度为前两.工程队修建一条水渠,第一天修了180米.第二天修了全长的4分之1,第三天修的水渠的长度为前两天 数学应用题:某一工程修一条路,第一天修了全长的二十七分之五,补充上面的:第二天修了余下的十一分之三,第三天修了第二天余下的六分之五,第四天修8千米,正好修完.求这条路的总长度 某工程队修一条路,第一天修了20%,第二天修了150米,两天一共修了全长的二分之一,这条路全长多少米? 一支工程队要修一条水渠,第一天修了全长的5分之1,第二天修了全长的4分之1,第二天比第一天多修了25千米,这条水渠全长多少米?(注意单位) 工程队修一条路,3天修了全长的9分之2,多少天可以修完? 修一条公路,第一天修了全长的三分之一,第二天修了全长的二分之一,两天共修了全长的几分之几? 修一条路 第一天修了全长的2分之1 第二天修了余下的2分之1,这条路还剩几分之几没有修? 工程队修一条公路,第一天铺了全长的五分之二第二天比第一天少铺三分之一,还剩210米没铺.这条路有多长? 有一条长24千米的公路,第一天修了它的八分之一,第二天修了五分之二千米,两天共修多少千米? 一条路100米,第一天修了这条路的2分之1,第2天修的是第一天的3分之1,还剩这条路的几分之几没有修 某工程队修筑一条马路,第一天修了全长的十分之三,第二天修了全长的五分之二,还剩630米没有修,这条马路全长多少米? 修一段路,第一天修了全长的五分之二,第二天修了全长的四分之一,两天共修了260米,这段路长多少米? 一条路100米,第一天修了全长的二分之一,第二天修了全长的三分之一,还剩这条路的几分之几没修? 市工程队修一条路第一天修了全长的五分之二第二天修了全长的百分之二十五还剩154米没修这条路全长多少米 加工一批零件,王师傅加工26个,占总数的5分之1,剩下零件按7:6分给张、李两位师傅.两位师傅各加工多少(方程和假设) 一段路第一天修了二分之一,第二天修了剩下的二分之一,还剩几分之几没修? 市工程队俢一条路,第一天修了全长的五分之二,第二天修了全长的百分之二十五,还剩154m没修,这条路全长多少m 李师傅加工一批零件,已加工的与未加工的个数比是1:3,再加工400个后,已加工的占总数的2分之1.这批加工的零件有多少个? 一条路一百米,第一天修了二分之一,第二天修了余下的三分之一,还剩这条路的几分之几?只要算式! 工程队修一条路.第一天修了全长的百分之二十五,第二天与第一天所修的比是4:3,还剩500米没有修.这条路 加工一批零件,王师傅加工26个,占总数的五分之一,剩下的零件按7:6分给张,李两位师傅,两位师傅各加工多少个 一段路,第一天修了二分之一,第二天修了二分之一,还剩全长的几分之几 修路队修一条公路,第一天修了全长的四分之一还多1.2千米,第二天修了全长的五分之二少0.8千米,这时还剩6.6千米没修,这条公路全长是多少千米? 李师傅要做350个零件,前三个小时完成了总数的七分之三.照这样的速度,他完成全他完成全部零件需要多少小时? 修一条水渠,第一天修了全长的十五分之二,第二天比第一天多修了全长的20分之3,还剩几分之几没有修? 某工程队,第一天修了600米,第二天修了全长的20%,两天共修了全长的1/2.这条公路全长多少米? 李师傅4分之3小时做6个零件,照这样的速度,他工作2分之5小时,一共可以做多少个 修一条长五分之四米长的水渠,第一天修了全长的三分之一,第二天修了全长的五分之二,还剩几分之几没有修把全长看做单位一来减,还是用五分之四减 某工程队修路,第一天修了三分之一,第二天修了50米,两天共修了全长的百分之50,这条路有多长? 两位师傅共同加工一批零件,张师傅4小时加工了全部的5分之2,李师傅4小时加工了280个.这时剩下未加工一批零件个数与这批零件总数的比是1:4,这批零件共有多少个?注:算式. 修一条水渠,第一天修了全长的十五分之二,第二天修了全长的十分之一,还剩几分之几没有修? 某工程队修路,第一天修全长的百分之25,第二天修一百五十米,两天共修了全长的十分之三,这段公路长多少米求列算式详细回答,有讲解 李师傅要生产一批零件,6天生产了这批零件的十分之三,照这样的速度计算,还要多少天才能完成任务?用比例知识解体 修一条长5分之4米长的水渠,第一天修了全长的3分之1,第2天修了 全长的5分之2还剩几分之几没有修 工程队修路,第一天修了600米,第二天修了全长的20%,两天共修了全长的1/2.公路全长? 李师傅加工一批零件,如果每天做50个,要比计划晚8天完成;如果每天做60个,可早5天完成.这批零件共有多少个? 工程队修一条路第一天修的比全长的三分之一少100米第二天修了300米两天共修了全长的40%这条路全长多少米 一条路100米,第一天修了这条路的12%,第二天修了余下的13%,还剩这条路的几分之几没修? 某工程队修路,第一天修了600米,第二天修了全长的20%,两天一共修了全长的二分之一.这条公路全长多少米? 工程队3天修一条水渠第一天修全长的25%第二天与第三天修的比是7:8第一天比第二天少21米这水渠全长多少 一条路长100米,第1天修了1/2,第2天修了1/3,还剩这条路的几分之几没修? 一个工程队修一条公路,第一个月修了全长的四分之一,第二个月修了全长的五分之二,第二个月比第一个月多修了12千米,这条公路全长多少千米? 工程队修一条水渠,第一天修了全长了四分之一,第二天修了全长的百分之三十,还剩下900米没修.这水渠全长 工程队修一段160米长的公路,第一天修了全长的1/5第二天修了全长的3/8,还剩全长的几分之几没有修? 一个工程队修一条公路,第一个月修了全长四分之一,第二个月修了全长的五分之二,还剩14千米这条公路全长多少千米? 工程队修一条水渠,第一天修了全长了四分之一,第二天修了全长的百分之三十,还剩下900米没修水蕖全长不要方程 工程队修一条长3/4千米的道路,第一天修全长的1/4,第二天修全长的1/3,还剩全长的几分之几没有修完 1.一个工程队修一条公路,第一个月修了全长的四分之一,第二个月修了全长的五分之二,第二个月比第一个月多修十二千米.这条公路长多少千米?2.仓库里有一批货物,运出五分之三后,又运进二 工程队修一条水渠,第一天修了全长了1/4,第二天修了全长的30%,还剩下900米没修.这条水渠全场多少米? 工程队修一条公路,第一天修了全长的3分之1,第二天修了80米,还剩86米没有修,这条公路长多少米? 某工程队三个月内修一条全长为12千米的公路,第一个月修了五又三分之一,第二个月修了剩下的五分之二,第三个月修了多少米速度速度 啊 工程队修一条水渠,第一天修了全长的25%,第二天修了全长的30%,还剩下900米没修,这条渠全长多少米?今天就要 工程队要修一条长200米得路,修了一段后还剩63米没修.已知的米数占 条路的几分之几 修一条路,第一天修了300米,第二天修了全长的四分之一,两天共修了全长的十八分之五,这条路长多少米? 工程队修一条水渠,第一天修了全长的15%,第二天修了全长的40%,还剩下900米没修,这道水渠全长多少米 工程队修一条路已经修了5分之4千米,剩下的是已修的8分之7,这条路长多少千米? 工程队修一条路,第一天修了全长的30%,第二天修了30米,两天共修了全长的50%,这条路全长多少米? 某工程队挖一条水渠.第一天挖了全长的5分之1,第二天又挖了全长的5分之1,第三天挖了全长的6分之1.这条水渠(要算式) 应用题:工程队修一条路,已修了800米,正好占全长的9分之4.这条路全长多 工程队修一条路,第一天修的比全长的1/3少100m,第二天修了300m,两天共修了全长的40%,这条路长多少米?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn