博客园-信仰志http://www.cnblogs.com/drw/我们需要一个信仰，一个神！zh-cnMon, 13 Oct 2008 06:16:12 GMTMon, 13 Oct 2008 06:16:12 GMT60Visual Studio 2008 Service Pack 1 中文版终于有了http://www.cnblogs.com/drw/archive/2008/08/13/vs-2008-sp1-released.html七月(Lost)七月(Lost)Wed, 13 Aug 2008 03:47:00 GMThttp://www.cnblogs.com/drw/archive/2008/08/13/vs-2008-sp1-released.htmlhttp://www.cnblogs.com/drw/comments/1266676.htmlhttp://www.cnblogs.com/drw/archive/2008/08/13/vs-2008-sp1-released.html#Feedback2http://www.cnblogs.com/drw/comments/commentRss/1266676.htmlhttp://www.cnblogs.com/drw/services/trackbacks/1266676.html Microsoft Visual Studio 2008 Service Pack 1 (iso)
http://www.microsoft.com/downloads/details.aspx?displaylang=zh-cn&FamilyID=27673c47-b3b5-4c67-bd99-84e525b5ce61

Visual Studio 2008 Team Foundation Server Service Pack 1(iso)
http://www.microsoft.com/downloads/details.aspx?displaylang=zh-cn&FamilyID=9e40a5b6-da41-43a2-a06d-3cee196bfe3d

Microsoft .NET Framework 3.5 Service Pack 1
http://www.microsoft.com/downloads/details.aspx?displaylang=zh-cn&FamilyID=ab99342f-5d1a-413d-8319-81da479ab0d7


[新闻]Facebook创始人:信息共享或存摩尔定律
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>看完了奋斗。收集了一些经典语录http://www.cnblogs.com/drw/archive/2008/07/21/fendou.html七月(Lost)七月(Lost)Sun, 20 Jul 2008 19:06:00 GMThttp://www.cnblogs.com/drw/archive/2008/07/21/fendou.htmlhttp://www.cnblogs.com/drw/comments/1247284.htmlhttp://www.cnblogs.com/drw/archive/2008/07/21/fendou.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/1247284.htmlhttp://www.cnblogs.com/drw/services/trackbacks/1247284.html
一个人，一生中可能做过很多好事，他都会忘记。但等他到老的时候，真正记起来的是他做过的坏事。
什么叫坏事？
坏事就是那些，你怎么忘也忘不了的事儿，不管是出于什么原因，我们不得不犯下一些必须犯的错误，那些错误无法补救，也不会被忘记，而那些错误会令人忧伤，也许人生就是这样子啊。

女人喜欢你，有好坏两个方面，我希望你以后能够慎重对待，一个人能干成一件事，但同时，也能毁掉一件事，特别是女人，他们用另一种方式去思考，这你是没法把握的，而你能把握她们的原则，那就是向她们提供安全感与舒适感。
 
你对女人的爱护不会白白流走，她们真正的本事是给你生个孩子，那是人生最后的安慰。
 
一个生意人，一个成功的生意人，选择一个稳定的女人那是最重要的。
 
每个人，都只能年轻一次，这是人生最邪恶的地方。
 
有一天，你变老了，你可以不再轻信自己或者别人，你就可以逃过很多伤害，但你也因此失去了活力，失去猛地撞向尖刀的那种切切实实的SUO痛，没错，最终你是得到了平安，世故，那是逃避永恒痛苦的唯一方式
 
你不觉得这像鬼迷心窍吗？不错啊，如果换成是我的话，我也喜欢夏琳，很难找到不喜欢她的理由，是吗？
但是，别为她改变你自己，我希望你成功，叫她跟着你的生活节奏走，不然，你会因为失去自我而被她控制。

如果，你还在这个世界存在着，那么，这个世界无论什么样，对我都是有意义的；但如果你不在了，无论这个世界有多么好，它在我眼里也只是一片荒漠，而我就像是一个孤魂野鬼。



