博客园_stu-acer

几个收藏的根据数据库生成Insert语句的存储过程[修正版]

2010-10-24T09:11:00Z

-- ======================================================
--根据表中数据生成insert语句的存储过程
--建立存储过程，执行spGenInsertSQL 表名
--感谢playyuer
----感谢szyicol
-- ======================================================
CREATE   proc [dbo].[spGenInsertSQL] 
(@tablename varchar(256))
as
begin
  declare @sql varchar(8000)
  declare @sqlValues varchar(8000)
 
  set @sql =' ('
  set @sqlValues = 'values (''+'
  select @sqlValues = @sqlValues + cols + ' + '','' + ' ,@sql = @sql + '[' + name + '],' 
    from 
        (select case 
                  when xtype in (48,52,56,59,60,62,104,106,108,122,127)                                
                       then 'case when ['+ name +'] is null then ''NULL'' else ' + 'cast(['+ name + '] as varchar)'+' end'
                  when xtype in (58,61)
                       then 'case when ['+ name +'] is null then ''NULL'' else '+''''''''' + ' + 'cast(['+ name +'] as varchar)'+ '+'''''''''+' end'
                 when xtype in (167)
                       then 'case when ['+ name +'] is null then ''NULL'' else '+''''''''' + ' + 'replace(['+ name+'],'''''''','''''''''''')' + '+'''''''''+' end'
                  when xtype in (231)
                       then 'case when ['+ name +'] is null then ''NULL'' else '+'''N'''''' + ' + 'replace(['+ name+'],'''''''','''''''''''')' + '+'''''''''+' end'
                  when xtype in (175)
                       then 'case when ['+ name +'] is null then ''NULL'' else '+''''''''' + ' + 'cast(replace(['+ name+'],'''''''','''''''''''') as Char(' + cast(length as varchar)  + '))+'''''''''+' end'
                  when xtype in (239)
                       then 'case when ['+ name +'] is null then ''NULL'' else '+'''N'''''' + ' + 'cast(replace(['+ name+'],'''''''','''''''''''') as Char(' + cast(length as varchar)  + '))+'''''''''+' end'
                  else '''NULL'''
                end as Cols,name
           from syscolumns  
          where id = object_id(@tablename) 
        ) T 
  set @sql ='select ''INSERT INTO ['+ @tablename + ']' + left(@sql,len(@sql)-1)+') ' + left(@sqlValues,len(@sqlValues)-4) + ')'' from '+@tablename
  --print @sql
  exec (@sql)
end

-- ======================================================
--根据表中数据生成insert语句的存储过程
--建立存储过程，执行proc_insert 表名
--感谢Sky_blue
--感谢szyicol
-- ======================================================
CREATE proc [dbo].[proc_insert] (@tablename varchar(256))
as
begin
       set nocount on
       --declare @tablename varchar(256)
       --set @tablename = 'AD'
       declare @sqlstr varchar(4000)
       declare @sqlstr1 varchar(4000)
       declare @sqlstr2 varchar(4000)
       select @sqlstr='select ''insert '+@tablename
 
       select @sqlstr1=''
       select @sqlstr2=' ('
       select @sqlstr1= ' values ( ''+'
       select @sqlstr1=@sqlstr1+col+'+'',''+' ,@sqlstr2=@sqlstr2+ '[' + name + ']' +',' from (select case 
--     when a.xtype =173 then 'case when '+a.name+' is null then ''NULL'' else '+'convert(varchar('+convert(varchar(4),a.length*2+2)+'),'+a.name +')'+' end'
       when a.xtype =104 then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(1),['+a.name +'])'+' end'
       when a.xtype =175 then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'replace(['+a.name+'],'''''''','''''''''''')' + '+'''''''''+' end'
       when a.xtype =61  then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'convert(varchar(23),['+a.name +'],121)'+ '+'''''''''+' end'
       when a.xtype =106 then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar('+convert(varchar(4),a.xprec+2)+'),['+a.name +'])'+' end'
       when a.xtype =62  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(23),['+a.name +'],2)'+' end'
       when a.xtype =56  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(11),['+a.name +'])'+' end'
       when a.xtype =60  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(22),['+a.name +'])'+' end'
       when a.xtype =239 then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'replace(['+a.name+'],'''''''','''''''''''')' + '+'''''''''+' end'
       when a.xtype =108 then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar('+convert(varchar(4),a.xprec+2)+'),['+a.name +'])'+' end'
       when a.xtype =231 then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'replace(['+a.name+'],'''''''','''''''''''')' + '+'''''''''+' end'
       when a.xtype =59  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(23),['+a.name +'],2)'+' end'
       when a.xtype =58  then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'convert(varchar(23),['+a.name +'],121)'+ '+'''''''''+' end'
       when a.xtype =52  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(12),['+a.name +'])'+' end'
       when a.xtype =122 then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(22),['+a.name +'])'+' end'
       when a.xtype =48  then 'case when ['+a.name+'] is null then ''NULL'' else '+'convert(varchar(6),['+a.name +'])'+' end'
