博客园-不惊了's bloghttp://www.cnblogs.com/ftingchn/记住我生活和工作中留下的每一个脚印……zh-cnThu, 28 Aug 2008 02:01:55 GMTThu, 28 Aug 2008 02:01:55 GMT60获取某文件夹下的目录http://www.cnblogs.com/ftingchn/archive/2007/12/17/1003620.html不惊了不惊了Mon, 17 Dec 2007 12:55:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/12/17/1003620.htmlhttp://www.cnblogs.com/ftingchn/comments/1003620.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/12/17/1003620.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/1003620.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/1003620.html 

DirectoryInfo dirinfo = new DirectoryInfo(Server.MapPath("upload"));
        FileSystemInfo[] dirs = dirinfo.GetFileSystemInfos();
        if (dirs.Length > 1)
        {
            DropDownList1.DataSource = dirs;
            DropDownList1.DataBind();
        }


[新闻]Google Gears覆盖四大浏览器 Safari版推出]]>下雪了，虽然冷，但感觉不错http://www.cnblogs.com/ftingchn/archive/2007/12/10/989323.html不惊了不惊了Mon, 10 Dec 2007 05:22:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/12/10/989323.htmlhttp://www.cnblogs.com/ftingchn/comments/989323.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/12/10/989323.html#Feedback3http://www.cnblogs.com/ftingchn/comments/commentRss/989323.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/989323.html早上起来，还听同学说是下雨了，拿着伞一出门才知道是下雪了，虽然有点冷，但我还是喜欢下雪。
感觉很舒服。今天早上快到九点，天儿才亮起来。
期待一场大雪到来，HOHO~~

[新闻]Internet Explorer 8 Beta 2 发布]]>给图片加图片水印 (采用ASPJPEG组件)http://www.cnblogs.com/ftingchn/archive/2007/12/06/985281.html不惊了不惊了Thu, 06 Dec 2007 06:31:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/12/06/985281.htmlhttp://www.cnblogs.com/ftingchn/comments/985281.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/12/06/985281.html#Feedback1http://www.cnblogs.com/ftingchn/comments/commentRss/985281.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/985281.html<%
' --------------------------------------------------
' 功能: 给图片加图片水印 (采用ASPJPEG组件)
' 作者：不惊了 by 2007.12.5
' 参数: img：原图路径    logo：水印路径
' 说明: 加水印后的图覆盖原图
' 调用：Call Create_Watermark("images/01.jpg","images/logo.gif")
' --------------------------------------------------
Sub Create_Watermark(img,logo)
    Set Jpeg = Server.CreateObject("Persits.Jpeg")
    '读取原图片 
    Jpeg.Open Server.MapPath(img)
    Set Watermark = Server.CreateObject("Persits.Jpeg") 
    '读取添加的图片 
    Watermark.open Server.MapPath(logo) 
    '水印的x,y位置
    x=cint(Jpeg.originalwidth-Watermark.Width) 
    y=cint(Jpeg.originalheight-Watermark.Height)
    '添加水印
    Jpeg.DrawImage x, y, Watermark,0.5,&Hffffff
    '生成后的图片
    Jpeg.Save Server.MapPath(img) 
    Set Watermark=Nothing 
    set Jpeg=Nothing
End Sub
%>

[新闻]中国软件协会：SAP羞辱国产软件是不正当竞争]]>嘿嘿，中午给ewebeditor加了一个插入运行代码按钮http://www.cnblogs.com/ftingchn/archive/2007/06/28/799140.html不惊了不惊了Thu, 28 Jun 2007 08:46:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/06/28/799140.htmlhttp://www.cnblogs.com/ftingchn/comments/799140.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/06/28/799140.html#Feedback2http://www.cnblogs.com/ftingchn/comments/commentRss/799140.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/799140.html1.在数据库中添加一条按钮的相关配置
   数据库的字段和其它的一样就行:
   B_Code:按钮的代码，随便取
   B_Title:鼠标滑过提示
   B_Image:按钮的图标，放在ButtonImage\standard文件夹下
   B_Event:insert('nextpage')//这个地方的nextpage和Editor.js中的case "nextpage"对应
   B_Class:Btn，跟其它的一样就行
   B_Order:这个按钮的位置排序


2.copy一个样式，因为默认的不能保存设置


在设置工具栏的时候就会在左边框中多出一个按钮的选项来

向右添加保存后，预览一下吧，发现了那个新添加的按钮了吧。此时的按钮只是出来了，但不具备功能


