本 站 搜 索     推 荐 文 章        More... 华硕易电脑(ASUS Eee PC 1025C.. 先来段开场白：为了外出携带方便，到淘.. Acronis True Image 使用说明 　　一款可以在Windows下使用全部功.. Norton Ghost 使用详解 一、分区备份 　　使用Ghost进行系..     文 章 阅 读 排 行 手机视频监控 APP 关闭广告：萤.. 一、萤石云视频：我的，设置，隐私设置，.. 常见数据库介绍与对比（SQL Serv.. 常见数据库的对比分析，涵盖你提到的 A.. Windows 系统修改默认文件类型.. Windows 系统文件类型图标，通常由默.. Windows 系统安装或备份时 ISO，.. 【ISO 文件】 ISO 文件其实就是光.. Microsoft SQL Server 2000 Per.. 　　对于第一次安装 Microsoft SQL Se.. 颜色与英文单词对照 颜色与英文单词对照 red green bl.. PakePlus 构建 APP 需要 Github.. PakePlus 是一个基于 Rust Tauri 的.. 主页真的越Google、越简洁越好吗 　　如果你在11月10日早上打开雅虎中.. 网络工程师必懂的专业术语 路由器问题：1、什么时候使用多路由协.. 为啥现在的电脑都不能安装 Wind.. 说实话，这几年如果你尝试在新电脑..

文 章 信 息 用VBS编写的托盘冒泡提示 〖评论()〗〖留言〗〖收藏〗 〖文章分类：电脑·手机·网络 / 软件编程·编译〗〖阅读选项〗 　　参数均是可选的，第一个是气泡的内容，第二个是气泡的标题，第三个是气泡持续的时间，默认是10000毫秒(10秒钟)，第四个是可选的图标样式，可选值为0(无图标)，1(信息图标)，2(警告图标)，3(错误图标)，默认是0 　　这个工具是托盘图标存在期间不会退出，如果需要删除临时文件需要等待它自己完成自己的工作退出之后 程序是VC环境下用纯API写的，使用WinMainCRTStartup函数代替了传统的WinMain函数作为入口，因此程序体积大减(非原创)为了让大家用上就放出来。 代码如下，保存为.VBS 文件，注：把 Data = "" 之间的代码写成一行 ----------------------------------------------------------------------------- Data = "4D5A00000000000000000000504500004C010200534C58210000000000000000E0000F 010B01000000000000000600000000000054010000001000000C00000000004000001000000002 000004000000000000000400000000000000004000000002000000000000020000000000100000 100000000010000010000000000000100000000000000000000000983200008400000000000000 000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000000000 200000001000000000000000000000000000000000000000000000E00000C00000000000000000 00100000003000001903000000020000000000000000000000000000E00000C08725DC32400061 9455A4B680FF1373F933C9FF13731633C0FF13731FB68041B010FF1312C073FA753AAAEBE0FF53 0802F683D901750EFF5304EB24ACD1E8742D13C9EB189148C1E008ACFF53043B43F8730A80FC05 730683F87F77024141958BC5B600568BF72BF0F3A45EEB9F5EAD97AD50FF5310958B074078F375 03FF630C5055FF5314ABEBEE33C941FF1313C9FF1372F8C302D275058A164612D2C34B45524E45 4C33322E646C6C00004D3815403259096724454CFF027F65C711B3270CF49B4887C17F6874C470 3A712FEE691D2E62610E6475C3636F6DF373011C6C79782C2042D79A53AF0B4D2E02C20325730E 0842616C2E6F206E54697020E8653A7874B75B14576C955D0E086DE76F75C728637329331D4990 6EA7266444F9433853853C01C71805E012FCE801C114FF15241001A3E4911FB9700633C0890DE8 1BC844EC981425A3F0DD1354F405117813227CC448C41406A2F82B30C390038B44241D0856579D 7C800C33C983F8030A893D8014252035017727FF248560115834EB6822B4081B02B5E216910C03 80A8C44018B2A3518942268E00A51FFD657A3150C0F866A0220335F5EE61432A134091C2428507 C9B55845EC3F083FE01FA278ECA40D285F67E23008A0C3A80F9307C17C00A397F120FBE1FC98D0 4C7423BD6604441D07C68E499BB9410534301C383EC18384224185355B250BB28B80B9352BD986 4BE084C500E14AA66003A3BC50F8E52A3B31F4E04CC3D202F51296890AD0880130CFFD7451C128 3C40C011202C6057F170C5AA18414560852278484146C0381C3087EE28B7F461F8D4C241050CD5 146F554F6600A52E84D14311B8BD861F41F2019047E5552100ACE6A1854EAFE8BB50026FD037E2 F3312EDEB2B085620455C0A0558A459D6F12C5D110C8ED6C16818E8DCFD8E7C5553ED258B8A1E0 86AFA910450275D6A5B3D2CB85701EBE54BF678A9A8113AA691111422DC8F010E2C1510EBCB538 ED72D7011DC73746272166E412E054578C3EE50F16F63FD73C73B1D47FD7C43716D5C61E81D4C6 93E3857074B45524E3F6033322E646CE309994144546BD46F706757406465771D145F7358721A7 466D29E1AE25E142CFA686065125F4E6F7412696679843D506F5DB354D8417267337657514842C 463D001EABAF6000000F03200000000000000000000F2010000F03200000000000000000000000 0000000000000000000000010400000304000C814400000000000E032400080000000007D0000C 0324000E8014000DC014000DE014000C0114000FA32000008330000000000004C6F61644C69627 261727941000047657450726F634164647265737300" Function ExtractFile(FileName) With CreateObject("ADODB.Stream"):.Type = 1:.Open:.Write StrToByte(data):.SaveToFile FileName, 2:.Close:End With End Function ExtractFile "C:\BalloonTip.exe" WScript.CreateObject("WScript.Shell").Run "cmd.exe /c C:\BalloonTip.exe "" 请勿在电脑桌上放置贵重物品，以防被盗，请自行保管自己的各种虚拟帐号，如有丢失网吧概不负责!"" 温馨提示 10000 1", 0 Function StrToByte(str) Set xmldoc = CreateObject("Microsoft.XMLDOM") xmldoc.loadXML "<?xml version=""1.0""?>" Set pic = xmldoc.createElement("pic") pic.dataType = "bin.hex" pic.nodeTypedValue = str StrToByte = pic.nodeTypedValue End Function 文章作者：未知  更新日期：2008-02-18 〖文章浏览：〗〖发送文章〗〖打印文章〗 相关软件 ·Visual Basic：一些采用Vbscript脚本语言制作的网页实例  2005-07-07