奔騰兔的部落格

在同一網站上使用二種不同語言(c Sharp & VB)所建立的資料查詢元件

在Web.Config 中增加設定目錄的名稱

<compilation debug="false" targetFramework="4.0">

        <codeSubDirectories>
          <add directoryName="VB"/>  <!--定義App_Code 中的名稱   -->
          <add directoryName="CS"/>  <!--定義App_Code 中的名稱   -->
        </codeSubDirectories>
      </compilation>

CustomerInfo.cs 的內容：

using System;
using System.Data;
using System.Configuration;
using System.Linq;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.HtmlControls;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Xml.Linq;

using System.Data.SqlClient;

[System.ComponentModel.DataObject()]
public  class CustomerInfoCS
{
  public DataTable GetCustomers()
  {
    DataTable dt = new DataTable();
    using (SqlConnection cn =
      //new SqlConnection("Data Source=.;Initial Catalog=Northwind;Integrated Security=True"))
      new SqlConnection(ConfigurationManager.ConnectionStrings["NorthwindConnectionString1"].ConnectionString))
    {
      SqlDataAdapter da = new SqlDataAdapter("Select * from Customers", cn);
      da.Fill(dt);
    }
    return dt;
  }
}

//=================我是分隔線==============================

CustomerInfo.vb 的內容：

Imports Microsoft.VisualBasic

Imports System.Data
Imports System.Data.SqlClient

<System.ComponentModel.DataObject()> _
Public Class CustomerInfoVB

    Public Function GetCustomers() As DataTable
        Dim dt As New DataTable()
        Using cn As New SqlConnection(ConfigurationManager.ConnectionStrings("NorthwindConnectionString1").ConnectionString)
            Dim da As New SqlDataAdapter("Select * from Customers", cn)
            da.Fill(dt)
        End Using
        Return dt
    End Function

End Class

//=================我是分隔線==============================

建立一個空的網頁使用GridView 顯示資料

在GridView 的DataBind 時可以選擇Object 的DataSource

選擇Class 中所建立的方法來使用

結果：