- 博客(19)
- 资源 (9)
- 收藏
- 关注
RSS订阅原创 常用方法
1.日期范围判断Public Function InDate(Par_date As String, par_from As Variant, par_to As Variant) As IntegerDim i As Integer InDate = 0 If IsDate(Par_date) = False Then Exit Function End I
2016-06-15 18:40:06
289
原创 Sybase ASE 基础（6）数据库备份与恢复
本文介绍一下Sybase的一些基础知识，本节是如何备份和恢复数据库。 本人不保证内容的正确性。但尽量在测试环境中执行环境：Sybase ASE 15.51.备份（dump）dump命令的参数比较多，最常用的如下。全库备份：dump database frost to 'D:\sybase\frost.dmp'日志备份：dump transaction f
2016-05-19 22:44:14
782
原创 Sybase ASE 基础（5）数据库优化
本文介绍一下Sybase的一些基础知识，本节是如何优化数据库。 本人不保证内容的正确性。环境：Sybase ASE 15.5假设数据库已经创建好了。未完待续
2016-05-19 22:43:21
459
1
原创 Sybase ASE 基础（4）数据库用户和权限
本文介绍一下Sybase的一些基础知识，本节是如何增加用户和相应的权限。 本人不保证内容的正确性。环境：Sybase ASE 15.5假设数据库已经创建好了。未完待续
2016-05-19 22:41:34
2253
3
原创 Sybase ASE 基础（3）数据库设置
本文介绍一下Sybase的一些基础知识，本节是如何设置数据库。 本人不保证内容的正确性。环境：Sybase ASE 15.5假设数据库已经创建好了。未完待续。。。
2016-05-19 22:39:12
462
原创 截图工具
Windows自带了snipping tool。但是在某些情况下用起来非常卡。 所以那时只好用了这个工具，用来截测试结果图。环境：VB6 两个窗体，一个模块 第一个窗体，要设置的很小，不要影响到正常操作。 第二个窗体，设为无边框，上面放一个shape，最好设为虚线。第一个窗体：Private Declare Function GetKeyState Lib "User32" (ByVal n
2016-05-16 17:51:42
490
原创 Sybase ASE 基础（2）创建数据库
本文介绍一下Sybase的一些基础知识，本节是如何创建数据库。 本人不保证内容的正确性。环境：Sybase ASE 15.5假设SybaseASE已经安装好了。1.数据库设备（device）的创建 sybase的数据库是建立在设备上的，ASE安装好以后，就已经有几个默认设备，master，sybprocs，sybsysdb，temodbdev。如果我们直接创建数据库，会指定到master
2016-05-15 15:07:48
6601
1
原创 HTML常用属性
1.文本框的提示内容 placeholder属性<body> Password:<input type ="text" placeholder = "Please input password..."> <body>2.
2016-05-13 17:36:23
233
原创 javaScript 常用方法
四舍五入 (toFixed)<html> <head> <title>JsText</title> <script> var s = Math.PI * 2 * 3; document.write("<br>Math.PI * 2 * 3 =" + s.toFixed(4)); </script
2016-05-10 17:31:53
385
原创 Sybase ASE 基础（1）
本文介绍一下Sybase的一些基础知识，其中有一部分是所有关系型数据库通用的。 本人不保证内容的正确性。环境：Sybase ASE 15.51.数据库的对象： 数据库的对象主要有以下几种表（Table）：表是数据库的基本对象。其中包括了行和列，列也就是字段，在建表的时候已经规定好了，行是用户保存的数据。规则（Rule）和默认（Default）：规则和默认是建立在表字段的基础上。 默认
2016-05-08 12:12:26
822
转载 正则表达式判断连续号码
转自月光博客原地址：http://www.williamlong.info/archives/1972.html ' 匹配6位顺增 regex.Pattern = "(?:0(?=1)|1(?=2)|2(?=3)|3(?=4)|4(?=5)|5(?=6)|6(?=7)|7(?=8)|8(?=9)){5}\d" ' 匹配6位顺降 regex.Pattern
2016-05-06 14:51:59
721
转载 VB代码撰写约定
转载自月光博客原地址：http://www.williamlong.info/archives/133.html这篇文章是作者在10年前写的，虽然现在没有谁再用VB6来开发软件了，但是仍然有些老系统需要维护。需要的看看，不需要的略过。一、变量和对象 程序中的变量遵循匈牙利表示法，即“前缀+变量含义”，变量的含义为一个或多个英文单词，每个单词的第一个字
2016-05-06 14:27:40
458
转载 一些精妙SQL语句
转载自月光博客原地址：http://www.williamlong.info/archives/93.html以下SQL均未验证。说明：复制表(只复制结构,源表名：a 新表名：b)SQL: select * into b from a where 1说明：拷贝表(拷贝数据,源表名：a 目标表名：b)SQL: insert into b(a, b, c) se
2016-05-06 14:21:52
277
转载 常用的正则表达式
转载自月光博客原地址：(http://www.williamlong.info/archives/433.html)以下均为验证。 匹配中文字符的正则表达式： [\u4e00-\u9fa5] 评注：匹配中文还真是个头疼的事，有了这个表达式就好办了 匹配双字节字符(包括汉字在内)：[^\x00-\xff] 评注：可以用来计算字符串的长度（一个双字节字符长度计2
2016-05-06 14:16:48
201
原创 模拟鼠标移动和点击
模拟鼠标点击很常用， 模拟鼠标移动不常用，但是当你用到时就明白了。该加的控件都加上，命名随意。 代码很少Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As LongPrivate Declare Sub mouse_event Lib "user32" (ByVal d
2016-05-05 16:54:31
2508
1
原创 VB修改注册表
以前找到一个修改注册表的模块。 功能很全，不知道是谁写的。 有时候，由于Window权限设置，从开始运行那里不能启动注册表，那么用这个就可以修改注册表了。VB代码：Option ExplicitGlobal Const REG_SZ As Long = 1Global Const REG_DWORD As Long = 4Global Const HKEY_CLASSES_ROOT = &H
2016-05-05 16:42:43
1807
原创 获取一个数据库中的Table
环境：VB6 首先要引入ADO（ActiveX Data Object） 还有 ADO Ext. 2.8实现：第一步，连接数据库ADO连接数据库就不说了，生成DBcnn第二步，定义DBC=New ADOX.Catalog。设置DBC的ActiveConnection DBC.ActiveConnection=DBcnn然后，DBC.Tables就是所有的表和视图。 DBC.Tables(i)
2016-05-05 14:48:14
337
原创 ADO的Type
当初找了好久才找到的ADO的所有TypePublic Function SQLDataTypeName(dtIndex) Select Case dtIndex Case adEmpty: SQLDataTypeName = "Empty" Case adTinyInt: SQLDataTypeName = "TinyInt" Case ad
2016-05-05 14:25:15
233
原创 获取一个目录下的文件结构
环境：VB6控件：一个List，一个TextBox，一个Label代码：Dim wpath As StringDim cnt As IntegerPublic Function GetExtName(strFileName As String) As String Dim strTmp As String Dim strByte As String Dim i As Long F
2016-05-05 14:02:33
295
ASP.Net案例开发 源代码
2011-09-17
ASP从入门到精通 源代码 ppt
2011-09-17
ASP.NET 2.0网络开发详解 源代码 和Net电子书
2011-09-17
ASP.NET 2.0全程指南 源代码
2011-09-17
30天学通C# 源代码
2011-09-17
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人