vbman2003-CSDN博客

原创 VB6与WebService中的自定义类

两种情况： 1. WebService中返回自定义类 2. WebService中的参数是自定义类简单示例： WebService代码：using System;using System.Web;using System.Web.Services;

2011-07-15 13:03:39 3087 5

通常对数据库的查询和操作，大家习惯于拼接sql语句，在论坛上也经常有拼接sql语句方面的问题，让许多初学者深感头痛，即使是老手，遇到复杂的拼接也难免会出错。其实访问数据库我们有更好的选择，这就是参数化查询，这种方法高效安全，又可以省掉程序中拼接sql的麻烦。不过呢，这方面的介绍不是很多，有介绍通常的方法似乎比较烦琐，不能写成通用的方法函数，所以好象使用的人比较少。最近小小的研究了一下，有所发现，备忘在此，共大家参考：以下示例，基于xp sp3 + ADO2.8 + sql server 20

2010-12-06 10:36:00 3449 1

原创一个M选N的组合算法

最近有贴子在讨论大乐透彩票的算法，.想了一个进位的方法，比如1-9个数字选4个数字排列，就是1234排到6789，那么每个组合就是尾数累加1，只要保证各位进位的数是6789，也就是个位累加超过9向前进一位，十位累加超过8向前进一位......进位后，同时保证千位 Option ExplicitPrivate Const MaxValue As Long = 35Private Co

2008-04-16 11:31:00 4772 3

原创 VB读写EXCEL的小技巧

MSDN上关于操作EXCEL的内容非常全面，可是CSDN论坛上问这类问题的还是很多，而且大多回复多是采用访问EXCEL对象的CELLS接口来实现读写的，这样每处理一下数据都要访问一下CELLS，效率不高。其实MSDN上有更高效的方法，就是整体读入EXCEL指定区域相关内容到数组和将数组整体写入EXCEL指定象区域，这样读写都是一次性访问EXCEL相关对象，和前一种方法相比，整体效率提升非常大。下面

2007-10-25 17:07:00 7449 2

原创 VB6.0如何使用正则表达式

　　最近在用VB6解决一个网页解析的应用，涉及到了正则。如何在VB6中使用正则表达式，这个在MS网站上有介绍，不过介绍的不是很全面。下面结合MS网站的内容和搜索到的东西，自己汇总一下。　　引用了Microsoft VBScript Regular Expressions 5.5 后就可以声明正则相关对象了。主要有三个对象：RegExp、MatchCollection、Match。　　　　1.

2007-10-16 11:15:00 17540 12

原创 VB6.0调用WebServices的简单示例

　　在.NET平台中期望值最高，广告做的最多的要算是WebServices了。WebServices是Web上的类，与Web应用程序不同的是，这个类不返回HTML页面，只以XML文档返回一个或几个值。因此，任何能够处理XML的应用程序都可以调用其方法和使用其结果。WebServices更多是Internet上的应用，不过小型企业内部系统开发使用WebServices，也有许多好处。个人认为，与CO

2007-08-30 14:36:00 42061 2

原创 VB中给DataReport指定打印机

　　DataReport是VB的报表工具，其简单方便快捷，解决常用的报表问题还是不错的。不过在打印功能上有一个非常大的弱点，就是在代码中不能通过相关属性或方法来指定打印机，只能用系统默认打印机来打印报表。这个问题也是论坛上常议的话题，在网上搜索一下，你可以找到解决方法（我没测试过），不过代码量不小，而且大量的API和Printer对象，令初学者望而却步。一直在找一个较为简单的解决方案，于是想到了注

2007-08-25 10:43:00 5343

原创关于VB调用Access的Rnd函数随机返回表中数据的解决方法

　　论坛上问这个问题的人蛮多，最近正好也在写一个小东西遇上了这个问题，在网上搜索了下没找到解决办法。最后在Access版的老大们帮助下解决了，有兴趣的可以交流一下。　　SQL server数据库有个NewID函数，可以很方便的用SQL语句得到数据表中的随机数据。但Access数据库没这么方便，虽然有个Rnd，可以通过“select top 10 * from tb order by rnd(i

2007-08-25 10:15:00 5789 1

vbman2003之学习备忘录