哪位高手帮帮忙，看下这段代码

sub page_load(sender as object,e as eventargs)
dim data=(ConfigurationSettings.AppSettings("data"))
dim constr as string
dim comstr as string
constr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.MapPath(data)
conn.connectionstring=constr
comstr="select * from content order by 留言序号 desc"
com=new oledbcommand(comstr,conn)
ad.selectcommand=com
try
conn.open()
ad.fill(ds,"content")
conn.close
catch ex as oledbexception
Message.text=ex.message
end try
datagrid1.datasource=ds
page.databind()
end sub
我在网上下的一个留言板，想把原来的数据库改掉，可是没看明白它数据库连接的代码到底是咋的，我始终不知道它是咋连的数据库，我查找代码根本没有数据库的地址啊？它原始的数据库我倒是下载下来了的

哪位高手帮帮忙，看下这段代码 谁能帮我打一段HTML代码？哪位高手能帮帮忙？ 数据库连接代码出错，高手帮帮忙！ js代码高手帮帮忙啊！！！ 哪位高手帮帮忙？ 哪位英语高手，帮帮忙。 请哪位高手帮帮忙~~~~！！！！ 哪位高手进来帮帮忙 哪位高手帮帮忙啊` 哪位化学高手帮帮忙?