转载--SQL还原数据库后孤立用户问题处理（SQL 数据库 拥有对象 无法删除）
摘要：
sql 数据的迁移，或不同版本间的备份还原 阅读全文
posted @ 2013-09-05 16:41 xbj_hyml 阅读(300) 评论(0) 推荐(0) 编辑
VBA：Excel 中利用 ODBC数据源，以及 Sheet.QueryTables对象 查询数据
摘要：
第一步：配置ODBC数据源-"控制面板"-"管理工具"-"ODBC数据源"-"用户DSN"。如 "Reports.DSN" （可以查资料）第二步：(1)在Excel(03)中-"数据"-"导入数据"-"新建数据库查询"-然后选择之前建立的ODBC源-..(这里几个对话框可以直接关闭) -"Micorsoft Query"界面-"SQL"按钮(因为我是用sql语句查询)-输入sql语句-关闭(或者选 阅读全文
posted @ 2013-09-05 10:01 xbj_hyml 阅读(1852) 评论(0) 推荐(0) 编辑
VBA：Excel 中利用 ADO 查询数据
摘要：
'功能-更 B1 中Sales Month 查询该月 数据Sub QureyForMonth() Dim cnn As New ADODB.Connection, rs As New ADODB.Recordset Dim cnnStr As String, sql As String Dim curMonth As Date, firstDay As Date, lastDay As Date Dim i As Integer, nRow As Integer, nCol As Integer ' On Error GoTo hErr With Th... 阅读全文
posted @ 2013-09-05 09:35 xbj_hyml 阅读(737) 评论(0) 推荐(0) 编辑
VBA-- 一些用法
摘要：
=================================================设置某行背景色.Rows(3).Interior.ColorIndex = 1 ’--Interior 对象=================================================获取 使用区域的 行列数.UsedRange.Rows.Count 阅读全文
posted @ 2013-09-03 14:55 xbj_hyml 阅读(159) 评论(0) 推荐(0) 编辑
sql2000 中 存储过程 相关
摘要：
1、一个begin..end与多个的区别 多个 + exception 操作可以更好的、更详细的 捕捉到 sql语句的异常2、如果需要创建 随SQL server服务 自启动的存储过程需要注意： 必需由管理员在master表中创建 or 使用语句 exec sp_procoption '存储过程名','startup','on' 将存储过程设置为自启动====================================================================================3、存储过程中 使用 临时表- 阅读全文
posted @ 2013-09-02 14:05 xbj_hyml 阅读(181) 评论(0) 推荐(0) 编辑
VB 一些内置函数使用--注意的地方
摘要：
========================Shell方法============================1、VB 中使用Shell函数 ，参数-如果文件路径包含有空格的话，需要用 一对 chr(34) 引号括起来例如-Shell "cmd /c echo dasfa" & Now & " >>" & Chr(34) & App.Path & "\testShell.log" & Chr(34), vbHide=========================== 阅读全文
posted @ 2013-08-23 13:19 xbj_hyml 阅读(264) 评论(0) 推荐(0) 编辑
RGB 函数与 颜色值(long)的转换
摘要：
long = r + g * 256 + b * 65536=======================Red = Color And &HFF&Green = (Color \ &H100) And &HFFBlue = Color \ &H10000 阅读全文
posted @ 2013-08-15 10:29 xbj_hyml 阅读(652) 评论(0) 推荐(0) 编辑
托盘 Tray
摘要：
=======================Module======================Option Explicit'Type NOTIFYICONDATA' cbSize As Long 需填入NOTIFYICONDATA数据结构的长度' HWnd As Long 设置成窗口的句柄' Uid As Long 为图标所设置的ID值' UFlags As Long 用来设置以下三个参数uCallbackMessage、hIcon、szTip是否有效' UCallbackMessage As Long 消息编号' HIcon 阅读全文
posted @ 2013-08-13 13:41 xbj_hyml 阅读(285) 评论(0) 推荐(0) 编辑
VB6.0 API 累计
摘要：
========给菜单添加图标用到 一组API: GetMenu xx 阅读全文
posted @ 2013-08-13 13:33 xbj_hyml 阅读(131) 评论(0) 推荐(0) 编辑
