日志

我们在写软件的时候，经常要记录一些登陆信息、删除信息之类，便于日后查询。我简单写了一个针对日志文件的类，可以通过此类可以自定义日志文件名称，当日志达到规定大小时，自动备份，路径可以自行定义具体如下：
命名空间：

using System;
using System.Web;
using System.IO;
using System.Text;

具体实现：
public class LogFile
 {
  protected string LogfileName; // 文件名称
  protected string LogPath = "../upedFile"; // 文件路径
  protected int LogMaxContent = 2048; // 文件大小
  protected string InputContent;  // 具体内容

  public LogFile()
  {

  }

  public LogFile(string StrLogfileName,string StrInputContent,string StrLogPath)
  {
   LogfileName  = StrLogfileName;
   InputContent = StrInputContent;
   LogPath = StrLogPath;

  }

  public  void LogWrite()
  {
   // string PathName = System.Web.HttpContext.Current.Server.MapPath(LogPath) + LogfileName;
   string PathName = System.Web.HttpContext.Current.Server.MapPath(LogPath) + "\\" + LogfileName;
   FileInfo Finfo = new FileInfo(PathName);

   string PathNameMove = PathName.Substring(0,PathName.LastIndexOf("\\"))+"\\" + DateTime.Now.ToString("yyyyMMddhhmm") + LogfileName;
      
   if( Finfo.Exists && Finfo.Length > LogMaxContent ) // 如果超出，重名名
   {
    Finfo.CopyTo(PathNameMove);
    Finfo.Delete();
   }

   try
   {
    using(FileStream Fs = Finfo.OpenWrite())
    {
     StreamWriter Sw = new StreamWriter(Fs);
   
     Sw.BaseStream.Seek(0, SeekOrigin.End); //设置写数据流的起始位置为文件流的末尾
   
     StringBuilder StrInput = new StringBuilder(); // 记录写入的内容
     StrInput.Append("\r\n Log Entry : ");
     StrInput.Append(DateTime.Now.ToString());
     StrInput.Append("\r\n");
     StrInput.Append(InputContent + "\r\n");
     StrInput.Append("------------------------------------\n");

     Sw.Write(StrInput);   
     Sw.Flush();   
     Sw.Close();
    }
   }
   catch
   {
    System.Web.HttpContext.Current.Response.Write("<script language=javascript>alert('日志创建失败')</script>");
   }

  }
CREATE PROCEDURE CN5135_SP_Pagination
/*
***************************************************************
** 千万数量级分页存储过程 **
***************************************************************
参数说明:
1.Tables :表名称,视图
2.PrimaryKey :主关键字
3.Sort :排序语句，不带Order By 比如：NewsID Desc,OrderRows Asc
4.CurrentPage :当前页码
5.PageSize :分页尺寸
6.Filter :过滤语句，不带Where
7.Group :Group语句,不带Group By
效果演示：http://www.cn5135.com/_App/Opportunities/QueryResult.aspx
***************************************************************/
(
@Tables varchar(1000),
@PrimaryKey varchar(100),
@Sort varchar(200) = NULL,
@CurrentPage int = 1,
@PageSize int = 10,
@Fields varchar(1000) = '*',
@Filter varchar(1000) = NULL,
@Group varchar(1000) = NULL
)
AS
/*默认排序*/
IF @Sort IS NULL OR @Sort = ''
SET @Sort = @PrimaryKey
DECLARE @SortTable varchar(100)
DECLARE @SortName varchar(100)
DECLARE @strSortColumn varchar(200)
DECLARE @operator char(2)
DECLARE @type varchar(100)
DECLARE @prec int
/*设定排序语句.*/
IF CHARINDEX('DESC',@Sort)>0
BEGIN
SET @strSortColumn = REPLACE(@Sort, 'DESC', '')
SET @operator = '<='
END
ELSE
BEGIN
IF CHARINDEX('ASC', @Sort) = 0
SET @strSortColumn = REPLACE(@Sort, 'ASC', '')
SET @operator = '>='
END
IF CHARINDEX('.', @strSortColumn) > 0
BEGIN
SET @SortTable = SUBSTRING(@strSortColumn, 0, CHARINDEX('.',@strSortColumn))
SET @SortName = SUBSTRING(@strSortColumn, CHARINDEX('.',@strSortColumn) + 1, LEN(@strSortColumn))
END
ELSE
BEGIN
SET @SortTable = @Tables
SET @SortName = @strSortColumn
END
SELECT @type=t.name, @prec=c.prec
FROM sysobjects o
JOIN syscolumns c on o.id=c.id
JOIN systypes t on c.xusertype=t.xusertype
WHERE o.name = @SortTable AND c.name = @SortName
IF CHARINDEX('char', @type) > 0
SET @type = @type + '(' + CAST(@prec AS varchar) + ')'
DECLARE @strPageSize varchar(50)
DECLARE @strStartRow varchar(50)
DECLARE @strFilter varchar(1000)
DECLARE @strSimpleFilter varchar(1000)
DECLARE @strGroup varchar(1000)
/*默认当前页*/
IF @CurrentPage < 1
SET @CurrentPage = 1
/*设置分页参数.*/
SET @strPageSize = CAST(@PageSize AS varchar(50))
SET @strStartRow = CAST(((@CurrentPage - 1)*@PageSize + 1) AS varchar(50))
/*筛选以及分组语句.*/
IF @Filter IS NOT NULL AND @Filter != ''
BEGIN
SET @strFilter = ' WHERE ' + @Filter + ' '
SET @strSimpleFilter = ' AND ' + @Filter + ' '
END
ELSE
BEGIN
SET @strSimpleFilter = ''
SET @strFilter = ''
END
IF @Group IS NOT NULL AND @Group != ''
SET @strGroup = ' GROUP BY ' + @Group + ' '
ELSE
SET @strGroup = ''
/*执行查询语句*/
EXEC(
'
DECLARE @SortColumn ' + @type + '
SET ROWCOUNT ' + @strStartRow + '
SELECT @SortColumn=' + @strSortColumn + ' FROM ' + @Tables + @strFilter + ' ' + @strGroup + ' ORDER BY ' + @Sort + '
SET ROWCOUNT ' + @strPageSize + '
SELECT ' + @Fields + ' FROM ' + @Tables + ' WHERE ' + @strSortColumn + @operator + ' @SortColumn ' + @strSimpleFilter + ' ' + @strGroup + ' ORDER BY ' + @Sort + '
'
)
GO

郑重警告：本文只供男性人士观看，如果您的性别是非MALE，请迅速离开。如果您坚持继续观看，由此造成的一切后果均由您本人负责，本文作者不承担任何责任

 

 

１、一日和去杭州玩，在净寺前看放生池（就是一个有无数乌龟的池子），看到满池乌龟在游泳只露个脑袋在水面，可爱的mm兴奋的大呼：“哇~好多的**！！！“偶当场笑昏过去随即脸暴红......

　　２、一天，带着新领的笔记本电脑上班，一个美女同事过来欣赏机器。看完了机器又看电脑包，然后突然说了史上第二强的笑话：“你的包皮好软阿！”  为什么是第二强的呢？因为正在我大惊失色，目瞪口呆之余，她又说了史上最强的笑话：“让我翻开看看。”！！！当即吐血数升，人事不省。

　　３、某地某人的签名档有一只小鸡。 
　　某年某月某日一个跟贴：你的小鸡鸡好可爱哦^0^ 

　　４、初中时候的事情：下课的时候我们一群人在讲笑话，（有男有女）当然是一个很老的笑话：“从前有一个太监……”接着住口，不讲了，问：“下面呢？”我说：“下面？下面嘛……没有了……”众人大笑，一分钟后，也是这个问：“下面为什么没有了？？？”我：“………………”

　　５、有一次在宿舍谈论做饭得问题，一个兄弟得GF也在。我们说现在小伙子一般都会做饭，小姑娘一般都不会。那个说：“我会做，我会做鸡呢！”众人窃笑。MM不明其意，理直气壮得说：“我真得会做鸡！”。众人忍不已夺门而出,追至门外，站在走廊上喊：“我就是会做鸡吗！！！  "。众人大骇，落荒而逃。

简直糗死人了--女士勿看的趣事数
　　６、我读本科的时候，上机实习课之前，负责管理机房的MM问我们的老师（男）借了一把螺丝刀去拆一台机器（在另外一个房间），结果我们正上机的时候，她站在机房门口，对我那老师大叫：“老师！你那东西真不好用！！”众人翻~~~~~~~~~

　　７、一天，姐姐和弟弟去上学，在坐车的时候，看见两只狗在交配。弟弟就问姐姐那是在干什么。“在打架啦”姐姐赶忙敷衍他。这时姐姐发现有两个小流氓老看她，眼光还在她身上扫来扫去的。“看什么看，想打架呀？”姐姐大声的说。

　　８、还有还有，学校开运动会，mm们坐在草地上观看。这时候，有个gg好心借到太阳伞过来。一个mm看到后大喜：“快快，插在我后面，插在我后面！！”见到gg面色有异，于是改口：“快把太阳伞插在我后面！！”众倒…… 

　　９、一次和我MM还有二个朋友（一对）一起开车去外地玩，路途很长。。。回来时我和我MM坐后面，由于前一晚睡得时间少，上路没多久就想呼呼了，于事*在MM身上呼呼了一个小时间，醒来精神一爽~！没想到MM也累了说到：“我被你睡过了，现在轮到你让我睡了。”前面我的朋友立马停车、开门、闪一边狂笑去了。。。。?我真不知道该说什么好~~ 
　　MM还眼睛大大的没反应过来~~！

　　１０、想起一件往事，初中时班里某BT给一个天真纯洁的小姑娘出H谜语，谜面是“新婚之夜——打一历史名人”，答案是“查理一世”。小姑娘当然猜不出，于是该BT狂笑，得意洋洋地公布谜底。没想到……小姑娘穷追猛打，一直追着该BT问：“为什么是查理一世呢？为什么呢？你给我解释一下好不好？我真的不明白啊！”该BT于是元气大伤，打那以后对小姑娘畏如蛇蝎，再也不敢当她面讲H故事…………