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

开启文件属性窗口 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
开启文件属性窗口 -VB资料

声明:
Type SHELLEXECUTEINFO
cbSize As Long
fMask As Long
hwnd As Long
lpVerb As String
lpFile As String
lpParameters As String
lpDirectory As String
nShow As Long
hInstApp As Long
lpIDList As Long
lpClass As String
hkeyClass As Long
dwHotKey As Long
hIcon As Long
hProcess As Long
End Type

Public Const SEE_MASK_INVOKEIDLIST = &HC
Public Const SEE_MASK_NOCLOSEPROCESS = &H40
Public Const SEE_MASK_FLAG_NO_UI = &H400

Declare Function ShellExecuteEX Lib "shell32.dll" Alias _
"ShellExecuteEx" (SEI As SHELLEXECUTEINFO) As Long

代码:
' 使用: ShowProps("c:\command.com",Me.hWnd)
Public Sub ShowProps(FileName As String, OwnerhWnd As Long)
Dim SEI As SHELLEXECUTEINFO
Dim r As Long
With SEI
.cbSize = Len(SEI)
.fMask = SEE_MASK_NOCLOSEPROCESS Or _
SEE_MASK_INVOKEIDLIST Or SEE_MASK_FLAG_NO_UI
.hwnd = OwnerhWnd
.lpVerb = "properties"
.lpFile = FileName
.lpParameters = vbNullChar
.lpDirectory = vbNullChar
.nShow = 0
.hInstApp = 0
.lpIDList = 0
End With
r = ShellExecuteEX(SEI)
End Sub
如何转让控制权-Delphi资料 使用Delphi 4.0编写多线程 使用Delphi获取系列信息 使用DELPHI实现文本文件显示和声音同步播放 为系统菜单添加新菜单-Delphi资料 显示密码编辑框中的密码-Delphi资料 写小执行程序-Delphi资料 隐藏和显示Windows的任务条-Delphi资料 隐藏桌面上的图标-Delphi资料 用DELPHI编制Windows95下的钩子函数 用Delphi的THML控件实现触摸屏的使用 用Delphi实现禁止用户关闭Window9X 用Delphi制作能够干净地删除自己的程序 用DELPHI 做一个简单的屏幕保护程序 用Enter键代替Tab键-Delphi资料 用修改文件时间的方法来加密文件-Delphi资料 用最原始的方法编制程序-Delphi资料 运用Delphi编写Windows NT中服务程序 在DELPHI编程中确定系统运行模式 在Delphi程序中调用控制面板设置功能 在DELPHI下读取与设置系统时钟 在Delphi中避免2000年问题的捷径 在Delphi中调用API函数 在Delphi中获取和修改文件的时间 在Delphi中控制扫描仪 在Delphi中实现对WIN9X应用程序使用权限的设置 在Delphi中实现对目录拷贝、删除和搬移的操作 在Delphi中使用自定义光标 在Delphi中用拼音首字符序列来实现检索功能。 在DELPHI中用线程排序 在Delphi中制作背景音乐 怎样能编写用于用ie注册邮箱、论坛账号时自动填表的软件 资源文件的问题! 一个挑战斑竹的问题!!50分 如何把压缩文件(*.rar或则*.zip)和word文档存到Acess数据库啊??? 如何可以知道访问我的网站的用户来自哪里? 关于SQL的问题 这对话框我如何去掉 asp.net 能否运行在Solaris系统下,参与者有分 c#请求援助 int a 除以 int b 取他们的余数用C#该怎么写啊?谢谢 求救!显示后台数据,在线等待!等…… jsp中的数据库问题,求教!!急 刚学数据库,弱智问题,高分赠送! 这个查询怎么写? 关于表生成文本文件遇到的事情,急 InstallShield Professional Standard Edition 6.30 英文版的下载(高分:200) 寻一男友:发展方向——>老公 我用serv-u,客户端访问为什么没有用户登陆窗口啊? 脚本验证datetime要准确点的 请问,想做出象Protel(Tango)作图效果的程序,如何下手呢? win API函数的区别(win xp 和win 2000)高难度!! 那儿有winsock.pbl 进入系统的速度变慢????在线等待 当 AllowPaging 设置为真并且选定的数据源不实现 ICollection 时,AllowCustomPaging 必须为真,并且 ID 为 DataGrid1 的 Data 怎么提高搜索速度? 如何printScreen并获得这个图片? 如何用SQL格式化一个IP地址?我得到的IP地址是一串数字,想显示为255.255.255.255那样的样子。 为什么在客户端出现Interface not support的错误? help,关于文本显示! SOS 急急急 请教几个概念? 如何打开一个用winexec打不开的可执行文件。 进入系统的速度变慢????在线等待 请大家谈谈目前比较经典软件,共享的,免费的,大公司的,个人的,国内的,国外的,不分行业等等,只要是经典都可以,请大家畅谈! 欢迎踊跃讨论!如何使得delphi编的exe或dll最小! 基于对话框的打印,打印一块区域!! 一个简单的链问题是输入一个结点请高手在助我 急问!在access中什么字段类型能容纳很多文本?就类似sqlserver中的text!!! 最近有个工程需要用串口(用MSComm控件)来接收ASCII字符信息,怎么用啊!?谢谢! VC++6.0中如何通过Socket从Client端向Server端传送文件? WinCE.NET 系统上如何拷屏 请问如何选择录音的输入设备? 引用“&”和union有没有区别啊? 本版的“跳楼大放送,今年高程、系分模拟试题及备考指南、考前培训笔记、心得,保证通过率。 (romantic999 ) ”你们打的开吗?我打不开 哪里有 车辆管理系统 的资料 请教:(在程序中)如何判断我的系统是否安装SQL Server数据库。如果安装,如何获取SQL Server的版本信息?谢谢! 小问题 请教 将RS232输入的信息转成键盘输入??? 关于表生成文本文件遇到的事情,急 西北人在外(北京,上海,深圳,广州等)打工的兄弟们进来聊聊。 数组问题 确切地说,蟑螂是活化石吗?请从科学角度回答 某林场2004年种的香樟树比松树多2000棵,根据图的统计图,可知柑橘树种了 多少棵. 刷涂料用的滚筒刷子有哪几种类型? 蟑螂既然是“活化石”,为什么不保护呢?为什么呢? 一棵树各年的成长情况用什么统计图是什么统计图 刷涂料用的滚筒刷子有哪几种类型? 甲乙两名打字员合作打一份350页的书稿,14小时完成,甲打字员毎小时打12页,乙每小时 下面是林场育苗基地树苗情况统计图.⑴柳树有2500棵,这些树苗的总数是多少棵?杨树占33% 柳树占25% 松树占15% 柏树占10% 槐树占17%⑵松树和柏树分别有多少棵?⑶杨树比槐树多百分之几? 求作文:国庆见闻,不少于500字,求大家了啊啊啊啊啊啊啊啊啊啊,我现在初一,求大家了啊啊啊啊啊啊啊啊 发现的作文怎么写最好是去乡村的发现 求有关于《我的初一生活》的作文,最好是自己写的 初一五十词短文 谁有 急求 啊啊啊啊啊啊啊 打一份书稿,甲单独要12小时完工.乙单独要20小时完工.现在甲乙合作用了17小时,中途甲休息了2小时.乙休息了几小时? 一个80人的旅游团去保定白洋淀游玩,请你设计一个租船方案.租船标准:8人快艇 240元4人渔船 100元30人观赏船 450元 黑金鱼开过滤泵肚子上会有气泡 金鱼是新买的 水是没困过的自来水 怎么破? 手被水或高温的东西烫到怎么办?我好不小心~老是被水烫到!什么办法才能有效而快速退热呢? 甲乙两人同时从AB两地相向而行,在离A地300米处第一次相遇,相遇后,两人继续走,走到对方的出发点后立即返回,离B地500米处,两人再次相遇,问第三次相遇离A地多远?(上面写不下了,写在下面.) 过滤泵内置的还是外置的好?为什么? 宇宙飞船中如何加热水和食物请具体给出物理原理,这个问题好象跟对流有关的! 辩论赛四辩总结陈词,规划未来更重要. 一条红领巾的底长是100厘米,高是33厘米,做400条红领巾需要红布多少平方米? 今年7月我即将去某外企报到,但是六级成绩单找不到了,不知道这对我的入职报到有没有影响?若是去补办个成绩证明也要等到十月份以后才能拿到了. 沉默非金辩论赛的总结词怎么说啊?我是四辩,近期需要啊! 安全帽标R代表什么? 现有甲、乙两家瓷器店,茶杯每只价格5元现有甲、乙两家瓷器店,茶壶杯每只价格5元,茶壶每只价格20元,已知甲店制定的优惠方案是买一只茶壶送一只茶杯,乙店按总价的92%付款,校办公室需购茶 小学老师培养应侧重与全科化还是专业化 辩论赛 四辩小结 急求 明天就要比赛了啊T我们是正方,说的是专业化,急求高手指点一二啊.不知道该怎么写四辩的小结啊,还有,我们是正方 如果有很 求伴你成长六年级下第九课假如给我三天光明的全部答案,急!明天要交滴!速度啊大神们!求! 现有甲、乙两家商店出售茶瓶和茶杯,茶瓶每只价格为20元,茶杯每只5元,已知甲店制定的优惠方法是买一只茶瓶送一只茶杯,乙店按总价的92%付款,某单位办公室需购茶瓶4只,茶杯若干只(不少于 【我的初一生活】作文怎么写.买噶,我要自己写早就写完了,关键是不会写 爸爸的年龄是红红的4倍,红红比爸爸小27岁,爸爸和红红各多少岁?解方程题解方程 第十届新概念作文大赛 初赛入围名单 什么时候公布?怎么查询? 医生通过听听诊器了解病人心肺情况工作情况,这个例子说明声音具有_________的功能? 让什么让什么作对偶句 例如:让理想与风筝齐飞,让希望与春天同在! 现有甲、乙两家商店出售茶壶和茶杯,茶壶每只价格为20元,茶杯每只5元.已知甲店制定的优惠方法是买一只茶壶送一只茶杯;乙店按总价的92%付款.某单位办公室需购茶壶4只,茶杯x只(不少 医生通过听听诊器了解病人心肺情况工作情况,这个例子说明声音能医生通过听听诊器了解病人心肺情况工作情况,这个例子说明声音能_________? 如何放飞风筝 第十二届新概念作文大赛初赛入围名单怎么还不出来?今天都已经1月2号了而且萌芽的的官网,怎么成了萌芽读者圈,哪位亲能通知我在名单出来的时候. 人民公园100人以上的团体门票是按原价的五五折优惠的.五年级160人去公园游玩,买门票一共花去528元.每张门票多少元 最能体现出母爱的一件事今天11点前要答案!不需要给我作文 爸爸比我大28岁,四年后爸爸的年龄是我的3倍,今年我和爸爸分别是多少岁 人民公园的杜鹃花盆数是长春公园的4倍,如果从人民公园搬出188盆杜鹃花放入长春公园则人民公园的杜鹃花盆就比长春公园少25盆,两个公园原来各有杜鹃花多少盆. 位趁东风放纸鸢的上句 求一篇叙事性散文尽量多写一些民族风格.像八下语文第四单元课文那样, 强强8岁时他父亲32岁,当父亲的年龄是强强的2倍时,父亲多少岁?本人文科毕业,实在不知道怎样给出一个三年纪孩子能看懂的答案, proteus 原理图绘制问什么它自己会关掉 who is your mother _____over therea.talking tob.talkingc.talk tod.talk y=根号下sinx-cosx的值域 proteus中蓝色小三角形是什么,在哪找? 我要1篇《生活处处有语文》的600字以上的作文!还有初一上学期英语练习册【蓝色的那个,陕西人民教育出版的】4单元的答案!【17,18 页】 甲,乙两人分别从A,B两地同时出发相向而行,经过5小时相遇,相遇后两人都以原来的速度继续前进,又经过3小时到达B地,这时乙距离A地还有160千米,求A,B两地的距离.不允许用二元一次,要用一元一 盘点2009作文(班级)编一个故事(真实) 寻人写一篇情侣离别作文故意气气老师,让他嚣张! 500左右,多了不限! 强强两岁时,他父亲32岁.强强的年龄是父亲年龄的五分之三哪年去世,父亲活了多少年 盘点2009国家大事 这方面的高中作文要800字左右,围绕国家大事的 说明文的结构特点 有什么? “读者统计表”表示管理员的劳动强度,而“读书效果统计表”表示管理员的( 2009中国大事件盘点(可用于作文材料)答的好的后加分 蟑螂也是活化石? 跪求辩论赛 知识和经验哪个更重要? 我是4辩手 我们是反方 经验比知识重要,谢谢辩论高手了 过年想自己用滚筒把家里粉刷一下,用的油漆还是涂料,········希望可以详细一点,我一点也不懂. 台州50岁男子打开房间内煤气罐引爆将马戏团大哥违章被扣车 停在停车场货车货车司机开车睡着 货车冲到落差七八米嘉兴铁路刑警从围观人群中找到诈骗犯罪男子喝完喜酒顺手牵走了新娘的首饰情侣高速开车过程中吵架 女友气愤跳下解密以色列版007:最爱暗杀 钟爱炸朝鲜美林骑马俱乐部竣工 女兵骑马英姿多国抗议被美监听通讯 印度:总理无手美国情报机构或已监听默克尔电话长达十摩萨德特工的各种“不靠谱”杭州到长沙10月底到11月机票最低0浙大一院:人感染H7N9禽流感病毒疫李某某强奸案二审31日开庭 律师称未李某某案31日二审开庭 辩护律师身份违停超过65秒自动抓拍 萧山启用杭首奥巴马参观学校旁听课程 揶揄国会议员伊朗边境发生武装冲突 14名边防人员国防部:日方若击落中国无人机 中方将德国小伙:德国政府可没收空置7年房屋中国记协严厉谴责陈永洲涉嫌虚假报道等外交部副部长刘振民会见巴基斯坦外秘乔美媒:中国以“蛙跳战术”应对吓阻战略媒体报道称朝鲜目前拥有6至8枚核弹头普京主动对华大开售武大门“2014年领养中国儿童外国家庭夏令上海国家会展中心明年启用 宝龙助力中“斩黄景泰”波涛汹涌 马英九下令当场县市总体竞争力调查 新北市治安勇夺“台“中研院“将今年台湾经济增长率预测福建省委书记尤权拜访文山区忠顺里 与生态文明贵阳国际论坛:希望青年做文化“小娜”手机面市 7万学子尝鲜香港拟发售以地质公园为主题的通用邮票蓉台共论终身教育 台专家授“银发”教离异女子利用微信交友同时骗婚五人终被黄奕录节目崩溃大哭 鼓励男生:谁的人中国舰艇编队驶离珍珠港 参加“环太”小偷窃佛像贩卖 怕神明“怪罪”帮警察北京市区县纪检监察机关执纪监督人员超广西:28名特邀监察员要加强对纪检监新华网评:构建新型大国关系是一种政治
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