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

VB取得临时文件名

HTML文档下载 WORD文档下载 PDF文档下载
VB取得临时文件名
声明:
Public Const MAX_PATH = 260

Public Declare Function GetTempFileName Lib "kernel32" Alias "GetTempFileNameA" (ByVal lpszPath As String, ByVal lpPrefixString As String, ByVal wUnique As Long, ByVal lpTempFileName As String) As Long
Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

代码:
Public Function GetTempFile() As String
Dim lngRet As Long
Dim strBuffer As String, strTempPath As String

'初始化 buffer
strBuffer = String$(MAX_PATH, 0)

'取得临时路径
lngRet = GetTempPath(Len(strBuffer), strBuffer)

'0 错误
If lngRet = 0 Then Exit Function

'去掉尾中的 null
strTempPath = Left$(strBuffer, lngRet)

'初始化 buffer
strBuffer = String$(MAX_PATH, 0)

'取得临时文件名
lngRet = GetTempFileName(strTempPath, "tmp", 0&, strBuffer)

If lngRet = 0 Then Exit Function

lngRet = InStr(1, strBuffer, Chr(0))
If lngRet > 0 Then
GetTempFile = Left$(strBuffer, lngRet - 1)
Else
GetTempFile = strBuffer
End If
End Function

云适配陈本峰:平台型企业级浏览器是未来办公移动化的核心 警报:XcodeGhost已扩散至第三方框架 我们眼中的应用另一端是什么? 【SDCC讲师专访】百度马如悦:不写代码的架构师不是好架构师 企业级应用避免臃肿混乱的6大黄金法则 SDCC 2015讲师专访精彩集锦:程序员界“香饽饽”、大神级人物都在! 从技术经理的角度算一算,如何可以多快好省的做个App(一) 【SDCC讲师专访】Java泛型作者Gilad Bracha:优秀的程序员应该未雨绸缪 【CTO讲堂】微服务架构在云端的应用 SDCC 2015创业项目路演火爆征集:寻找中国好项目 被遗忘的设计模式——详解Swift语言中的Null Object Pattern Synaptics发布全新触控及生物识别方案,正式进军车联网 无人机、机器人,英特尔RealSense已扩展至新领域 SDCC 2015中国软件开发者大会盛大开幕 《近匠》逸创云客服创始人叶翔:做好客服产品静待SaaS大爆发时代的到来 【SDCC2015现场】数据库实战论坛:分布式数据库的实践与挑战 SDCC 2015 中国软件开发者大会亮点回顾 《近匠》扬智科技GoWarrior:软硬件全面开源的计算平台 【CTO讲堂】独家直播双十一全网动态?前黑客“劳改”带你玩转大数据 《近匠》好雨云刘凡:提供全方位支持的一站式开发服务云平台 体验过HTC Vive,才知道何谓沉浸感 BDTC 2015:大数据技术精英云集 初版日程公布(表) 深度剖析C++对象池自动回收技术实现 React Native与ExMobi技术路线探索 SDCC 2015前端专场札记:Facebook、百度、腾讯、美团、饿了么等互联网公司的前端实战 芯片巨头为何痴恋开源软件?英特尔Imad Sousou来解密 3D Touch:岂止于Multi-Touch Atlassian亚太区业务经理Paul Conroy:敏捷是开发者的痛点 基于DuiEngine的开源DirectUI图形界面库SOUI 【CTO讲堂】工具类、新闻类、视频类等不同类型App的积分体系该如何搭建? 浏览器的改进应来自用户诉求而非商业诉求 為何不能顯示部件﹖ ?????????有点难度??????????如何得到窗口菜单栏右边的区域大小RECT 取时间中的时,分,秒 为何3dmax5的界面英文显示不全? 如何把中文字符串转成utf8? 想到上海找工作,谁愿意给落个脚啊! jb8连接interbase的问题,有谁知道啊 如何分页显示数据库里的图片 怎样判断一个控件是否处在最上层,马上给分? 关于md5编译出错 急需高手解决 哭,IIS下ASP无法调试,极不稳定。求大侠进来帮忙。 请问谁有或者谁知道NASM语法或教程,最好是中文的!谢谢了! 高人!帮忙呀!!!谢谢!! 急啊~关于ADO的和SQL的问题~达人快来帮忙啊 datagrid动态改变一行的背景色this.DataGrid1.Items[oldselectindex].backcolor=System.Drawing.Color.Red;为什么不工作啊? 第一次用ORACLE,在哪里批量执行SQL脚本啊 为什么我的网页不能引用*.js了???在ie/visual studio能设置吗?怎么设置?? 关于日期类型,在线等,马上给分 sql*plus登陆不进去了!! 请问怎么调试DLL中的代码啊??? dddw的数据取值问题,百思不得其解。 再问一个简单问题,为啥函数总是执行两次? 100分求助使用axis开发web services的问题 求一个字符串简单加密算法源码,300分决不食言!!!!! 如何使得下载的excel文件在新页面中打开? datalist问题 帮帮这个菜鸟!!! 新手求助?谁有较好的打印控件,或较好的解次方案? 如何在程序部署时授予某文件夹对文件的写访问权? 不能重定向是什么原因? 想用Mediaplaer控件播放某个声音文件若干次,怎么控制? 如何通过窗口句柄来获得窗口所在进程的ID 怎么找到DataGrid中的Table呢? 请问用VB怎么才能把1个数据库里的表全部读入LISTBOX里? JmaiL 发邮件的问题?? 备份还原问题 如何用钩子得到中文啊? interbase的存储过程中如果想返回多条结果应该怎么办? 请问!谁能提供算命、测字等原代码和后台库!!500分相送!!!! 我的用客户端连上ORACLE,怎么我的SQLPULS打开中文全是乱码,执行语句后看不到结果是什么 方案讨论:如何自定义并实现错误与例外Exception处理对象,并建立里统一的ErrorMsg 读数据库错误??急急急,在线等(马上给分) 缓存 到的 是什么定义啊 (斑竹来 告诉我吧) 系统分析师、系统设计师有什么区别? DB2技术讨论(1)如何简单理解表空间的定义 vc的ado数据库连接问题 请问linux的个人版和服务器版到底有什么区别?? DB2技术讨论(2)如何简单理解表模式的定义 int& operator[] (unsigned i); 存储过程问题 DB2技术讨论(3)如何处理索引 He is () than her sister.A,four year older B,four years older 哲学与成功学!说下你的成功学心得!在下感激不尽!如果是高手的话!可留下电话!在下当面道谢! 成功学是心理战术,还是一门哲学我看那很多成功的书,我发现我不仅是一个心理学家,还是一个哲学家,无师自通 一个三角角度计算的问题三边分别为10厘米12厘米16厘米知道10厘米和12厘米边的夹角是90度请问分别2个角的角度是多少度16厘米的正确长度是15.5厘米我已经忘了COSA sinA那个公式怎么用了,所以, 三角型知道三边算角度我有一个等腰三角型,三边长度分别是50,50,72,那72正对的角度值是多少?怎么计算? 你认为未来的气候将会怎么样?____ do you think the climate ___ ___ ___ in the future 15.()do you think the world()in the futureA what;are B what; will be C how;will behow和what 用法 知道直三角其中两边怎样算角度数知道直角三角中的两条边、怎样算里面的度数!其公式是怎样的啊? 一件写自己犹豫不决的(细节描写 How do you think TVs in the future ,will be?什么句型 意思 pma在压力方面是什么意思?比如1.6pma, 原税务总局官员:向电商征税是趋势 时《新神雕》爆新剧照 小龙女陈妍希越来NBA总决赛将更改赛制 最后一场前增上海台湾联手破获跨境电信诈骗案 69阿兰·阿库瓦拉:中国经济特区的经验值巴西国企独揽石油招标引抗议 政府进退美国十岁男孩弑父案即将宣判 孩子去处俄外交部称叙利亚境内武装冲突局势加剧小崔赴美调查转基因 沃尔玛员工不知何崔永元:美国人\"放心吃了十几年转基法国德国抗议美国监听 敦促美国建立合新政未实施,市民就争搭“末班车” 公星爷老妈坐公交买丝袜35位小作者获奖绿色厨房、人性化设计 4S服务引领行改善生活质量的家居“神器”(1)放眼2020年 郎平愿当栽树人万科天逸:小众更出众成龙 将与沙溢贾玲“即兴搞笑”瑞典木业举办家具设计讨论会划片 就近 免试下午茶time:英伦经典与四川风情恐怖袭来十二次冲击神说世界尽折腰倾城恋曲虎狼传说末日战斗重生之修仙系统唐朝好和尚卸了妆的人生2弃妇的美好时代玉皇庙旅游沙伊东香梨园旅游塔里木沙漠公路旅游库车王府旅游库车大巴扎旅游天山神秘大峡谷旅游果子沟旅游库木塔格旅游鄯善旅游二道桥清真寺旅游孔雀河旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