我这儿有一段我自己写的程序,希望对你有点用:function QueryImg()
{
    var objdbConn = new ActiveXObject("ADODB.Connection");
var strdsn = "Driver={SQL Server};SERVER=localhost;UID=sa;PWD=;DATABASE=gmis_rdstandard";
objdbConn.Open(strdsn);
var objrs = objdbConn.Execute("SELECT * FROM advertisement"); ImgCount = 0;

var Html = "<table bordercolor =\"#d5d5d5\" border = \"1\" cellpadding=\"0\" cellspacing=\"0\">";
while (!objrs.EOF)
{
    Html += "<tr>";     
    
    Html += "<td bgcolor=\"#ffffff\" width=\"160\" align=\"center\" height=\"1\"><img width = 128 height = 96 src=\"";
    Html += objrs.Fields(3).Value + "\" id = Img" + objrs.Fields(0).Value + " title = \"链接网址:" + objrs.Fields(1).value + "\n开放:"  + objrs.Fields(2).value + "\">";
    
    Html += "<input type = \"hidden\" id = \"CurrImgURl" + objrs.Fields(0).value + "\" value = \"" + objrs.Fields(3).value + "\">" + "</td>";
    Html += "<td width=\"160\" bgcolor=\"#ffffff\"  align=\"center\" height=\"1\"><input type=\"text\" id=\"URL" + objrs.Fields(0).Value + "\" value = \"" + objrs.Fields(1).Value + "\"></td>";
    Html += "<td width=\"120\" bgcolor=\"#ffffff\"  align=\"center\" height=\"1\"><input id=\"Open" + objrs.Fields(0).Value  + "\" type=\"checkbox\" CHECKED name=\"a" + objrs.Fields(0).Value + "\">开放&nbsp;&nbsp;";
        Html += "</td>";                    
        Html += "<td width=\"60\" bgcolor=\"#ffffff\"  align=\"center\" height=\"1\"><a style=\"CURSOR: hand;\" class = \"MouseOut\" onmouseover = \"SetStyle(this, 'in');\" onmouseout = \"SetStyle(this, 'out');\" onclick=\"OpenSelect('";
    Html += objrs.Fields(0).Value + "');\">[换图]</a></td>";
           
    Html += "<td width=\"60\" bgcolor=\"#ffffff\" align=\"center\"  height=\"1\"><a style=\"CURSOR: hand;\" class = \"MouseOut\" onmouseover = \"SetStyle(this, 'in');\" onmouseout = \"SetStyle(this, 'out');\" onclick=\"Delete('";
    Html += objrs.Fields(0).Value + "');\">[删除]</a></td>";     
    
    Html += "<td width=\"60\" bgcolor=\"#ffffff\"  align=\"center\" height=\"1\"><a style=\"CURSOR: hand;\" class = \"MouseOut\" onmouseover = \"SetStyle(this, 'in');\" onmouseout = \"SetStyle(this, 'out');\" onclick=\"Apply('";
    Html += objrs.Fields(0).Value + "');QueryImg();\">[应用]</a></td>";
    
    Html += "</tr>";
    
    ImgIDArr[ImgCount] = objrs.Fields(0).value;
    Hab[ImgCount++] =  objrs.Fields(2).value; 
    objrs.moveNext();
}
Html += "</table>";
ImageList.innerHTML = Html;

var i = 0;
for(; i < ImgCount; i++)
{
document.all("Open" + ImgIDArr[i]).checked = Hab[i];
}

objrs.Close();
objdbConn.Close();
}