--     when a.xtype =165 then 'case when '+a.name+' is null then ''NULL'' else '+'convert(varchar('+convert(varchar(4),a.length*2+2)+'),'+a.name +')'+' end'
       when a.xtype =167 then 'case when ['+a.name+'] is null then ''NULL'' else '+'''''''''+'+'replace(['+a.name+'],'''''''','''''''''''')' + '+'''''''''+' end'
       else '''NULL'''
       end as col,a.colid,a.name
       from syscolumns a where a.id = object_id(@tablename) and a.xtype <>189 and a.xtype <>34 and a.xtype <>35 and  a.xtype <>36
       )t order by colid
       select @sqlstr=@sqlstr+left(@sqlstr2,len(@sqlstr2)-1)+') '+left(@sqlstr1,len(@sqlstr1)-3)+')'' from '+@tablename
       --print @sqlstr
       exec( @sqlstr)
       set nocount off
end

原文：几个收藏的根据数据库生成Insert语句的存储过程

修正了表中的字段如果是SQL中的关键字（如Order）时，生成的脚本执行会出错的bug

本文链接

SQL Server删除外键约束

2010-08-02T09:30:00Z

来源：http://zhidao.baidu.com/question/150790965

x先找出约束名字
然后删除它
我给个例子

--测试环境
--主表
create table test1(id int primary key not null,value int)
insert test1 select 1,2
go
--从表
create table test2(id int references test1(id),value int)
go
--第一步:找出test2表上的外键约束名字
--2000
exec sp_helpconstraint 'test2'
--可以在constraint_name 属性中找到外键约束名字
--2005
select name  
from  sys.foreign_key_columns f join sys.objects o on f.constraint_object_id=o.object_id 
where f.parent_object_id=object_id('test2')
/*
name
---------------------------------
FK__test2__id__08EA5793*/

--第二步：删除外键约束
alter table test2 drop constraint FK__test2__id__08EA5793 

--第三步：检查表上是否还有外键约束
--只要使用第一步里面的查找语句即可

本文链接

IE6下PNG图片透明显示解决方法(From QQ)

2010-02-21T15:12:00Z

其实该问题网上一大堆解决办法，QQ首页也使用了，个人认为这种方法还是比较不错的

