HOW TO 系列
文章平均质量分 80
水如烟
随水
展开
-
HOW TO:利用VS.NET IDE批量编译解决方案
Author:水如烟 IDE可以把多个工程项目组织起来,并根据工程间的引用关系自动按先后顺序编译各个工程项目。有的时候,或者编程分工,或者工程项目内容比较多,或者有些工程项目独立性较强,我们就把这些工程项目独立到一个或多个解决方案里面。这样,当这些工程项目修改之后,引用它的项目都需要重新编译。按照通常的做法,我们需要按引用关系逐个打开解决方案进行编译。如果方案多,或者那些项目修改频繁,这原创 2008-12-14 14:26:00 · 5216 阅读 · 0 评论 -
HOW TO:Access的身份验证
Author:水如烟 Public Class SimpleWorksDatabase Private Const gConnectionString As String = _ "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|SimpleWorks.mdb;Persist Security Info=原创 2006-12-26 15:29:00 · 1919 阅读 · 1 评论 -
HOW TO:重启程序(WinForm)
Author:水如烟 Public Class RestartProgramService Private Shared gAppLocation As String Public Shared Sub Run() AddHandler AppDomain.CurrentDomain.ProcessExit, AddressOf AppDomain_ProcessE原创 2006-12-21 17:03:00 · 1590 阅读 · 0 评论 -
HOW TO:控制是否允许用户退出ExcelApplication的Workbook
Author:水如烟 程序中若打开了一个Workbook给用户直接操作,那么,用户有可能将Workbook关闭了甚至退出了整个ExcelApplicatoin。可以通过以下方法防止这种情形:Imports Microsoft.Office.InteropPublic Class Form1 Private gWorkbookCanClose As Boolean = False原创 2006-12-21 08:53:00 · 1629 阅读 · 0 评论 -
HOW TO:避免“将COM对象与其基础RCW分开后不能再使用该对象”错误
Author:水如烟 出现这个情形,是在重写了Finalize并在里面含有调用Com对象的代码,同时在销毁对象前没有显式释放Com对象。解决的办法是,显式调用释放代码。如:Public Sub Quit() ...End SubProtected Overridable Sub Dispose(ByVal disposing As Boolean) If Not Me.原创 2006-12-20 21:21:00 · 7000 阅读 · 1 评论 -
HOW TO:设置默认打印机
Author:水如烟 需要引用System.Management空间再Imports System.Management使用: Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click For Each printe原创 2006-12-21 12:32:00 · 2347 阅读 · 2 评论 -
HOW TO:以事件名称与方法名称为参数的事件关联
Author:水如烟使用代码示例:Public Class Form1 Private Sub box1TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Send(Me.TextBox1.Text) End Sub Private Sub Send(ByVal s原创 2006-08-02 15:30:00 · 1870 阅读 · 0 评论 -
HOW TO:监视系统的NumLock,CapsLock,ScrollLock,Insert状态
Author:水如烟这个类要利用上面的鼠标键盘钩子类StatusKeySateWatcher.EventArgs.vb 事件参数定义Namespace uWindows Partial Class StatusKeySateWatcher Public Class EventArgs Inherits System.EventArgs原创 2006-08-05 19:31:00 · 1764 阅读 · 0 评论 -
HOW TO:建立键盘鼠标钩子
Author:水如烟因为不懂术语,以下只列代码,不作说明:SafeNativeMethods.vb,要用到的系统函数Imports System.Runtime.InteropServicesImports System.TextNamespace uWindows Friend Class SafeNativeMethods Sub New() End原创 2006-08-05 19:27:00 · 2332 阅读 · 4 评论 -
HOW TO:获取文件扩展属性
Author:水如烟Option Strict OffNamespace uIO Public Class File 前期绑定的话需引用COM:Microsoft Shell Controls And Automation Public Shared Function GetDetails(ByVal file As String) As Dictionar原创 2006-06-10 22:22:00 · 2121 阅读 · 0 评论 -
一个快捷方式类
Author:水如烟利用了WScript.Shell示例:Namespace LzmTW.uSystem.uIO Public Class ShortcutDemo 示例,创建当前程序的快捷方式到桌面 Public Shared Sub CreateCurrentAppShortCutOnDesktop() Dim args原创 2007-02-08 13:50:00 · 2006 阅读 · 0 评论 -
HOW TO:墙纸设置
Imports System.SecurityImports System.Runtime.InteropServicesSuppressUnmanagedCodeSecurity()> _Friend NotInheritable Class UnsafeNativeMethods DllImport("user32.dll", CharSet:=CharSet.Auto)> _原创 2007-02-11 13:45:00 · 1360 阅读 · 0 评论 -
HOW TO:给DataTable添加一自增列至首列
Author:水如烟 示例 Dim db As New LzmTW.Data.AccessOleDbDatabase("G:/OfficeNorthwind.mdb") Dim cm As DbCommand = db.CreateCommand("Employees") cm.Connection.Open() Dim tab原创 2008-05-26 11:29:00 · 2857 阅读 · 1 评论 -
HOW TO:监视Window空闲时间
Author:水如烟 示例Public Class Form1 Private WithEvents watcher As New LzmTW.uSystem.LastInputWatcher Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles原创 2008-05-09 19:34:00 · 1839 阅读 · 2 评论 -
HOW TO:获取ExcelApplication COM对象的进程
Author:水如烟 代码Option Strict OffImports System.Runtime.InteropServicesPublic Class ExcelDemo Private gApplication As Object Private gProcess As Process Public ReadOnly Property Applicatio原创 2008-04-26 21:32:00 · 1905 阅读 · 0 评论 -
HOW TO:Office文档版本的检测
Author:水如烟 Office2007跟Office2003及以前的版本,文件的储存方式已大为不同. 无论是OleDb、Odbc的连接字符串还是文档打开的应用程序,两个版本也不一样了。 一般的,可以通过文件扩展名来辩别是哪个版本,如Excel,2003的扩展名为xls,2007的为xlsx 但是,如果扩展名不规范就无法辩别了,况且,象我,就习惯在程序中都输出为xls,不管是不是2007的。原创 2008-04-25 22:43:00 · 1222 阅读 · 0 评论 -
HOW TO:获取当前Office应用程序的安装版本语言等信息
Author:水如烟 从注册表中取。其它方法未作尝试。 ApplicationType.vb Namespace LzmTW.MSOffice Public Enum ApplicationType Access Excel Word Outlook PowerPoint Publisher原创 2007-11-18 23:40:00 · 3187 阅读 · 1 评论 -
HOW TO:判断主程序是Windows应用程序还是控制台应用程序
Author:水如烟 这里用到TypeHelper类 。我们知道,桌面应用程序一般有两种类型,一是Windows应用程序,二是控制台应用程序。 如何判断调用自己所在Dll的主程序是Windows还是控制台应用程序呢? 解决这个问题,基点是ApplicationBase,ConsoleApplicationBase和WindowsFormsApplicationBase, 攻击的地方,当然是原创 2007-11-18 00:22:00 · 3594 阅读 · 1 评论 -
HOW TO:获取文件类型图标和类型说明
Author:水如烟 如果查看一个有效文件,信息如下:如果查看文件类型,比如输入“.doc”,信息如下:类:Imports System.Runtime.InteropServicesNamespace LzmTW.uSystem.uWindow.WinAPI32 Friend Class UnSafeNativeMethods Flags()> _原创 2007-04-06 18:50:00 · 1975 阅读 · 0 评论 -
HOW TO:窗口的前置、切换和显示
Author:水如烟 Namespace LzmTW.Util Public Class Window 窗口显示 Public Shared Sub Show(ByVal form As Form) Show(form.Handle) End Sub原创 2007-04-05 15:19:00 · 1733 阅读 · 0 评论 -
HOW TO:端口打印(比较粗糙)
Author:水如烟以前用过的.不过现在多是用EXCEL打了.那时用在OKI和LQ,两种打印机的控制码是不一样的.要看提供的控制代码说明.那时我是一个个试.Imports System.IOImports System.Runtime.InteropServicesPublic Class DataInfo Private mLPTPORT As String 打印机端口原创 2007-02-05 16:14:00 · 1896 阅读 · 0 评论 -
HOW TO:程序集内读取内嵌默认资源
Author:水如烟当用Reflector查看程序集资源时,我们通常都会看到三个类SR,SRCategoryAttribute和SRDescriptionAttribute,来读取当前程序集的资源信息。在这里,所谓的默认我指的是在Framework2.0里。默认的资源名称一般是[RootNameSpace].Resources.resources。三个类的代码在各程序集中基本是一样的,但因为各自的原创 2006-05-20 17:59:00 · 1655 阅读 · 0 评论 -
HOW TO:利用Excel的QueryTable下载网上数据
Author:水如烟总目录:行政区划数据方案设计这里所说的网上数据,是基于:一、有固定网址发布最新数据的链接;二、数据格式固定。在去年的10月,曾写了个《全国县及县以上行政区划代码信息类 》见:http://www.cnblogs.com/LzmTW/archive/2005/10/22/260066.html现在仍以行政区划代码数据为例。行政区划代码数据由国家统计局发布,网址为http:原创 2006-09-16 19:10:00 · 5659 阅读 · 1 评论 -
HOW TO:可视化配置数据源连接字符串(三)
Author:水如烟HOW TO:可视化配置数据源连接字符串(一) HOW TO:可视化配置数据源连接字符串(二) 这一节原计划说AdoConnection连接字符串有关特性的,在这省了,以下只贴代码了.有些匆忙.仅供参考.项目除了上面提到的AdoConnectionDialog.vb还有以下四个文件:DbConnectionType.vbNamespace uDataNames原创 2006-05-05 23:39:00 · 1991 阅读 · 0 评论 -
HOW TO:溅射屏幕(Splash Screen),也叫程序启动画面的制作(.NET2003)
见:HOW TO:溅射屏幕(Splash Screen),也叫程序启动画面的制作(.NET2003)原创 2005-11-01 21:39:00 · 1599 阅读 · 0 评论 -
HOW TO:菜单名称有关操作
Author:水如烟(http://lzmtw.cnblogs.com/,http://blog.csdn.net/lzmtw) 测试 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1原创 2005-10-21 03:05:00 · 1762 阅读 · 0 评论 -
HOW TO:批量添加域用户
Author:水如烟(http://blog.csdn.net/lzmtw) 用的是VBS.我的域名是fkdl.lcoal,添加用户到Users中.下面是AddUsers.Vbs的内容:它从同文件夹的users.txt读取要添加的用户及其密码.Set adsOU=GetObject("LDAP://CN=Users,DC=fkdl,DC=local")Const ForReadin原创 2005-06-05 18:02:00 · 3611 阅读 · 2 评论 -
HOW TO:枚举网络邻居的计算机及其共享文件夹
HOW TO:枚举网络邻居的计算机及其共享文件夹 Author:水如烟(http://blog.csdn.net/lzmtw) Date:2005-4-26 关键引用空间:System.directoryservices,System.Management 说明:Fo原创 2005-04-26 21:05:00 · 2989 阅读 · 6 评论 -
HOW TO:从资源管理器中拖放文件到控件
HOW TO:从资源管理器中拖放文件到控件 当然,这里所谓的文件是指完整的文件名称,至于文件的内容,须按实际情况进一步的操作。 我这里的控件为一个ListBox。代码如下: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Han原创 2005-04-21 00:23:00 · 1461 阅读 · 0 评论 -
HOW TO:检索本机硬件信息
HOW TO:检索本机硬件信息 使用ManagementClass。下面的示例是检索硬盘信息的。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim disks As Ne原创 2005-04-17 21:28:00 · 1312 阅读 · 0 评论 -
HOW TO:初始化共享变量
HOW TO:初始化共享变量 “初始化共享变量”本不是一个HOW TO问题。这里提出来,主要的再次认识一下NEW。在创建构造函数时,NEW是很有趣的,Sub New()有别于别的函数,因为它可以出现两次。Public Class TestClass Shared Sub New() ... End Sub原创 2005-04-17 00:54:00 · 1385 阅读 · 0 评论 -
HOW TO:对象数组转换为表(DataTable)
HOW TO:对象数组转换为表(DataTable) Author:水如烟(http://blog.csdn.net/lzmtw)Date:2005-4-15 有时候我们想将数组的内容显示在DataGrid上。怎么做呢,MSDN关于DataGrid的说明上说,“也可以将 DataGrid 绑定到 ArrayList。ArrayList 的一个功能是它可以包含多种类型的对原创 2005-04-15 22:18:00 · 3127 阅读 · 0 评论 -
HOW TO:检索应用程序当前执行代码的引用信息
HOW TO:检索应用程序当前执行代码的引用信息 Author:水如烟(http://blog.csdn.net/lzmtw) Date:2005-4-17 Shared Sub GetReferenceInfomations() Dim a As System.Reflection.[Assembly] = Syst原创 2005-04-17 20:49:00 · 1475 阅读 · 0 评论 -
HOW TO:溅射屏幕(Splash Screen),也叫程序启动画面的制作(.NET2005)
HOW TO:溅射屏幕(Splash Screen),也叫程序启动画面的制作(.NET2005)原创 2005-11-08 14:47:00 · 2145 阅读 · 0 评论 -
HOW TO:货币金额拼写转换
Author:水如烟 货币拼写转换 LzmTW 20060127Public Class CurrencySpell 定义为静态类 Private Sub New() End Sub 货币金额拼写转换 金额 格式类型 拼写字符串 Public Share原创 2006-01-30 14:40:00 · 2257 阅读 · 0 评论 -
HOW TO:可视化配置数据源连接字符串(二)
Author:水如烟 HOW TO:可视化配置数据源连接字符串(一) 文件AdoConnectionDialog.vbOption Strict OffNamespace uDataNamespace uData.ConnectionUI Public Class AdoConnectionDialogClass AdoConnectionDialog Private g原创 2006-04-26 19:07:00 · 2570 阅读 · 1 评论 -
HOW TO:可视化配置数据源连接字符串(一)
Author:水如烟数据源连接字符串的配置是一大学问,这里我也只能说说怎么连接上去。初学的也是只是关心这个问题罢了,至于性能安全等等,我也是不懂的了。各种数据源的字符串连接形式,在http://www.connectionstrings.com/上都可以方便查到。数据源的连接因参数多,关键词不好记,所以组装这个字串有些吃力。我们需要的是有一个可视的向导窗体来简化配置的过程。就算没有原创 2006-04-24 16:53:00 · 3376 阅读 · 0 评论 -
HOW TO:WMI简易查询
Author:水如烟WMI的查询在日常计算机和网络管理中经常会用到。本项目的目的是使WMI查询变得简单一些。功能:以给出的身份查询某台机的WMI提供的信息使用方式(示):示图 Private Sub Start() ListBoxItemAdd(String.Format("Begin AT {0}", Now.ToString)) ListBoxItem原创 2006-04-12 16:04:00 · 1604 阅读 · 2 评论 -
HOW TO:配置或数据文件的保存
Author:水如烟配置类或数据类都需要可序列化。通常,序列化有三种方式,序列化和反序列化的过程可以做成一个静态类,如下:Public Class SerializeHelperClass SerializeHelper Private Sub New()Sub New() End Sub Private Shared Function GetXML()Function原创 2006-04-09 16:09:00 · 2096 阅读 · 0 评论 -
HOW TO:配置或数据文件的保存(改进)
Author:水如烟HOW TO:配置或数据文件的保存 这个原是基于NET2003,其中又用了2005的泛型(OF TConfigInformation),显得不伦不类。现在改为2005的,并取消了接口的引入。序列化类:Public Class SerializeHelperClass SerializeHelper(Of T) Private Sub New()Sub New()原创 2006-04-10 13:23:00 · 1587 阅读 · 0 评论