3.需在Editor.js文件中找到“插入特殊对象”这个函数，然后加上你自己的代码
case "nextpage":
 insertHTML("{nextpage}");
 break;


注意，更改过数据库中的按钮的相关信息后，要重新设置工具栏下的此按钮才有效
再添加了一个运行代码框的按钮

就是这么简单，我们可以根据这个来DIY自己的编辑器了



[新闻]福布斯：Facebook网站十大最火爆游戏]]>真正的简转繁http://www.cnblogs.com/ftingchn/archive/2007/06/09/777298.html不惊了不惊了Sat, 09 Jun 2007 02:18:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/06/09/777298.htmlhttp://www.cnblogs.com/ftingchn/comments/777298.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/06/09/777298.html#Feedback1http://www.cnblogs.com/ftingchn/comments/commentRss/777298.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/777298.html 

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using Microsoft.VisualBasic;
using System.IO;

public partial class _Default : System.Web.UI.Page
{
    protected override void Render(HtmlTextWriter writer)
    {
        StringWriter stringWriter = new StringWriter();
        HtmlTextWriter htmlWriter = new HtmlTextWriter(stringWriter);
        base.Render(htmlWriter);
        string content = stringWriter.ToString();
        //用Strings类的StrConv方法,其中TraditionalChinese是VisualBasic中的一个枚举
        string tw = Strings.StrConv(content, VbStrConv.TraditionalChinese, 0);
        Response.Write(tw);
    }
    protected void Page_Load(object sender, EventArgs e)
    {
        
    }
}


[新闻]谷歌允许用户评论搜索结果调整顺序]]>DropDownList绑定数据源后,如何设置选中项http://www.cnblogs.com/ftingchn/archive/2007/05/06/736920.html不惊了不惊了Sun, 06 May 2007 02:38:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/05/06/736920.htmlhttp://www.cnblogs.com/ftingchn/comments/736920.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/05/06/736920.html#Feedback3http://www.cnblogs.com/ftingchn/comments/commentRss/736920.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/736920.html我按以下方法未能实现,我的代码如下:
<asp:DropDownList ID="DropDownList1" runat="server" AutoPostBack="True" DataSourceID="SqlDataSource1"
                DataTextField="subject" DataValueField="id" OnSelectedIndexChanged="DropDownList1_SelectedIndexChanged">
            </asp:DropDownList>

<asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:strconn %>"
            SelectCommand="SELECT [id], [subject] FROM [web_about]"></asp:SqlDataSource>

CS文件中来设置选中项:
protected void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
        {
         string id=Request.QueryString["id"];
            DropDownList1.SelectedIndex = DropDownList1.Items.IndexOf(DropDownList1.Items.FindByValue(id));
        }
    }

protected void DropDownList1_SelectedIndexChanged(object sender, EventArgs e)
    {
        Response.Redirect(Request.Path + "?id=" + DropDownList1.SelectedItem.Value);
    }
但以上的方法在不绑定数据源的情况下正常:
<asp:DropDownList ID="DropDownList1" runat="server" OnSelectedIndexChanged="DropDownList1_SelectedIndexChanged"
                    AutoPostBack="True">
                    <asp:ListItem Value="1">选项一</asp:ListItem>
                    <asp:ListItem Value="2">选项二</asp:ListItem>
                </asp:DropDownList>
由于初学.NET,不知是什么原因?

[新闻]Internet 另一超级漏洞被公布]]>五一小3ie随拍http://www.cnblogs.com/ftingchn/archive/2007/05/05/736364.html不惊了不惊了Sat, 05 May 2007 08:02:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/05/05/736364.htmlhttp://www.cnblogs.com/ftingchn/comments/736364.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/05/05/736364.html#Feedback6http://www.cnblogs.com/ftingchn/comments/commentRss/736364.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/736364.html

景德镇的"出师表"



人民大会堂



[新闻]3 个独特的未来搜索引擎]]>"回发或回调参数无效"的错误,何解http://www.cnblogs.com/ftingchn/archive/2007/01/24/628801.html不惊了不惊了Wed, 24 Jan 2007 03:05:00 GMThttp://www.cnblogs.com/ftingchn/archive/2007/01/24/628801.htmlhttp://www.cnblogs.com/ftingchn/comments/628801.htmlhttp://www.cnblogs.com/ftingchn/archive/2007/01/24/628801.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/628801.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/628801.html这个侧边栏就是什么最新文章,最新评论啊什么的,我全部放在自定义控件里的,然后在控件里将数据绑定到Repeater上,但在内容页提交评论时会报"回发或回调参数无效"的错误,何解
在网上搜索过,但都说是下拉列表和AJAX的问题,但我现在的情况不在这两种之内
寻找原因中...