[新闻]微软承认Vista用户账户控制功能有问题
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>为幸福让道http://www.cnblogs.com/drw/archive/2007/04/14/give_way_for_blessedness.html七月(Lost)七月(Lost)Sat, 14 Apr 2007 13:27:00 GMThttp://www.cnblogs.com/drw/archive/2007/04/14/give_way_for_blessedness.htmlhttp://www.cnblogs.com/drw/comments/713588.htmlhttp://www.cnblogs.com/drw/archive/2007/04/14/give_way_for_blessedness.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/713588.htmlhttp://www.cnblogs.com/drw/services/trackbacks/713588.html        有人对司机说：“你关按喇叭不行，他们不可能给你让道的，倒不如从车队的空隙中冲过去。”
        司机回过头来，笑着说：“我按喇叭不时催他们给我退让，我是为他们祝福呢！”
        顿了顿，他又说：“别人结婚是件幸福的事。我们有机会为别人的幸福让一次道，这不也是一件幸福的事吗？”
        满车的乘客霎时安静下来了。
        给别人的幸福让道，是一件幸福的事----有这种心情的人，必定也是一个幸福的人。

今日文摘 2007年4月期62页

[新闻]资本寒冬侵袭中国视频网站 营销春天或不远
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>SQL取每课程前两名学生名单http://www.cnblogs.com/drw/archive/2007/04/12/sql_gettop2.html七月(Lost)七月(Lost)Wed, 11 Apr 2007 16:20:00 GMThttp://www.cnblogs.com/drw/archive/2007/04/12/sql_gettop2.htmlhttp://www.cnblogs.com/drw/comments/709783.htmlhttp://www.cnblogs.com/drw/archive/2007/04/12/sql_gettop2.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/709783.htmlhttp://www.cnblogs.com/drw/services/trackbacks/709783.html
CREATE TABLE 成绩表
(
学号 varchar(50) NULL,
课号 varchar(50) NULL,
成绩 decimal(18, 1) NULL
)

取每课号前两名的学号和成绩并按课号和成绩排序：
select 课号,学号,成绩 from 成绩表 as t1 where (select count(*) from成绩表 as t2 where t1.课号=t2.课号 and t1.成绩>t2.成绩)<2 order by 课号,成绩 desc


[新闻]金融风暴波及全球创业板 中国概念股难独善其身
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>sql server行转列问题终极解决http://www.cnblogs.com/drw/archive/2007/04/11/sqlserver_row_to_column.html七月(Lost)七月(Lost)Wed, 11 Apr 2007 05:42:00 GMThttp://www.cnblogs.com/drw/archive/2007/04/11/sqlserver_row_to_column.htmlhttp://www.cnblogs.com/drw/comments/708770.htmlhttp://www.cnblogs.com/drw/archive/2007/04/11/sqlserver_row_to_column.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/708770.htmlhttp://www.cnblogs.com/drw/services/trackbacks/708770.html网络文章，做个笔记

主要应用case语句来解决行转列的问题
行转列问题主要分为两类
1)简单的行转列问题:
示例表:
id  sid           course  result
1   2005001 语文     80.0
2   2005001 数学     90.0
3   2005001 英语     80.0
4   2005002 语文     56.0
5   2005002 数学     69.0
6   2005002 英语     89.0
执行
select sid,语文=isnull(sum(case course when '语文' then result end),0),
   数学=isnull(sum(case course when '数学' then result end),0),
   英语=isnull(sum(case course when '英语' then result end),0)
   from result
   group by sid
   order by sid
得出结果
sid           语文 数学 英语
2005001 80.0  90.0  80.0
2005002 56.0  69.0  89.0

2)较为复杂的行转列
表1:course
id name
1 语文
2 数学
3 英语
表2:result
id sid          course  result
1 2005001 语文      80.0
2 2005001 数学      90.0
3 2005001 英语      80.0
4 2005002 语文      56.0
5 2005002 数学      69.0
6 2005002 英语      89.0

