javastr="" 
<%'打开数据库打开数据表
dim conn   
dim connstr
on error resume next
connstr="DBQ="+server.mappath("../riwoniang/moludemei.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("adodb.connection")
conn.open connstr%>

<%sql="select * from shop_config"
set rs=conn.execute(sql)%>
javastr=javastr+"<marquee direction=\"left\" width=\"119\" height=\"20\" scrollamount=\"2\" id=info onMouseOver=info.stop() onMouseOut=info.start() ><%=rs("gonggao")%></marquee>"

document.write(javastr)