摘要: 这两天很无奈的又用到了Access数据库，结果被bool数据类型摆了一道。bool在access中的帮助信息："是”和“否”值，以及只包含两者之一的字段（Yes/No、True/False 或 On/Off）。而在MsSql,MySql 中都是bit 表示为1 或 0 的整数数据。MsSql 中的查询语句：select * from user where valid=1 可以直接在MySql中用，但要在Access中用必须写成：select * from user where valid=true|false 或者 valid=yes|no 或者 valid=on|off
阅读全文
摘要: Sub CreateAfile Dim fso,MyFile Set fso = CreateObject("Scripting.FileSystemObject") Set MyFile = fso.CreateTextFile("C:\111.tmx",True,True) MyFile.WriteLine("这只是个测试") MyFile.CloseEnd Subcall CreateAfileSet Stream = CreateObject("adodb.stream") ‘定义常量 Const adTy
阅读全文
摘要: 俺们有两个邮箱，1个外部的邮箱1（outlook），1个内部邮箱0（lotus notes）。想要outlook邮箱收到新邮件之后判断一下subject的内容，如果是"kkk:"开头，则将"kkk:"后面的内容作为to发到lotus notes的邮箱里面去。测试环境（xp＋msft outlook），按alt+F11进入VBA编辑。注意要在工具 -> 宏 -> 安全性中设置为低。部分代码如下（手抄的，可能有错哦～～）：option explicitpublic WithEvents outApp as Outlook.ApplicationS
阅读全文
摘要: 我每天所收到的e-mail中，订阅的电子杂志占了很大的比例。其中既有新闻也有电脑技术或娱乐性文章，加在一起竟有上百封。后来我知道单位里许多人同我一样也喜欢看，而且有的人还订了同样的杂志，所以我就每天收到邮件后把它们整理到局域网上去。只是这么多的邮件，整理起来工作量可不小，怎么解决一下呢？ 这些邮件通常都是HTML格式的，用Outlook通常的方法不能正确的导出，而且分布在许多下层子夹中，导出很麻烦。我在OUTLOOK中，用VBA实现了HTML邮件导出并自动发布到网络上。 要对邮件箱里的邮件进行操作，首先要取得Outlook MAPI名字空间。可以使用下面的语句： Dim mobjO...
阅读全文
摘要: Dim Conn1 As ADODB.Connection Dim Cmd1 As ADODB.Command Dim Rs1 As ADODB.Recordset Dim strTmp As String Dim Connect As String Dim Drop As String Dim Create As String Dim sp as string Dim i As Integer Dim l As Long sConnect= "driver={sql server};" & _ "server=server_name;"
阅读全文
摘要: Sub Mail_Text_in_Body()Dim msg As String, cell As RangeDim Recipient As String, Subj As String, HLink As StringDim Recipientcc As String, Recipientbcc As StringRecipient = "someone@21cn.com"Recipientc...
阅读全文
摘要: 如果只是关闭当前工作簿，可以用：ThisWorkBook.Close False如果要关闭所有工作簿并退出程序，可以试试：Sub aa()Application.QuitIf Workbooks.Count > 1 ThenFor i = 1 To Workbooks.CountSendKeys "{right}"SendKeys "{right}"SendKeys "{enter}"Nex...
阅读全文
摘要: [代码]thisworkbookPrivate Sub Workbook_Open() Call CreateEPOBarEnd Sub
阅读全文
摘要: 昨天被人问到这样一个问题：他们的SQL Server服务器经常会出现这样的情况，某个时间点的进程数能一下子到达几百个。排除了被人攻击的可能性，我帮他们分析下来可能是应用程序里面不恰当地使用了连接池导致的。他们的程序是jsp的，通过tomcat服务器运行。关于连接池技术，我之前也有专门的文档介绍过。这里再截几个图来说明一下【备注】使用连接池技术的主要考虑是对于某些访问数据库很频繁的应用，该技术可以提...
阅读全文
摘要: 很多朋友都知道在Web Service中支持Windows验证。但其实能用好的朋友并不是特别多，因为有几个特殊之处需要注意1. 在服务端如何配置 这里要注意的是，authentication的mode默认就是windows，但光是设置这个模式则毫无用处。必须同时设置有关的authorization规则。并且不要光是allow，最后一定要deny掉所有没有被allow的用户或者组服务必须发布到IIS...
阅读全文
摘要: 有几个关键点1. Web Service必须启动http Get这个协议的支持2. VBA程序中是要用到SOAP Toolkit这个COM组件库的，目前的版本为3.0下载地址http://www.microsoft.com/downloads/details.aspx?FamilyId=C943C0DD-CEEC-4088-9753-86F052EC8450&displaylang=en ...
阅读全文
摘要: 1.添加引用MicrosoftOutlook 11.0 Object Library。（这里用的是Microsoft Outlook 2003）2.定义发送邮件过程。Public Sub SendEmail(Receiver As String, SubjectText As String, BodyText As String, AttachedObject As String) Dim Out...
阅读全文