[新闻]诺基亚新机N85 N79发布]]>跟我一起做 击退眼睛疲劳的五大运动http://www.cnblogs.com/ftingchn/archive/2006/05/25/408847.html不惊了不惊了Thu, 25 May 2006 04:54:00 GMThttp://www.cnblogs.com/ftingchn/archive/2006/05/25/408847.htmlhttp://www.cnblogs.com/ftingchn/comments/408847.htmlhttp://www.cnblogs.com/ftingchn/archive/2006/05/25/408847.html#Feedback1http://www.cnblogs.com/ftingchn/comments/commentRss/408847.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/408847.html1.眼珠运动法

头向上下左右旋转时，眼珠也跟着一起移动



2.眨眼法

头向后仰并不停的眨眼，使血液畅通。眼睛轻微疲劳时，只要做2~3次眨眼运动即可



3.热冷敷交替法

一条毛巾浸比洗澡水还要热一点的热水，另一条毛巾浸加了冰块的冷水，先把热毛巾放在眼睛上约五分钟，然后再放冷毛巾五分钟。




4.眼睛体操

中指指向眼窝和鼻梁间，手掌盖脸来回摩擦五分钟。然后脖子各项左右慢慢移动，接着闭上双眼，握拳轻敲后颈部十下。



5.看远看近法

看远方三分钟，再看手掌1~2分钟，然后再看远方。这样远近交换几次，可以有效消除眼睛疲劳。



有没有效果？先试试吧！


[新闻]数据库市场:微软和甲骨文快速进步 威胁IBM]]>如何将来访者的IP及其它信息生成一张图片http://www.cnblogs.com/ftingchn/archive/2006/04/18/378018.html不惊了不惊了Tue, 18 Apr 2006 03:56:00 GMThttp://www.cnblogs.com/ftingchn/archive/2006/04/18/378018.htmlhttp://www.cnblogs.com/ftingchn/comments/378018.htmlhttp://www.cnblogs.com/ftingchn/archive/2006/04/18/378018.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/378018.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/378018.htmlusing System; 
using System.Collections; 
using System.ComponentModel; 
using System.Data; 
using System.Drawing; 
using System.Web; 
using System.Web.SessionState; 
using System.Web.UI; 
using System.Web.UI.WebControls; 
using System.Web.UI.HtmlControls; 
using System.IO; 
namespace WebApplication4 
{ 
 /// <summary> 
 /// ip µÄժҪ˵Ã÷¡£ 
 /// </summary> 
 public class ip : System.Web.UI.Page 
 { 
   
  private void Page_Load(object sender, System.EventArgs e) 
  { 
   string str = System.Web.HttpContext.Current.Request.QueryString["word"]; 
   bool cusWord=false; 
   //如果没有自定义文字则不显示,否则只显示前30位 
   if((str==null)||(str.Trim().Length==0)) 
   { 
    str = ""; 
   } 
   else 
   { 
    if(str.Length>30) 
    { 
     str = str.Substring(0,30)+""; 
    } 
    string badword =System.Configuration.ConfigurationSettings.AppSettings["badwords"]; 
    //过滤不健康词语 
    for(int i=0;i<badword.Split(’|’).Length;i++) 
    { 
     str = str.Replace(badword.Split(’|’)[i],"[脏话,已被过滤]"); 
    } 
    cusWord=true; 
   } 
   //获取来访者的相关信息 
   string IP = "Your IP:"+Request.UserHostAddress; 
   string Language = "Language:" + Request.UserLanguages[0]; 
   string OS = "Your Os:" +Request.Browser.Platform; 
   string Browser = "Browser:" + Request.Browser.Browser + " " + Request.Browser.Version; 
    
   //初始化一个Image对象 
   System.Drawing.Image copyImage = System.Drawing.Image.FromFile(Server.MapPath("ip.jpg")); 
   Graphics g = Graphics.FromImage(copyImage); 
   g.DrawImage(copyImage, 0, 0, copyImage.Width, copyImage.Height); 
   Font f = new Font("courier new",8,System.Drawing.FontStyle.Bold); 
   Font f1 = new Font("宋体",9,System.Drawing.FontStyle.Underline); 
   Brush b1 = new SolidBrush(Color.Blue); 
   Brush b2 = new SolidBrush(Color.Red); 
   Brush b3 = new SolidBrush(Color.Green); 
   Brush b4 = new SolidBrush(Color.Black); 
   if(cusWord) 
   { 
    g.DrawString(str, f1, b4, 80, 5); 
    g.DrawString(IP, f, b1, 80, 18); 
    g.DrawString(OS, f, b2, 80, 30); 
    g.DrawString(Language, f, b2, 80, 42); 
    g.DrawString(Browser, f, b3, 80, 54); 
   } 
   else 
   { 
    g.DrawString(IP, f, b1, 80, 10); 
    g.DrawString(OS, f, b2, 80, 25); 
    g.DrawString(Language, f, b2, 80, 40); 
    g.DrawString(Browser, f, b3, 80, 55); 
   } 
   g.Dispose(); 
   System.IO.MemoryStream ms = new System.IO.MemoryStream(); 
   copyImage.Save(ms,System.Drawing.Imaging.ImageFormat.Jpeg); 
   Response.ClearContent(); 
   Response.ContentType = "image/Jpeg"; 
   Response.BinaryWrite(ms.ToArray()); 

  } 
  Web 
 } 
}

[新闻]深度分析：全球千亿美元市值IT企业7月榜单点评]]>如何让FLASH不遮住层http://www.cnblogs.com/ftingchn/archive/2006/04/10/371212.html不惊了不惊了Mon, 10 Apr 2006 04:56:00 GMThttp://www.cnblogs.com/ftingchn/archive/2006/04/10/371212.htmlhttp://www.cnblogs.com/ftingchn/comments/371212.htmlhttp://www.cnblogs.com/ftingchn/archive/2006/04/10/371212.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/371212.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/371212.html        今天做一网站，上面的FLASH老是遮住下拉菜单的层，无奈之下百度了一下，在有风的日子里找到了解决方法：DW中，插入Flash动画，然后在其属性面板中，点parameters，添加参数wmode，值为transparent；
或者直接修改网页的代码，在定义SWF文件属性的代码中添加：
<param name="wmode" value="transparent">
不过这种效果只有IE支持。

制作半透明的层，定义它的Alpha值：
.halfalpha { background-color: #000000; filter: Alpha(Opacity=50)}

然后在层标签中加<div class="halfalpha">



[新闻]中移动上半年净利549亿元 每天盈利3亿]]>SQL的保留字查询http://www.cnblogs.com/ftingchn/archive/2006/04/08/370104.html不惊了不惊了Sat, 08 Apr 2006 09:24:00 GMThttp://www.cnblogs.com/ftingchn/archive/2006/04/08/370104.htmlhttp://www.cnblogs.com/ftingchn/comments/370104.htmlhttp://www.cnblogs.com/ftingchn/archive/2006/04/08/370104.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/370104.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/370104.html<HTML> 
<HEAD><TITLE>验证SQL保留字</TITLE> 
<SCRIPT LANGUAGE="VBScript">  
<!-- 
function keyword(str) 
x="action,add,aggregate,all,alter,after,and,as,asc,avg,avg_row_length,auto_increment,between,bigint,bit,binary,blob,bool,both,by,cascade,case,char,character,change,check,checksum,column,columns,comment,constraint,create,cross,current_date,current_time,current_timestamp,data,database,databases,date,datetime,day,day_hour,day_minute,day_second,dayofmonth,dayofweek,dayofyear,dec,decimal,default,delayed,delay_key_write,delete,desc,describe,distinct,distinctrow,double,drop,end,else,escape,escaped,enclosed,enum,explain,exists,fields,file,first,float,float4,float8,flush,foreign,from,for,full,function,global,grant,grants,group,having,heap,high_priority,hour,hour_minute,hour_second,hosts,identified,ignore,in,index,infile,inner,insert,insert_id,int,integer,interval,int1,int2,int3,int4,int8,into,if,is,isam,join,key,keys,kill,last_insert_id,leading,left,length,like,lines,limit,load,local,lock,logs,long,longblob,longtext,low_priority,max,max_rows,match,mediumblob,mediumtext,mediumint,middleint,min_rows,minute,minute_second,modify,month,monthname,myisam,natural,numeric,no,not,null,on,optimize,option,optionally,or,order,outer,outfile,pack_keys,partial,password,precision,primary,procedure,process,processlist,privileges,read,real,references,reload,regexp,rename,replace,restrict,returns,revoke,rlike,row,rows,second,select,set,show,shutdown,smallint,soname,sql_big_tables,sql_big_selects,sql_low_priority_updates,sql_log_off,sql_log_update,sql_select_limit,sql_small_result,sql_big_result,sql_warnings,straight_join,starting,status,string,table,tables,temporary,terminated,text,then,time,timestamp,tinyblob,tinytext,tinyint,trailing,to,type,use,using,unique,unlock,unsigned,update,usage,values,varchar,variables,varying,varbinary,with,write,when,where,year,year_month,zerofill" 
y=split(x,",") 
for i=0 to ubound(y) 
if str=y(i) then 
keyword=y(i)&"属于保留字" 
exit for 
else 
keyword=str&"不属于保留字" 
end if 
next 
ERASE y 
msgbox(keyword) 
end function 
Sub Button1_OnClick 
  Dim TheForm 
  Set TheForm = Document.ValidForm 
  If len(trim(TheForm.Text1.Value))<=0 Then 
      MsgBox "请输入" 
  Else 
    keyword(TheForm.Text1.Value) 
  End If 
End Sub 
--> 
</SCRIPT> 
</HEAD> 
<BODY> 
<H3>SQL保留字验证</H3><HR> 
<FORM NAME="ValidForm"> 
请输入保留字： 
<INPUT NAME="Text1" TYPE="TEXT" size=8> 
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="提交"> 
</FORM> 
</BODY> 
</HTML>

[新闻]中国移动谋划推出Web2.0产品mspaces.net]]>多项目选择菜单http://www.cnblogs.com/ftingchn/archive/2006/04/06/368208.html不惊了不惊了Thu, 06 Apr 2006 03:58:00 GMThttp://www.cnblogs.com/ftingchn/archive/2006/04/06/368208.htmlhttp://www.cnblogs.com/ftingchn/comments/368208.htmlhttp://www.cnblogs.com/ftingchn/archive/2006/04/06/368208.html#Feedback0http://www.cnblogs.com/ftingchn/comments/commentRss/368208.htmlhttp://www.cnblogs.com/ftingchn/services/trackbacks/368208.html<script language="JavaScript"> 
function copyToList(from,to) //from表示:包含可选择项目的select对象名字 to表示:列出可选择项目的select对象名字 //你可以根据你的具体情况修改 
{ 
  fromList = eval('document.forms[0].' + from); 
  toList = eval('document.forms[0].' + to); 
  if (toList.options.length > 0 && toList.options[0].value == 'temp') 
  { 
    toList.options.length = 0; 
  } 
  var sel = false; 
  for (i=0;i<fromList.options.length;i++) 
  { 
    var current = fromList.options[i]; 
    if (current.selected) 
    { 
      sel = true; 
      if (current.value == 'temp') 
      { 
        alert ('你不能选择这个项目!'); 
        return; 
      } 
      txt = current.text; 
      val = current.value; 
      toList.options[toList.length] = new Option(txt,val); 
      toList.options[toList.length-1].selected=true; 
      fromList.options[i] = null; 
      i--; 
    } 
  } 
  if (!sel) alert ('你还没有选择任何项目'); 
} 
function allSelect() //这是当用户按下提交按钮时，对列出选择的select对象执行全选工作，让递交至的后台程序能取得相关数据 
{ 
  List = document.forms[0].chosen; 
  if (List.length && List.options[0].value == 'temp') return; 
  for (i=0;i<List.length;i++) 
  { 
     List.options[i].selected = true; 
  } 
} 

</script> 

 

<form action="" method="post" onSubmit="allSelect()" > 
<table border="0">  
              <tr> 
                <td> 
                  <select name="possible" size="4" MULTIPLE width=200 style="width: 200px"> 
                    <option value="temp">从右边选择号码  
                  </select> 
                </td> 
                  <td><input type="button" value="=>" onclick="javascript:copyToList('possible','chosen')"><br> 
                   <input type="button" value="<=" onclick="javascript:copyToList('chosen','possible')"></td> 
                <td> 
                  <select name="chosen" size="4" MULTIPLE width=200 style="width: 200px;"> 
                    <option value="sh">中国上海</option > 
                    <option value="wh">中国武汉</option> 
                    <option value="bj">中国北京</option> 
                    <option value="hk">中国香港</option> 
                  </select> 
                </td> 
              </tr>  
            </table> 
</form