//組件是否安裝
isComponentInstalled("{6B053A4B-A7EC-4D3D-4567-B8FF8A1A5739}","componentID"))
//檢查網頁是否存在
functionCheckURL(URL)
{
var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
xmlhttp.Open("GET",URL,false);
try
{
xmlhttp.Send();
var result = xmlhttp.status;
}
catch(e) {return(false); }
if(result==200)
{
return true;
}
xmlhttp = null;
return false;
}
//連接數據庫
<scriptlanguage="javascript">
//用 JavaScript 寫服務器端連接數據庫的代碼示例
var conn = newActiveXObject("ADODB.Connection");
conn.Open("Provider=SQLOLEDB.1;Data Source=localhost; User ID=sa; "
+"Password=; InitialCatalog=pubs");
var rs = newActiveXObject("ADODB.Recordset");
var sql="select * fromauthors";
rs.open(sql, conn);
shtml = "<table width='100%'border=1>";
shtml +="<tr bgcolor='#f4f4f4'><td>au_id</td><td>au_lname</td><td>au_fname</td><td>phone</td><td>address</td><td>city</td><td>state</td><td>zip</td></tr>";
while(!rs.EOF)
{
shtml +="<tr><td>" + rs("au_id") +"</td><td>" + rs("au_lname") +"</td><td>" + rs("au_fname") +"</td><td>" + rs("phone") +"</td><td>" + rs("address") +"</td><td>" + rs("city") +"</td><td>" + rs("state") +"</td><td>" + rs("zip") +"</td></tr>";
rs.moveNext;
}
shtml += "</table>";
document.write(shtml);
rs.close();
rs = null;
conn.close();
conn = null;
</script>
//使用數據島
<html>
<body>
srno:<input type=text datasrc=#xmldate DataFLD=srnosize="76"><BR>
times:<inputtype=text datasrc=#xmldate DataFLD=times size="76"><BR>
<input id="first"TYPE=button value="<< 第一條記錄"onclick="xmldate.recordset.moveFirst()">
<input id="prev"TYPE=button value="<上一條記錄"onclick="xmldate.recordset.movePrevious()">
<input id="next"TYPE=button value="下一條記錄>"onclick="xmldate.recordset.moveNext()">
<input id="last"TYPE=button value="最後一條記錄>>"onclick="xmldate.recordset.moveLast()">
<input id="Add"TYPE=button value="添加新記錄"onclick="xmldate.recordset.addNew()">
<XMLID="xmldate">
<infolist>
<info><srno>20041025-01</srno><times>null</times></info>
<info><srno>20041101-09</srno><times>2004年10月1日2點22分0秒</times></info>
</infolist>
</XML>
</body>
</html>
//獲得參數
<body>
<ahref="javascript:location.href=location.href +'?a=1&b=2'">search</a>
<scriptlanguage="JavaScript">
<!--
var a = location.search.substr(1);
if(a.length>0)
{
var re =/([^&]*?)\=([^&]*)/g
var s = a.match(re);
for(var i= 0;i<s.length;i++)
{
alert(s);
alert(s.split("=")[1]);
}
}
//-->
</script>
</body>
//可編輯SELECT
<inputtype=text name=re_name style="width:100px;height:21px;font-size:10pt;"><spanstyle="width:18px;border:0px solid red;"><selectname="r00" style="margin-left:-100px;width:118px;background-color:#FFEEEE;"onChange="document.all.re_name.value=this.value;">
<optionvalue="1">11111111<option>
<optionvalue="2">222222</option>
<optionvalue="3">333333</option>
</select>
</span>
//設置光標位置
functiongetCaret(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)
{}
}
functionselectLength(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;
}
//頁內查找
functionfindInPage(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;
}
//操作EXECL
<scriptlanguage="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="FirstColumn, 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="MyFirst WorkSheet";
}
</script>