declare @sql varchar(8000)
set @sql='select sid'
select @sql=@sql+','+course.name+'=isnull(sum(case course when '''+course.name+''' then result end),0)'
 from course order by id
set @sql=@sql+' from result group by sid order by sid'
print @sql
exec(@sql)

得出结果
sid           语文 数学 英语
2005001 80.0  90.0  80.0
2005002 56.0  69.0  89.0

文章来源：http://www.chinahtml.com/databases/2/2007/mssql117046784310795.shtml



[新闻]携程范敏：CEO从接发传真做起
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>使用C#验证台湾地区身份证号码http://www.cnblogs.com/drw/archive/2007/04/06/Validator_Taiwan_IdCard.html七月(Lost)七月(Lost)Fri, 06 Apr 2007 11:33:00 GMThttp://www.cnblogs.com/drw/archive/2007/04/06/Validator_Taiwan_IdCard.htmlhttp://www.cnblogs.com/drw/comments/703115.htmlhttp://www.cnblogs.com/drw/archive/2007/04/06/Validator_Taiwan_IdCard.html#Feedback3http://www.cnblogs.com/drw/comments/commentRss/703115.htmlhttp://www.cnblogs.com/drw/services/trackbacks/703115.html阅读全文

[新闻]2008年10月13日科技博客精选
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>web combo 的CSS实现方式http://www.cnblogs.com/drw/archive/2006/03/21/354486.html七月(Lost)七月(Lost)Mon, 20 Mar 2006 17:48:00 GMThttp://www.cnblogs.com/drw/archive/2006/03/21/354486.htmlhttp://www.cnblogs.com/drw/comments/354486.htmlhttp://www.cnblogs.com/drw/archive/2006/03/21/354486.html#Feedback1http://www.cnblogs.com/drw/comments/commentRss/354486.htmlhttp://www.cnblogs.com/drw/services/trackbacks/354486.html HTML代码
效果如下：

[新闻]Google Android手机大受欢迎,已经订出150万台
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>微软为顶级域名用户提供了免费邮局了。http://www.cnblogs.com/drw/archive/2006/03/01/340635.html七月(Lost)七月(Lost)Wed, 01 Mar 2006 12:38:00 GMThttp://www.cnblogs.com/drw/archive/2006/03/01/340635.htmlhttp://www.cnblogs.com/drw/comments/340635.htmlhttp://www.cnblogs.com/drw/archive/2006/03/01/340635.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/340635.htmlhttp://www.cnblogs.com/drw/services/trackbacks/340635.html微软开始为顶级域名用户提供免费的邮局。
支持创建60个邮箱账号。

有问题可以联系我MSN:bigway@5dz.net

Bring Your Own Domain

Already own your own Internet domain name?

Have us host e-mail and IM for you in a domain you already own.
  • Create up to 60 e-mail accounts within your domain
  • Get a 250 MB inbox for each account*
  • Check your e-mail from any Web-enabled PC
  • Junk e-mail filter protection using Microsoft SmartScreen technology
  • Virus scanning and cleaning of e-mail
  • Seamless access with MSN Messenger, MSN Spaces, etc.

    *250MB inbox available only in the 50 United States, District of Columbia, and Puerto Rico. Eligible Hotmail users will first receive 25MB at sign-up. Please allow at least 30 days for activation of your 250MB storage to verify your e-mail account and help prevent abuse. Microsoft Corporation reserves the right to provide 250MB inbox to free Hotmail accounts at its discretion.

    Click     here to setup e-mail for an existing domain today!



    • [新闻]13个大文件邮件传送服务
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    整理修改网上流传的C#农历类http://www.cnblogs.com/drw/archive/2006/02/26/338305.html七月(Lost)七月(Lost)Sun, 26 Feb 2006 14:18:00 GMThttp://www.cnblogs.com/drw/archive/2006/02/26/338305.htmlhttp://www.cnblogs.com/drw/comments/338305.htmlhttp://www.cnblogs.com/drw/archive/2006/02/26/338305.html#Feedback5http://www.cnblogs.com/drw/comments/commentRss/338305.htmlhttp://www.cnblogs.com/drw/services/trackbacks/338305.html
    最简单可以这样:Console.Write((new LunarDate(DateTime.Now)).ToString());

    演示

    代码如下


    这里的编辑器的代码着色功能好难用，IE死了好几次。。

    [新闻]微型博客Twitter取消IM服务 称其ROI差
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    简繁转换如此简单http://www.cnblogs.com/drw/archive/2005/07/07/188023.html七月(Lost)七月(Lost)Thu, 07 Jul 2005 09:29:00 GMThttp://www.cnblogs.com/drw/archive/2005/07/07/188023.htmlhttp://www.cnblogs.com/drw/comments/188023.htmlhttp://www.cnblogs.com/drw/archive/2005/07/07/188023.html#Feedback11http://www.cnblogs.com/drw/comments/commentRss/188023.htmlhttp://www.cnblogs.com/drw/services/trackbacks/188023.html发现一个蛮爽的方法：

    Public Function StrConv(ByVal str As String, ByVal Conversion As Microsoft.VisualBasic.VbStrConv, Optional ByVal LocaleID As Integer = 0) As String
         成员属于: Microsoft.VisualBasic.Strings

    摘要:
    返回按照指定转换的 String。

    参数:
    Str: 要转换的 String 表达式。
    Conversion: Microsoft.VisualBasic.VbStrConv。指定要执行的转换类型的枚举值。
    LocaleID: LocaleID 值（如果与系统 LocaleID 值不同）。（系统 LocaleID 值为默认值。）

    实现简体繁体转换就如此简单：
    简体转繁体：Microsoft.VisualBasic.Strings.StrConv(InputStr as String, VbStrConv.TraditionalChinese)
    繁体转简体：Microsoft.VisualBasic.Strings.StrConv(InputStr as String, VbStrConv.SimplifiedChinese)



    [新闻]用手机聊Gtalk的方法以及应用总结
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    生成数据分页SQL语句http://www.cnblogs.com/drw/archive/2005/05/23/160738.html七月(Lost)七月(Lost)Sun, 22 May 2005 16:31:00 GMThttp://www.cnblogs.com/drw/archive/2005/05/23/160738.htmlhttp://www.cnblogs.com/drw/comments/160738.htmlhttp://www.cnblogs.com/drw/archive/2005/05/23/160738.html#Feedback0http://www.cnblogs.com/drw/comments/commentRss/160738.htmlhttp://www.cnblogs.com/drw/services/trackbacks/160738.html
    Public Class DataHelper

            ''' <summary>SQL语句处理数据分页</summary>
        ''' <param name="pageSize">分量，每页纪录数量</param>
        ''' <param name="pageIndex">当前页</param>
        ''' <param name="recordCount">纪录总数</param>
        ''' <param name="tableName">选取的数据表</param>
        ''' <param name="Fields">选取的数据字段</param>
        ''' <param name="primaryKey">字段主键</param>
        ''' <param name="ascending">是否正向排序</param>
        ''' <param name="condition">选取条件，Where字句</param>
        ''' <returns>返回SQL语句</returns>
        Public Shared Function Paging(ByVal pageSize As Integer, ByVal pageIndex As Integer, ByVal recordCount As Integer, ByVal tableName As String, ByVal Fields As String, ByVal primaryKey As String, ByVal ascending As Boolean, ByVal condition As String) As String
                Dim sb As System.Text.StringBuilder = New System.Text.StringBuilder
                Dim pageCount As Integer = GetPageCount(recordCount, pageSize)
                Dim middleIndex As Integer = GetMidPageIndex(pageCount)
                Dim firstIndex As Integer = 0
                Dim lastIndex As Integer = pageCount - 1

                If pageIndex <= firstIndex Then
                    Dim sql As String = "SELECT TOP {0} {1} FROM {2} WHERE {3} ORDER BY {4} {5}"
                sb.AppendFormat(sql, pageSize, Fields, tableName, condition, primaryKey, GetSortType(ascending))
                ElseIf pageIndex > firstIndex AndAlso pageIndex <= middleIndex Then
                    Dim sql As String = "SELECT TOP {0} {1} FROM {2} WHERE {3} < (SELECT MIN({3}) FROM (SELECT TOP {4} {3} FROM {2} WHERE {5} ORDER BY {3} DESC) ta) ORDER BY {3} DESC"
                If ascending Then sql = "SELECT TOP {0} {1} FROM {2} WHERE {3} > (SELECT MAX({3}) FROM (SELECT TOP {4} {3} FROM {2} WHERE {5} ORDER BY {3} ASC) ta) ORDER BY {3} ASC"
                sb.AppendFormat(sql, pageSize, Fields, tableName, primaryKey, pageSize * pageIndex, condition)
                ElseIf pageIndex > middleIndex AndAlso pageIndex < lastIndex Then
                    Dim sql As String = "SELECT * FROM (SELECT TOP {0} {1} FROM {2} WHERE {3} > (SELECT MAX({3}) FROM (SELECT TOP {4} {3} FROM {2} WHERE {5} ORDER BY {3} ASC ) ta) ORDER BY {3} ASC) tb ORDER BY {3} DESC"
                If ascending Then sql = "SELECT * FROM (SELECT TOP {0} {1} FROM {2} WHERE {3} < (SELECT MIN({3}) FROM (SELECT TOP {4} {3} FROM {2} WHERE {5} ORDER BY {3} DESC) ta) ORDER BY {3} DESC)  tb ORDER BY {3} ASC"
                sb.AppendFormat(sql, pageSize, Fields, tableName, primaryKey, recordCount - pageSize * (pageIndex + 1), condition)
                ElseIf pageIndex >= lastIndex Then
                    Dim sql As String = "SELECT * FROM (SELECT TOP {0} {1} FROM {2} WHERE {3} ORDER BY {4} {5}) ta ORDER BY {4} {6}"
                sb.AppendFormat(sql, recordCount - pageSize * lastIndex, Fields, tableName, condition, primaryKey, GetSortType(Not ascending), GetSortType(ascending))
                End If
                Return sb.ToString
            End Function

            Public Shared Function GetPageCount(ByVal recordCount As Integer, ByVal pageSize As Integer) As Integer
                Return CType(Math.Ceiling(CType(recordCount, Double) / pageSize), Integer)
            End Function

            Public Shared Function GetMidPageIndex(ByVal pageCount As Integer) As Integer
                Return CType(Math.Ceiling(CType(pageCount, Double) / 2), Integer) - 1
            End Function

            Public Shared Function GetSortType(ByVal ascending As Boolean) As String
                Return (Microsoft.VisualBasic.IIf(ascending, "ASC", "DESC"))
            End Function

    End Class

    PS:在ACCESS下我比较喜欢使用查询代替直接使用复杂的SQL语句，觉得设计方便，使用也方便，不知道对性能有什么影响。

    [新闻]Google开拓美政府机构市场 微软业务受冲击
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    Asp.Net 控件 PopComboBoxhttp://www.cnblogs.com/drw/archive/2004/12/13/76607.html七月(Lost)七月(Lost)Mon, 13 Dec 2004 14:03:00 GMThttp://www.cnblogs.com/drw/archive/2004/12/13/76607.htmlhttp://www.cnblogs.com/drw/comments/76607.htmlhttp://www.cnblogs.com/drw/archive/2004/12/13/76607.html#Feedback7http://www.cnblogs.com/drw/comments/commentRss/76607.htmlhttp://www.cnblogs.com/drw/services/trackbacks/76607.htmlDemo and Src:http://www.aiyao.net/filedownload/PopComboBox/
    PicPriview:
     

    注:js代码参照 海洋工作室 的 PopMenu2.01

    [新闻]消息称苹果正在开发iTunes网络电视
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    Web 站点文件管理http://www.cnblogs.com/drw/archive/2004/10/22/55380.html七月(Lost)七月(Lost)Fri, 22 Oct 2004 03:05:00 GMThttp://www.cnblogs.com/drw/archive/2004/10/22/55380.htmlhttp://www.cnblogs.com/drw/comments/55380.htmlhttp://www.cnblogs.com/drw/archive/2004/10/22/55380.html#Feedback18http://www.cnblogs.com/drw/comments/commentRss/55380.htmlhttp://www.cnblogs.com/drw/services/trackbacks/55380.html









    [新闻]微软周一开电话会议 预计将发布Silverlight2.0
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    Some Client Scripthttp://www.cnblogs.com/drw/archive/2004/09/04/39678.html七月(Lost)七月(Lost)Sat, 04 Sep 2004 10:31:00 GMThttp://www.cnblogs.com/drw/archive/2004/09/04/39678.htmlhttp://www.cnblogs.com/drw/comments/39678.htmlhttp://www.cnblogs.com/drw/archive/2004/09/04/39678.html#Feedback4http://www.cnblogs.com/drw/comments/commentRss/39678.htmlhttp://www.cnblogs.com/drw/services/trackbacks/39678.html
    Function postXMLData(PostData,targetUrl)
            Dim oXml,oData,oUrl
            Set oXml = CreateObject("Microsoft.XMLHTTP")
        oData     =PostData
        oUrl    =targetUrl
        oXml.Open(    "post",oUrl,false)
        oXml.setrequestheader(    "content-length",len(oData))
        oXml.setrequestheader(    "content-type","application/x-www-form-urlencoded")
        oXml.send(oData)
        postXMLData = oXML.responseText 
    End Function

    Function URLEncoding(vstrIn)
            Dim strReturn,ThisChr,innerCode,Hight8,Low8
        strReturn     = ""
        For i = 1 To Len(vstrIn)
            ThisChr     = Mid(vStrIn,i,1)
                If Abs(Asc(ThisChr)) < &HFF Then
                strReturn     = strReturn & ThisChr
                Else
                innerCode     = Asc(ThisChr)
                    If innerCode < 0 Then
                    innerCode     = innerCode + &H10000
                    End If
                Hight8     = (innerCode  And &HFF00) &HFF
                Low8     = innerCode And &HFF
                strReturn     = strReturn & "%" & Hex(Hight8) &  "%" & Hex(Low8)
                End If
            Next
        URLEncoding     = strReturn
    End Function

    Function bytes2BSTR(vIn)
            Dim strReturn,ThisCharCode,NextCharCode
        strReturn     = ""
        For i = 1 To LenB(vIn)
            ThisCharCode     = AscB(MidB(vIn,i,1))
                If ThisCharCode < &H80 Then
                strReturn     = strReturn & Chr(ThisCharCode)
                Else
                NextCharCode     = AscB(MidB(vIn,i+1,1))
                strReturn     = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
                i     = i + 1
                End If
            Next
        bytes2BSTR     = strReturn
    End Function


    [新闻]开心网即将启用”shejiao.com”?
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>    今天的对话http://www.cnblogs.com/drw/archive/2004/06/18/16957.html七月(Lost)七月(Lost)Fri, 18 Jun 2004 09:15:00 GMThttp://www.cnblogs.com/drw/archive/2004/06/18/16957.htmlhttp://www.cnblogs.com/drw/comments/16957.htmlhttp://www.cnblogs.com/drw/archive/2004/06/18/16957.html#Feedback3http://www.cnblogs.com/drw/comments/commentRss/16957.htmlhttp://www.cnblogs.com/drw/services/trackbacks/16957.html我BOSS问我有没有女朋友，
    我说没有。

    你知道他怎么说吗？
     
    他说：不用急，等你三十岁的时候，
    那些二十岁的都是你的。

    哈哈哈，听得我好舒坦。



    [新闻]Google股价跌破329美元 61%员工期权价值归零
    博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>