伊のspace～芳香精油＊美容保養＊程式設計

function getPathName()
{
    if(window.location.protocol =="file:")
    {
        var x = unescape(window.location.pathname);

        for(;x.lastIndexOf("/")>0;)
        {
            x=x.replace("\/","\\");
        }
        var pos = x.lastIndexOf("\\");

        var pname=x.substring(1,pos+1);

        return pname;
    }
    else
    {
        return null;
    }
}

var fname = "db1.mdb";
fname = getPathName() + fname;

var strSQL = "SELECT * FORM TABLE";

/************** 寫法1 **************/
var objConn = new ActiveXObject("ADODB.Connection");
var strConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="+fname;
objConn.Open(strConnString);

var objRS = objConn.Execute(strSQL);
/***********************************/

/************** 寫法2 **************/
var objConn = new ActiveXObject("ADODB.Connection");
objConn.Provider = "Microsoft.Jet.OLEDB.4.0";
objConn.ConnectionString = "Data Source=" + fname;
objConn.open;

var objRS = new ActiveXObject("ADODB.Recordset");
objRS.open(strSQL,objConn);
/***********************************/


var iFieldsCount = objRS.Fields.Count - 1;

if (!objRS.EOF)
{
    for (var i=0; i <= iFieldsCount; i++)
        document.wirteln(objRS.Fields(i).Name);

    while (!RS.EOF)
    {
        for (var i=0; i <= iFieldsCount; i++)
            document.wirteln(objRS.Fields(i).Value);

        objRS.moveNext();
    }
}

objRS.Close();
objConn.Close();


/* 補充說明
*
* 1.ActiveXObject只有IE可以用
*
* 2.ConnectionString有很多種類
* 可參考網址: http://www.devguru.com/technologies/ADO/8533.asp
*
* OLE DB Provider for Active Directory Service:
* "Provider=ADSDSOObject;"
*
* OLE DB Provider for Index Server:
* "Provider=MSIDXS;"
*
* OLE DB Provider for Internet Publishing:
* "Provider=MSDAIPP.DSO; Data Source=http://www.devguru.com/guru_dir;"
*
* OLE DB Provider for Microsoft Jet:
* "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=GuruData.mdb;"
*
* OLE DB Provider for ODBC Databases:
* "Provider=MSDASQL; Driver={SQL Server}; Server=GuruServer;
* DataBase=GuruDatabase;"
*
* OLE DB Provider for Oracle:
* "Provider=MSDAORA; Data Source=GuruTable;"
*
* OLE DB Provider for SQL Server:
* "Provider=SQLOLEDB; Data Source=GuruServer; Network Library=DBMSSOCN;
* Initial Catalog=GuruPubs;"
*
*
* 3.使用寫法2的objRS.open(strSQL,objConn)改成objRS.open(strSQL,objConn,1)
* 將第3個參數設為1，可以啟用分頁、指定目前頁數的功能
*
* 4.其他說明待補
*
*/