function loadPng(o)
{
    if(MiniSite.Browser.ie)
    {
        try
        {
            var img=o;
            var imgName=o.src.toUpperCase();
            if(imgName.substring(imgName.length-3,imgName.length)=="PNG")
            {
                var imgID=(img.id)?"id='"+img.id+"' ":"";
                var imgClass=(img.className)?"class='"+img.className+"' ":"";
                var imgTitle=(img.title)?"title='"+img.title+"' ":"title='"+img.alt+"' ";
                var imgStyle="display:inline-block;"+img.style.cssText;
                if(img.align=="left")imgStyle="float:left;"+imgStyle;
                if(img.align=="right")imgStyle="float:right;"+imgStyle;
                if(img.parentElement.href)imgStyle="cursor:hand;"+imgStyle;
                var strNewHTML="<span "+imgID+imgClass+imgTitle+" style=\""+"width:"+img.width+"px; height:"+img.height+"px;"+imgStyle+";"+"filter:progid:DXImageTransform.Microsoft.AlphaImageLoader"+"(src=\'"+img.src+"\', sizingMethod='image');\"></span>";
                img.outerHTML=strNewHTML;
            }
        }catch(e)
        {
        }
    }
}

调用的HTML如：

<div class="fl">
    <a href="http://my2010.qq.com/">
        <img src="http://mat1.gtimg.com/www/iskin09/iexpo.png" width="77" height="14" align="absmiddle"
            onload="loadPng(this)" style="margin-top: 4px; _margin-top: 2px;" />
    </a>
</div>

本文链接

用Regex类计算一个字符串出现次数是最好方法【转载】

2010-01-23T15:57:00Z

我的一个朋友问我，怎么在c#或vb.net中，计算一个字符串中查找另一个字符串中出现的次数，他说在网上打了好多方法，我看了一下，有的是用replace的方法去实现，这种方法不是太好，占资源太大了。其实如果用正则表达式Regex类，去计算一个字符串出现的次数方法最为简单实用。 using System.Text;using System.Text.RegularExpressions; string...

C#有关Session 操作的几个误区【转】

2009-12-14T03:33:00Z

1. this.Session["username"] = nullHttpSessionState 内部使用 NameObjectCollection 类型的集合对象来存储用户数据。因此使用 this.Session["username"] = null 仅仅是将该元素的值设为 null 而已，并没有真的将其从 Session 中移除。(为什么？晕~~~ 建议看看 C# 基础方面的书。)正确的方...

DataList绑定数据到泛型类(Dictionary) 【转】

2009-11-19T11:13:00Z

[代码]调用示例：[代码]原文：DataList绑定数据到泛型类(Dictionary)

重写Asp.NET2.0 TreeView的折叠/展开方法（TreeView_ToggleNode）

2009-11-15T14:42:00Z

项目中有一个需求，门户首页要嵌入一个带有TreeView的IFrame的页面，当树节点展开/折叠时，首页左侧的高度得随着树的高度而变化，所以就想到要重写树的折叠展开方法，于是Google之，果然有人这么干过：[代码]从上面的代码可以看出，通过重写TreeView_ToggleNode，可以为所欲为了，哈哈。同时，也可以学到在JS中如何去重写原有函数。原文链接：Overriding JavaScri...

javascript window.close() 去掉那讨厌的确认对话框【转】

2009-11-04T16:22:00Z

有人问起，怎么去掉js调用window.close()时怎么去掉那可恶的提示，咋一看好像还真不好弄，IE的安全机制好像就不允许通过脚本关闭本页面，但是IE好像可以允许js关闭弹出窗口，那我们是不是可以通过一定的技巧欺骗一下IE，绕过去呢。鼓捣了几下，似乎还真可以做到，直接上代码.只考虑是IE的问题，其他浏览器不知会怎么样，FF下是需要再配置一下的.[代码]原文链接：http://www.cnblo...

thickbox使用技巧【转】

2009-10-13T13:31:00Z

thickbox是一个不错的对话框插件，不过官方站提供的使用方法具限性很大。比如，我页面上有个缩略图，点击之后用thickbox显示大图。使用官方的方法：<a href="大图的URL" title="简介" class="thickbox"><img src="小图的URL" border="0"/></a>这种方法虽然方便，但局限性很大。第一、你必须为每个这...

jQuery操作checkbox的例子(全选,反选,获取选取值)【转】

2009-08-30T02:25:00Z

[代码]