- 博客(56)
- 收藏
- 关注
原创 字典库父栏目下套子栏目,循环下去读取数据。
由于有人问这问题,就写了。StrSql = "SELECT ID, Name FROM TabArea Where len(id)=2"set rsMain = server.CreateObject("ADODB.Recordset")rsMain.open StrSql, conn, 3, 1While Not rsMain.eof rid=rsMain("ID") rName=rsMa
2009-07-03 15:56:00
1025
2
原创 怎么将1到100一次性插入表b中
表b 字段id为整数 怎么将1到100 插入表b中 create table #(id int)declare @i intset @i=1while @i100begininsert into # select @iset @i=@i+1endselect * from #
2008-03-07 10:55:00
2715
转载 --各种字符串分函数(行转列)
--各种字符串分函数--3.3.1 使用游标法进行字符串合并处理的示例。--处理的数据CREATE TABLE tb(col1 varchar(10),col2 int)INSERT tb SELECT a,1UNION ALL SELECT a,2UNION ALL SELECT b,1UNION ALL SELECT b,2UNION ALL SELECT b,3--合并处
2008-03-07 10:53:00
806
原创 在sql中实现统计每月当中的最后一天
SELECT DATEADD(d, - 1, DATEADD(m, DATEDIFF(m, 0, GETDATE()) + 1, 0)) AS Expr1注:DATEDIFF(m, 0, GETDATE()) ’得到当前月份距离0(即默认日期1900-1-1)的月份DATEDIFF(m, 0, GETDATE()) +1 ’得到下个月DATEADD(m, DATEDIFF(m,
2007-12-30 14:45:00
1584
原创 vs2003升级到vs2005遇到的问题
1.无法识别的配置节 xhtmlConformance说明: 在处理向该请求提供服务所需的配置文件时出错。请检查下面的特定错误详细信息并适当地修改配置文件。 分析器错误信息: 无法识别的配置节“xhtmlConformance”源错误: 行 68: -->行 69: 行 70: 行 71: 行 72: 源文件: F:/web.config 行: 70 新装了vs2
2007-11-03 12:20:00
1589
原创 在SQLServer中查询时区分大小
SQL Server默认的排序规则是Chinese_PRC_CI_AS,这种排序规则是不区分大小写的,包括不区分半角和全角。若查询语句select title from article where title like ‘%java%’,可以找到标题中含有java、JAVA、java的。如果需要区分大小写,指定排序规则就可以了。在上面的例子中,如果只查询包含字符串”java”的标题,查询语句变成了
2007-07-21 09:29:00
1211
转载 ASP&Javascript 身份证验证
现在新的身份证已经从15位升到了18位了,很多软件都可能用到身份证的输入、校验的工作,关于新身份证的编码似乎文章很少,我在2000年的时候找到了计算机世界的一篇文章,发现现在的身份证校验码居然可能是英文字母x(其实这个X是罗马字母,表示10的意思),为什么用字母呢?谁知道? 起码电话上数字键就输不进去新的号码。(现在的办法是使用*替代,好在还有#*2个键,我也做过CTI的,呵呵),然后我写了个
2007-05-28 21:54:00
3635
1
转载 Wscript.Shell对象详细介绍
WshShell对象ProgIDWscript.Shell文件名WSHom.OcxCLSIDF935DC22-1CF0-11d0-ADB9-00C04FD58A0BIIDF935DC21-1CF0-11d0-ADB9-00C04FD58A0B下表说明和WshShell对象有关的属性。属性说明Environment返回WshEnvironment集合对象。SpecialFolders使用WshSpe
2007-05-10 12:18:00
1846
转载 Javascript脚本
验证类1、数字验证内 1.1 整数 /^(-|/+)?/d+$/.test(str) 1.2 大于0的整数 (用于传来的ID的验证) /^/d+$/.test(str) 1.3 负整数的验证 /^-/d+$/.test(str)2、时间类 2.1 短时间,形如 (13:04:06) function isTime(str) {
2007-05-10 11:54:00
795
转载 Asp模拟抽奖
var onecount; onecount=0; subcat = new Array(); strSql = "Select top 3 Id,RealName From Reguser ORDER BY NEWID()" Set Rs = Server.CreateObject("adodb.recordset") Rs.Open
2007-04-06 10:59:00
2153
转载 ASP导出Excel数据的四种方法
一、使用OWC 什么是OWC? OWC是Office Web Compent的缩写,即Microsoft的Office Web组件,它为在Web中绘制图形提供了灵活的同时也是最基本的机制。在一个intranet环境中,如果可以假设客户机上存在特定的浏览器和一些功能强大的软件(如IE5和Office 2000),那么就有能力利用Office Web组件提供一个交互式图形开发环境。这种模
2007-04-05 14:51:00
876
转载 防止SQL注入 设置过sql server 网络实用工具TCP/IP
函数名:SetRequest 作 用:防止SQL注入 ParaName:参数名称-字符型 ParaType:参数类型-数字型(1表示是数字,0表示为字符) RequestType:请求方式(0:直接请求,1:Request请求,2:post请求,3:get请求,4:Cookies请求,5:WEB请求) __________________________________________
2007-03-23 11:14:00
2563
3
原创 建立/修改字段(索引)
/*建立字段*/alter table Client add Cli_No nvarchar(8) COLLATE Chinese_PRC_CI_AS NULLalter table Stocks_Ask_Data add Edit_Id int NULL alter table Stocks_Ask_Data add StkList_ID_Sell nvarchar(20) COLLATE Ch
2007-01-10 15:58:00
1300
转载 表里有一些默认的数据 用什么方法生成一条一条的insert into语句
tabid name1 haha2 hehe3 xixi....用什么方法把这些数据 全部生成一条一条的insert into语句 如:insert into tab values(1,haha)insert into tab values(1,hehe)insert into tab values(1,xixi)解决方法:--拼凑sql语句declare
2007-01-03 13:49:00
831
原创 测试键盘
测试键盘function keyDown(){var ekey;ekey = event.keyCode;var realkey;realkey=String.fromCharCode(ekey);alert("ekey="+ekey+"realkey="+realkey);}document.onkeydown=keyDown
2006-12-11 08:50:00
1162
转载 滚动信息示例
滚动信息 - 51windows.netbody{font-size:12px;background-color:#FFF;overflow:hidden;}td{font-size:12px;}.titletd td{background-color:#EFEFEF;padding:2px;text-align:center;}.datatd td{background-color:#FFFFF
2006-12-01 14:14:00
983
转载 设置Command按钮字体颜色!
Option Explicit ================================================================== modExtButton.bas 本模块可让你改变命令按钮的文本颜色。 使用方法: - 在设计时将按钮文本的Style设为Graphical. -
2006-11-29 00:12:00
5961
1
原创 MdiForm窗体,Combo,DataCombo和DTPicker焦点
1.MdiForm窗体有菜单,MdiForm窗体打开时,将焦点移到菜单上! 在要顶层菜单中定义一个访问键(或热键)的按键,如常见的情况:文件(&F) 打开 保存 ...然后写入下面的代码:Private Sub MDIForm_Activate() SendKeys "%F"End Sub在菜单没有设置访问键时,可以这样:Private Sub MD
2006-11-28 13:40:00
1483
转载 以日期升序排 数量总额减去14后的结果 这sql怎么写
产品 数量 日期 单据号 a 10 9.1 001a 3 9.2 002a 4 9.3 003a 2 9.4 004以日期升序排 数量总额减去14后的结果产品 数量 日期 单据号 a 3 9.3 003a 2 9.4 004这个sql 怎么写?方法一:create table tb
2006-11-14 13:10:00
1505
转载 如何用asp读取Excel文件
1.ASP对Excel的基本操作(1) 建立Excel对象 创建Excel对象可以通过下面的代码来实现:set objExcelApp = CreateObject("Excel.Application")objExcelApp.DisplayAlerts = false 不显示警告objExcelApp.Application = false
2006-11-08 11:21:00
3574
转载 boolean类型的字段值在DataGrid里显示值为"-1"与"0",怎么样才能让他显示:Ture或false
微信软件工作室 (MicroInfo Soft Studio) http://www.playyuer.com 于溪玥(PlayYuer) 2000/02/01 帖: 《VB6 之数据格式化对象使用技巧》(http://microinfo.top263.net/Txt/Format.txt ) 例程下载:(http://micro
2006-10-29 08:58:00
2305
转载 表tab1和tab2 'StkList_ID'关联 tab2 以'group_id'分组 shape语句怎么写?
有个简单的方法可以获得正确的语句,就是加一个数据环境设计器DataEnvironment,新建一个连接,然后分别设置主表子表的分组命令,这样右键选择“层次结构命令”,就可以查看正确的SHAPE命令了,这是学习SHAPE命令的一个方法
2006-10-27 20:57:00
886
转载 DataCombo绑定数据库 它还另外增加一项不属入表的记录 如“所有”
Set RstX = New ADODB.RecordsetStrSql = "SELECT Att_Code, Att_Name From Pro_Att "RstX.Open StrSql, Cn, adOpenKeyset, adLockOptimisticWith DataComboSet .RowSource = RstX.BoundColumn = "Att_Code".ListFie
2006-10-27 20:55:00
1177
转载 TreeView有checkbox 当父节点选择框选中 子节点将全部选中 代码怎么写的?
Option ExplicitPrivate Sub Form_Load() With TreeView1 .Nodes.Add , , "Parent1", "Test1" .Nodes.Add "Parent1", tvwChild, "Child1", "Test_CH1" .Nodes.Add "Parent1", tvwChild, "
2006-10-27 20:44:00
2131
原创 表每固定条分组显示
create table #t(nm varchar(2))insert into #t(nm)(select aa unionselect bb unionselect cc unionselect dd unionselect ee unionselect ff unionselect bg unionselect hh)create table #t1
2006-10-26 09:52:00
693
转载 查询连接本机信息
if exists (select * from dbo.sysobjects where id = object_id(N[dbo].[p_getlinkinfo]) and OBJECTPROPERTY(id, NIsProcedure) = 1)drop procedure [dbo].[p_getlinkinfo]GO/*--获取连接SQL服务器的信息所有连接本机的:操作的数据库名
2006-10-21 00:12:00
1518
转载 SQL Server 数据库管理常用的SQL和T-SQL语句
1. 查看数据库的版本 select @@version 2. 查看数据库所在机器操作系统参数 exec master..xp_msver 3. 查看数据库启动的参数 sp_configure 4. 查看数据库启动时间 select convert(varchar(30),login_time,120) from master..sysprocesses where spid=1 查看数据库服务器
2006-10-21 00:11:00
729
转载 javascript 常用验证函数
一、验证类1、数字验证内 1.1 整数 1.2 大于0的整数 (用于传来的ID的验证) 1.3 负整数的验证 1.4 整数不能大于iMax 1.5 整数不能小于iMin2、时间类 2.1 短时间,形如 (13:04:06) 2.2 短日期,形如 (2003-12-05) 2.3 长时间,形如 (2003-12-05 13:04:06) 2.4 只有年和月。形如(2003-05,或
2006-10-21 00:10:00
710
转载 精妙的SQL语句
说明:复制表(只复制结构,源表名:a 新表名:b) select * into b from a where 1说明:拷贝表(拷贝数据,源表名:a 目标表名:b)insert into b(a, b, c) select d,e,f from b;说明:显示文章、提交人和最后回复时间select a.title,a.username,b.adddate from table a,(select m
2006-10-21 00:08:00
709
转载 滚动天气预报-调用天气网页
On Error Resume NextFunction RemoveHTML(strHTML)Dim objRegExp, Match, Matches Set objRegExp = New RegexpobjRegExp.IgnoreCase = TrueobjRegExp.Global = True取闭合的objRegExp.Pattern = ""进行匹配Set Matches =
2006-10-19 12:52:00
1974
转载 SQL中的数字格式化
--取小数位前数字,不考虑四舍五入select left(30000.72234, charindex(., 30000.72234)-1)其中:charindex(., 30000.72234)获得小数点的位置;-1则表示在小数点前面的全部,如果想获取小数点后面的n为,写成+n就可以了。还挺好用的。--每三位用逗号相隔,留2位小数,不考虑四舍五入select convert(
2006-10-13 20:34:00
1797
转载 Command按钮 怎么用快捷键 除了用 Caption=新增(&A) 即快捷键就是Alt+“A” 我想用F2来表示这个按钮的快捷键怎么办
简单的办法:Option ExplicitPrivate Sub Command1_Click()MsgBox "YOU CLICKED COMMAND1!"End SubPrivate Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = vbKeyF2 Then Command1_ClickEnd Su
2006-09-29 14:53:00
1680
转载 Windows 2003中200K上传限制解决方法
win 2003默认上传字节为204800。在服务器上进行如下操作:1. 先在服务里关闭 iis admin service 服务.2. 找到 windows/system32/inetsrv/ 下的 metabase.xml 文件.3. 打开, 找到 ASPMaxRequestEntityAllowed 修改为需要的值(可修改为10M即: 10485760),
2006-09-27 20:04:00
1160
转载 怎样在图片按钮上加(打印,保存,后退)代码
■打开■ ■另存为■ ■属性■ ■打印■ ■页面设置■ ■刷新■■导入收藏■ ■导出收藏■ ■加入收藏■ ■整理收藏夹■ ■查看原文件■ ■语言设置■ ■前进■ ■后退■
2006-09-16 13:55:00
1699
转载 最基本也是最常用的一些表达式
正则表达式用于字符串处理、表单验证等场合,实用高效。现将一些常用的表达式收集于此,以备不时之需。匹配中文字符的正则表达式: [/u4e00-/u9fa5]评注:匹配中文还真是个头疼的事,有了这个表达式就好办了匹配双字节字符(包括汉字在内):[^/x00-/xff]评注:可以用来计算字符串的长度(一个双字节字符长度计2,ASCII字符计1)匹配空白行的正则表达式:/n/s*/r评注:可以用来删除空白
2006-07-12 15:25:00
803
转载 英文转中文和人民币小写转大写
public static string PinYin(string mystr) { //指转换一个中文 string tt; if ((mystr.ToUpper().CompareTo("A")>=0 && mystr.ToUpper().CompareTo("Z")=0 && mystr.ToUpper().CompareTo("9") { tt=
2006-07-05 17:07:00
2530
转载 数字转英文(1200=> one thousand two HUNDRED)Sql函数
CREATE function FunAmtEng(@Amt numeric(10,2))RETURNS varchar(200)asbegindeclare @strAmt varchar(10)declare @str varchar(200)declare @tempS varchar(200)declare @i intdeclare @j int---------set @str=
2006-07-05 16:55:00
1268
转载 两分页存储过程
分页存储过程 (一) (这个速度快点 建议用这个)CREATE PROCEDURE hhhb_PageView1 @PageIndex INT, --页面索引,从datagrid中获取 @PageSize INT, --页面显示数量,从da
2006-07-05 09:58:00
1410
1
转载 在数据库中存储 BLOB 数据的缺点
在数据库中存储 BLOB 数据的缺点请认真考虑哪些资源存储在文件系统中可能比存储在数据库中更好。通常通过 HTTP HREF 引用的图像就是很好的例子。这是因为: • 从数据库中检索图像会导致比使用文件系统更大的开销。
2006-06-30 15:59:00
4167
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人