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

VB取得长文件名

HTML文档下载 WORD文档下载 PDF文档下载
VB取得长文件名
Public Function GetLongFilename (ByVal sShortName As String) As String

Dim sLongName As String
Dim sTemp As String
Dim iSlashPos As Integer

'Add \ to short name to prevent Instr from failing
sShortName = sShortName & "\"

'Start from 4 to ignore the "[Drive Letter]:\" characters
iSlashPos = InStr(4, sShortName, "\")

'Pull out each string between \ character for conversion
While iSlashPos
sTemp = Dir(Left$(sShortName, iSlashPos - 1), _
vbNormal + vbHidden + vbSystem + vbDirectory)
If sTemp = "" Then
'Error 52 - Bad File Name or Number
GetLongFilename = ""
Exit Function
End If
sLongName = sLongName & "\" & sTemp
iSlashPos = InStr(iSlashPos + 1, sShortName, "\")
Wend

'Prefix with the drive letter
GetLongFilename = Left$(sShortName, 2) & sLongName

End Function

一键分享:iOS版Google+发布SDK InMobi杨娟:中国移动游戏如何挑战全球? Adobe再遭APT攻击:数十G源代码及290万用户信息失窃 程序员,如何在工作中崭露头角? 国内外三个不同领域巨头分享的Redis实战经验及使用场景 这是一场潜在的战争:谷歌与Facebook、苹果在搜索上的博弈 设计新闻类网站需要注意的关键点:移动友好、宽带…… 直接开始用:5个免费的在线思维组织工具 招聘开发者常见的九大误区 开源影响销售,维护赞助商? 盘点黑客攻击途径:最常用的7个策略及简单的防护方法 专访AngularJS框架创始人Misko Hevery:让Web开发更便捷 果粉的又一个节日:新iPad或于10月22日发布 新车间李大维:到集装箱里来看创客嘉年华 亚马逊推“登录与支付”功能 直接冲击PayPal Google编程之夏新里程碑:5000万行源代码 8500名学生开发者 非常实用的15款开源PHP类库 Runnable:一站式代码片段服务平台,打造编程界的YouTube 谷歌向所有开发者开放Google App Engine PHP Runtime “沟通”电子表格和矢量图形的“桥梁”:在线可视化工具Raw Facebook北极圈数据中心,Open Compute Project的力作! 最后三天!4折抢购2013移动开发者大会门票 电子书追踪统计,App Annie for eBooks上线 先驱还是模仿者?细数海外移动应用推广平台 IDC:PC出货量下滑终于放缓 联想销量再次第一 为什么说,用一块屏幕玩游戏是远远不够的? 编写代码?先熟悉一下编程语言界限吧! Spanner vs. F1:谷歌两大数据管理利器的整体对比及关联 移动设计需摒弃的几大PC应用设计方法 响应式导航设计案例解析(多图) 所见即所得:七大无需编程的DIY开发工具 请问一个关于document.write()方法的问题。急啊! 初学者,欢迎灌水。 Delphi6的Bug?不兼容? 为什么我用GetProfileString()却总是得不到结果 sos 请教各位大侠一个问题 delphi6中的installShield 请介绍接收端CRC校验传输内容是否正确的方法,资料或代码。谢谢! 各位大侠请问Jeffrey Richter的windows核心程序设计是不是就是andvanced windows程序设计的第四版? 谁会做软件狗?有钱赚了!!! 为什么我用QuickRep作的报表只能显示一条记录,而且columnHeaderBand上内容也显示不出来 请问在税务局开发数据库的同行么?? 大家好各位大侠请问Jeffrey Richter的windows核心程序设计是不是就是andvanced windows程序设计的第四版? 谁做过软件狗,马上来拿钱!!! 江苏省的成绩什么时候可以出来啊,我是徐州的 shockwaveflash没有hwnd,怎么办? chechy(chechy) 你在吗? 一个关于用excel做的日报的问题 谁会做软件狗,马上来拿钱!!! 给你下跪了,给你磕头了,给你鞠躬了。很简单的问题。谢谢 那位大哥能告诉我在VC中我要创建类的话应该做哪些工作步骤(要详细的,呵呵) 紧急求救,asp连接mysql问题 在使用twebbrowser的时候,怎样制止网页的自动刷新和跳转? vc编译器错了怎么办???突然死机,然后就不好好干了!!谢谢 ?如何将二进制的 值写如注册表? Delphi紧急求助! 我想问的是,返回的 ResultSet 中的某个字段(int 型),如何放到一个 int[]数组里去。因为 ResultSet 不知道怎样取 size,我又不想用 vector, ResultSet的getArray()方法也是莫名其妙。 c盘格式化后,怎样找到linux系统? 有意思 过来研究一下!!!!insert 的!!!!难道 25 不是 long integer 吗 我的程序debug版,一直调试好好的,我rebuid all 一下就出错了,错误如下:怎么回事? 位图问题? 怎样使用自定义的光标??? 我想找Hopen SDK的开发包。 为什么我的iis总是报500内部服务器错误。我先装的framework,后来升级了ie5.5,最后在w2kprofessional上装了iis,手动添加了aspx解析:指向aspnet_isapi.dll,为什么还报错? 那里有关于用组件上传图片并且显示上传图片的介绍 NT 上已安装好mysql服务器,WIN98 client连接不上,求救 程序员梦难圆,请大家给我这个非计算机专业的兄弟出出主意。 小弟是delphi初学者,师兄师姐们给我介绍一下object pascal自带的函数好么? 你知道如何禁止后退按钮吗? 请各位高高手!解决启动时ctrl+alt+del可结束任务的问题。 哪位大侠指点一下ActiveSkin怎么用的? 引用ado后,打包程序为什么如此之大 为什么我的iis总是报500内部服务器错误。我先装的framework,后来升级了ie5.5,最后在w2kprofessional上装了iis,手动添加了aspx解析:指向aspnet_isapi.dll,为什么还报错?? 散源代码(1)- 货郎担问题(TSP)分枝限界算法 (急)哪位大侠有关于power designer的书,中文的,谢谢 ■■在线等待,找到立刻送分,决不失言。CSDN兄弟在帮忙,PB7安装盘不能安装POWERJ,是吗?在那里可以找到POWERJ安装盘?■■ 哪个虚拟光驱的软件在XP下可以用,虚拟光驱和光驱魔术师都不行呀 有谁知道那里有可以放ASP代码网页的免费空间 请问在VC中如何使静态框中的字体变色? 若想在BDE-Administrator中使用*.mdb,必须将*.mdb注册到文件DSN或者系统DSN中吗? 请教,如何在其他的应用程序的title上(最小化按钮旁边)添加按钮? 为什么我的iis在运行.aspx(asp.net)文件总是报500内部服务器错误。我先装的framework,后来升级了ie5.5,最后在w2kprofessional上装了iis,手动添加了aspx解析:指向aspnet_isapi.dll 5亿美元是什么概念? 描写四季的词语有哪些? 哪位朋友能给我麻辣小食品的配方呢?.. 古代人利用什么工具来测量和观察天气变化? 描写四季的诗句 用压面机压切面的配方是什么?我新买的压面机,想压切面,可是不知道面粉里应该添加什么, 7000亿美元是个什么概念?把7000亿美元兑换成人民币,应该是4790100000000元,如果是100元一张的百元钞票,这7000亿美元能 叠放多高? 描写四季的成词语 什么金属导电后易发热 古代用什么工具测量天气预报八卦能测量天气预报吗? 有关描写四季的诗句 焊缝化学成分分析结果和母材相近还是和焊材相近? 测量气温时应该选择什么地点 FG碳纤维发热板正常工作时的表面温度?是否会产生可见光? 42CrMo材料的焊接性能怎么样,用什么焊材呀? 怎样测气温?测时要注意什么? 从八品什么意思 焊接Cr25Ni20(两种相同材料焊接)用什么焊材?怎么焊接? 古代的几更天与现在的时间具体是怎样相对应的? 泊来品什么意思 4个描写描写四季的词语 优美句子 除四季以外的. 配送品什么意思 焊接材料是影响焊缝和焊接热影响区性能的因素之一是对吗 四季的农村风光的图片,关于四季农村的优美句子 挤单品是甚么意思 谁有描写四季的诗句快 宫保鸡丁的主料、配料、调味品和特色各是什么!急i急! 品足是什么意思? 描写四季的诗要整首古诗 食品物性学中食品材料的特征是什么? 求教:角焊中,习惯上焊缝高度指的什么?和国家标准一致么?我一直认为角焊中,焊缝高度就是指焊脚尺寸,前几天,有人告诉我不对,说焊缝高度指的是喉厚, 打品是什么意思 爸爸的花儿落了,从记叙的顺序上看,本文在材料安排上有什么特点?这样安排有什么好处? 为什么要规定角焊缝的最小、最大焊角尺寸 犬的“品相”是什么意思 压力容器为什么这么多规定啊 如何计算角焊缝焊脚高度?具体依据的是什么标准. 品武是什么意思 ? 压力容器标准?压力容器现状?压力容器标准含义?谁能给详细解答一下? 有哪些描写秋天的优美的句子,40字~50字左右. 化工品的几类危品是什么意思 压力容器的标准是多少? 描写环境的优美句子200字 吉他里的品数是什么意思 压力容器还有怎样的操作规则? 古时候的人是用什么方法测量物体的长度 光焊丝进行焊时,对焊缝质量会有什么影响 古时候人们是怎样测量长度的 古代没有尺子的时候,怎么测量长度﹖ 由不锈钢焊条和结构钢焊条组合焊的焊缝结构特点 古时候是怎样测量长度的 内墙腻子粉配方是啥不掉粉 成本低 .以下自然现象中,包含两种或两种以上物理现象的是() A 弯折金属丝,金属丝发热 B 夏天午后,暴风骤雨伴1.以下自然现象中,包含两种或两种以上物理现象的是()A 弯折金属丝,金属丝发热 B 古时候人们是怎样测量物体长度的 食品配料表中VC是不是D-异抗坏血酸钠 电经过金属丝发热电经过金属丝会使金属丝发热,地球上有人知道为什么吗? 古代测量长度和时间的方法300字左右 做豆腐的配方是什么? 一从中间弯曲成直角的金属丝一从中间弯曲成直角的金属丝,一端悬挂,总长为L.则金属丝静止时,一直角边和竖直方向夹角为多少?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn