Javascript小技巧(5)

//可编辑SELECT 
<input type=text name=re_name 
style="100px;height:21px;font-size:10pt;"><span 
style="18px;border:0px solid red;"><select name="r00" 
style="margin-left:-100px;118px; background-color:#FFEEEE;" 
onChange="document.all.re_name.value=this.value;"> 
                <option value="1">11111111<option> 
                <option value="2">222222</option> 
                <option value="3">333333</option> 
              </select> 
              </span> 
//设置光标位置 

function getCaret(textbox) 
{ 
 var control = document.activeElement; 
 textbox.focus(); 
 var rang = document.selection.createRange(); 
  rang.setEndPoint("StartToStart",textbox.createTextRange()) 
 control.focus(); 
 return rang.text.length; 
} 
function setCaret(textbox,pos) 
{ 
 try 
 { 
  var r =textbox.createTextRange(); 
   r.moveStart('character',pos); 
   r.collapse(true); 
   r.select(); 
 } 
 catch(e) 
 {} 
} 
function selectLength(textbox,start,len) 
{ 
 try 
 { 
  var r =textbox.createTextRange(); 
  
  r.moveEnd('character',len-(textbox.value.length-start)); 
  r.moveStart('character',start); 
   
  r.select(); 
 } 
 catch(e) 
 {//alert(e.description)} 
} 
function insertAtCaret(textbox,text) 
{ 
 textbox.focus(); 
 document.selection.createRange().text = text; 
} 

//页内查找 

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>