[VB.NET]ajax的使用(请帮忙将C#改为VB.net)

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
ajax的使用(请帮忙将C#改为VB.net)
C#代码:
[AjaxPro.AjaxNamespace( "Test ")]
public class WebForm1 : System.Web.UI.Page
{
public OleDbConnection con;
public OleDbCommand com;
public OleDbDataAdapter dat;
public DataTable dt;
protected void Page_Load(object sender, EventArgs e)
{
AjaxPro.Utility.RegisterTypeForAjax(typeof(WebForm1),this);
}

[AjaxPro.AjaxMethod]
public DataTable GetData()
{
string constr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " +@ " C:/Inetpub/wwwroot/Evget_Teechart2003/DataBinding.mdb ";
con = new OleDbConnection(constr);
com = new OleDbCommand( "select SalesAmount from Sales ", con);
dat = new OleDbDataAdapter(com);
dt = new DataTable();
dat.Fill(dt);
return dt;
}

#region Web 窗体设计器生成的代码
override protected void OnInit(EventArgs e)
{
//
// CODEGEN: 该调用是 ASP.NET Web 窗体设计器所必需的。
//
InitializeComponent();
base.OnInit(e);
}

///

/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
///

private void InitializeComponent()
{
this.Load += new System.EventHandler(this.Page_Load);
}
#endregion
}
}
__________________________________________________________________________
或者哪位高手说说ajaxpro在vb.net下的用法啊~
__________________________________________________________________________
应该差不多的
__________________________________________________________________________

public class WebForm1 : System.Web.UI.Page

Public con As OleDbConnection
Public com As OleDbCommand
Public dat As OleDbDataAdapter
Public dt As DataTable

Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Page.Load
AjaxPro.Utility.RegisterTypeForAjax(typeof(WebForm1),this)
End Sub


Public Function GetData() As DataTable

Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:/Inetpub/wwwroot/Evget_Teechart2003/DataBinding.mdb "
con = New OleDbConnection(constr)
com = New OleDbCommand( "select SalesAmount from Sales ", con)
dat = New OleDbDataAdapter(com)
dt = New DataTable()
dat.Fill(dt)
Return dt
End Function

#Region "Web 窗体设计器生成的代码 "
Protected Overrides Sub OnInit(ByVal e As EventArgs)
MyBase.OnInit(e)

InitializeComponent()
End Sub

'' '' ''

'' '' '' 设计器支持所需的方法 - 不要使用代码编辑器修改
'' '' '' 此方法的内容。
'' '' ''

Private Sub InitializeComponent()

End Sub
#End Region
End Class
__________________________________________________________________________
谢谢.其实我的意思是想问ajaxpro在vb.net中的用法.主要是这三句:
[AjaxPro.AjaxNamespace( "Test ")]
AjaxPro.Utility.RegisterTypeForAjax(typeof(WebForm1),this)
[AjaxPro.AjaxMethod]
__________________________________________________________________________

AjaxPro.Utility.RegisterTypeForAjax(WebForm1.gettype,me)

__________________________________________________________________________