大家帮忙看看下面这段数据库连接代码有什么错误之处，在等！
<script language="vb" runat="server">
sub page_load(sender as object,e as eventargs)
datalist1.datasource=createdataview("./database/database.mdb","newscountens")
datalist1.databind()
end sub
function createdataview(db as string,table as string) as dataview
dim provider,connstr,sql as string
provider="Microsoft.Jet.OLEDB.4.0;"
connstr="provider=" & provider & "datasource=" & Server.MapPath("db")
dim conn as oledbconnection=new oledbconnection(connstr)
dim cmd as oledbdataadapter
cmd=new oledbdataadapter("select * from" & table &"order by id desc",connstr)
dim ds as dataset=new dataset()
cmd.fill(ds,table)
createdataview=new dataview(ds.tables(table))
end function
</script>
在页面当中我用：
<asp:DataList id="DataList1" runat="server" BorderColor="#E7E7FF" BorderStyle="None" BackColor="White"CellPadding="3" GridLines="Horizontal" BorderWidth="1px">
<SelectedItemStyle Font-Bold="True" ForeColor="#F7F7F7" BackColor="#738A9C">
</SelectedItemStyle>
<AlternatingItemStyle BackColor="#F7F7F7">
</AlternatingItemStyle>
<ItemStyle ForeColor="#4A3C8C" BackColor="#E7E7FF"></ItemStyle>
<FooterStyle ForeColor="#4A3C8C" BackColor="#B5C7DE"></FooterStyle>
<HeaderStyle Font-Bold="True" ForeColor="#F7F7F7" BackColor="#4A3C8C"></HeaderStyle>
<ItemTemplate ><%#container.dataitem("newstitle")%></ItemTemplate>
</asp:DataList>
来显示数据，但是显示不了，也没有提示错误！
先谢谢大家了！
问题点数：10、回复次数：13Top
1 楼lixionglz（追求）回复于 2005-04-01 16:43:21 得分 1
Server.MapPath("db")
应为Server.MapPath("db.mdb")
要写出扩展名。Top
2 楼hwj2000（啊呀，狐狸）回复于 2005-04-01 16:45:19 得分 0
楼上的可能没有注意，我这个DB是一个参数！Top
3 楼lixionglz（追求）回复于 2005-04-01 16:47:35 得分 0
那就直接Server.MapPath(db)Top
4 楼powbcom（一搏云天[I CAN]）回复于 2005-04-01 16:54:10 得分 3
connstr="provider=" & provider & "datasource=" & Server.MapPath("db")
db是一个变量,那就不能用""括起来Top
5 楼hwj2000（啊呀，狐狸）回复于 2005-04-01 16:56:48 得分 0
咦，这倒是哦！！！
我已经把“”去掉了，但还是没有数据显示！
（数据库当中肯定是有的）Top
6 楼hwj2000（啊呀，狐狸）回复于 2005-04-01 17:00:22 得分 0
会不会是我操作上有问题呢？因为我也是初学的
1、在DW里将版面排版好
2、在VS。NET里添加控件，并在“HTML”里编写代码
3、保存
4、点击“生成解决方案”
5、进入浏览器进行浏览（本地服务器）Top
7 楼daisylh（麗達）回复于 2005-04-01 17:02:58 得分 2
你也沒有OPEN:
...
dim conn as oledbconnection=new oledbconnection(connstr)
conn.open()
...Top
8 楼hwj2000（啊呀，狐狸）回复于 2005-04-01 17:07:26 得分 0
唉。。。。。。。。。。。。。。。。。
这个CONN.OPEN我也加了，也没有用！
这段代码是我从书上抄写下来的，它本来就没有conn.open，我后来就加上的，不行，所以贴上来的时候就把它删除了，我以为是我错了！Top
9 楼baobei7758（陵少）回复于 2005-04-01 17:10:10 得分 1
HttpContext.Current.Server.MapPath()
Top
10 楼hwj2000（啊呀，狐狸）回复于 2005-04-01 17:13:06 得分 0
如果让大家实在为难的话，那可不可以请哪位将能用的连接到ACCESS数据库的代码发给我！
再次谢谢，我先去开会了！Top
11 楼daisylh（麗達）回复于 2005-04-01 19:26:00 得分 0
我的參考:
...
cn = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("..\main\export\" & sourcefilename) & "")
cn.Open()
Dim rd As OleDb.OleDbDataReader
...Top
12 楼daisylh（麗達）回复于 2005-04-01 19:27:39 得分 3
咦,你的datasource跟我的參考不一樣,再貼一遍(剛看不出效果):cn = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("..\main\export\" & sourcefilename) & "")Top
13 楼daisylh（麗達）回复于 2005-04-01 19:28:37 得分 0
我的sourcefilename是個MDBTop
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
