请问下面这句在C#里好用,但在VB.NET不好用,应该怎么改呀!简单!
tflb 2003-10-18 01:51:09 就是这句ds.Relations.Add("myrelation", ds.Tables["bigclass"].Columns["bigclassid"], ds.Tables["news"].Columns["bigclassid"])
在下面的c#中没有问题!
<script language="C#" runat="server">
public void Page_Load(object sender, EventArgs e)
{
OleDbConnection conn = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:/test/news.mdb");
// OleDbConnection conn = new OleDbConnection("provider=sqloledb;server=(local);database=news;uid=sa;pwd=tflbtest;");
OleDbDataAdapter da1 = new OleDbDataAdapter("select * from bigclass",conn);
OleDbDataAdapter da2 = new OleDbDataAdapter("select * from news n where newsid in (select top 5 newsid from news where bigclassid=n.bigclassid order by updatetime desc)",conn);
DataSet ds = new DataSet();
conn.Open();
da1.Fill(ds,"bigclass");
da2.Fill(ds,"news");
conn.Close();
ds.Relations.Add("myrelation", ds.Tables["bigclass"].Columns["bigclassid"], ds.Tables["news"].Columns["bigclassid"]);
parentDataGrid.DataSource = ds.Tables["bigclass"];
parentDataGrid.DataBind();
}
</script>
在VB中有问题,错误在下面
<script Language="VB" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim conn as OleDbConnection
Dim da1,da2 as OleDbDataAdapter
Dim ds as DataSet
Dim strConn As String
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.MapPath("./")&"data/news.mdb"
Conn = New OledbConnection(strConn)
da1 = new OleDbDataAdapter("select * from bigclass",conn)
da2 = new OleDbDataAdapter("select * from news n where newsid in (select top 5 newsid from news where bigclassid=n.bigclassid order by updatetime desc)",conn)
ds = new DataSet()
conn.Open()
da1.Fill(ds,"bigclass")
da2.Fill(ds,"news")
conn.Close()
ds.Relations.Add("myrelation", ds.Tables["bigclass"].Columns["bigclassid"], ds.Tables["news"].Columns["bigclassid"])
parentDataGrid.DataSource = ds.Tables["bigclass"]
parentDataGrid.DataBind()
end sub
</script>
编译错误
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。
编译器错误信息: BC30518: 重载决策失败,原因是没有可访问的“Add”可以用这些参数调用:
源错误:
行 23: conn.Close()
行 24:
行 25: ds.Relations.Add("myrelation", ds.Tables["bigclass"].Columns["bigclassid"], ds.Tables["news"].Columns["bigclassid"])
行 26:
行 27:
请指点一下,我哪里写错了,我是初学!先谢谢了!