Javascript小技巧(5)

來源:互聯網
上載者:User
//可編輯SELECT 
<input type=text name=re_name 
style="width:100px;height:21px;font-size:10pt;"><span 
style="width:18px;border:0px solid red;"><select name="r00" 
style="margin-left:-100px;width: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> 

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.