最新 javascript 技巧集（七）

　　//页内查找

　　
　　function findInPage(str)
　　{
　　 var txt, i, found,n = 0;
　　 if (str == "")
　　 {
　　  return false;
　　 }
　　 txt = document.body.createTextRange();
　　 for (i = 0; i <= n && (found = txt.findText(str)) != false; i++)
　　 {
　　  txt.moveStart("character", 1);
　　  txt.moveEnd("textedit");
　　 }
　　 if (found)
　　 {
　　  txt.moveStart("character", -1);
　　  txt.findText(str);
　　  txt.select();
　　  txt.scrollIntoView();
　　  n++;  
　　 }
　　 else
　　 {
　　  if (n > 0)
　　  {
　　   n = 0;
　　   findInPage(str);
　　  }
　　  else
　　  {
　　   alert(str + "...            您要找的文字不存在。\n \n请试着输入页面中的关键字再次查找！");
　　  }
　　 }
　　 return false;
　　}
　　//书

　　http://www.itpub.net/attachment.php?s=&postid=1894598
　　http://www.wrclub.net/down/listdown.aspx?id=1341
　　//操作EXECL

　　<script language="javascript">
　　function jStartExcel() {
　　 var xls = new ActiveXObject ( "Excel.Application" );
　　 xls.visible = true;
　　 var newBook = xls.Workbooks.Add;
　　 newBook.Worksheets.Add;
　　 newBook.Worksheets(1).Activate;
　　 xls.ActiveWorkBook.ActiveSheet.PageSetup.Orientation = 2;
　　 xls.ActiveWorkBook.ActiveSheet.PageSetup.PaperSize = 5;
　　 newBook.Worksheets(1).Columns("A").columnwidth=50;
　　 newBook.Worksheets(1).Columns("A").WrapText = true;
　　 newBook.Worksheets(1).Columns("B").columnwidth=50;
　　 newBook.Worksheets(1).Columns("B").WrapText = true;
　　 newBook.Worksheets(1).Range("A1:B1000").NumberFormat = "0";
　　 newBook.Worksheets(1).Range("A1:B1000").HorizontalAlignment = -4131;
　　 newBook.Worksheets(1).Cells(1,1).Interior.ColorIndex="15";
　　 newBook.Worksheets(1).Cells(1,1).value="First Column, First Cell";
　　 newBook.Worksheets(1).Cells(2,1).value="First Column, Second Cell";
　　 newBook.Worksheets(1).Cells(1,2).value="Second Column, First Cell";
　　 newBook.Worksheets(1).Cells(2,2).value="Second Column, Second Cell";
　　 newBook.Worksheets(1).Name="My First WorkSheet";
　　}
　　</script>

　　//自定义提示条

　　
　　<a href="#" title="这是提示">tip</a>
　　<script Language="JavaScript">
　　//***********默认设置定义.*********************
　　tPopWait=50;//停留tWait豪秒后显示提示。
　　tPopShow=5000;//显示tShow豪秒后关闭提示
　　showPopStep=20;
　　popOpacity=99;
　　//***************内部变量定义*****************
　　sPop=null;
　　curShow=null;
　　tFadeOut=null;
　　tFadeIn=null;
　　tFadeWaiting=null;
　　document.write("<style type='text/css'id='defaultPopStyle'>");
　　document.write(".cPopText {  background-color: #F8F8F5;color:#000000; border: 1px #000000 solid;font-color: font-size: 12px; padding-right: 4px; padding-left: 4px; height: 20px; padding-top: 2px; padding-bottom: 2px; filter: Alpha(Opacity=0)}");
　　document.write("</style>");
　　document.write("<div id='dypopLayer' style='position:absolute;z-index:1000;' class='cPopText'></div>");

　　function showPopupText(){
　　var o=event.srcElement;
　　MouseX=event.x;
　　MouseY=event.y;
　　if(o.alt!=null && o.alt!=""){o.dypop=o.alt;o.alt=""};
　　        if(o.title!=null && o.title!=""){o.dypop=o.title;o.title=""};
　　if(o.dypop!=sPop) {
　　sPop=o.dypop;
　　clearTimeout(curShow);
　　clearTime