将vb转成c#的代码，100分

[hiweiyi2000]

<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>

<Script runat="Server">

Sub Page_Load
Dim conNorthwind As SqlConnection
Dim cmdCategories As SqlCommand
Dim dstCategories As DataSet
Dim strQuery As String

conNorthwind = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=Northwind" )
strQuery = "select CategoryName As Text, 'products.aspx?catid=' + LTRIM( STR( CategoryID ) ) " & _
"As TreeNodeSrc from Categories As TreeNode for xml auto, XMLDATA"
cmdCategories = New SqlCommand( strQuery, conNorthwind )
conNorthwind.Open()
dstCategories = New DataSet
dstCategories.ReadXml( cmdCategories.ExecuteXmlReader(), XmlReadMode.Fragment )
dstCategories.DataSetName = "TREENODES"
dstCategories.WriteXml( Response.OutputStream )
conNorthwind.Close()
End Sub

</Script>

[孟子E章]

<%@ Page Language="C#"%>
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.OleDb"%>

<script runat="server">
void Page_Load(Object sender, EventArgs e){
SqlConnection conNorthwind;
SqlCommand cmdCategories;
DataSet dstCategories;
string strQuery;
conNorthwind = new SqlConnection("Server=localhost;UID=sa;PWD=secret;Database=Northwind");
strQuery = "select CategoryName As Text, 'products.aspx?catid=' + LTRIM( STR( CategoryID ) ) " + "As TreeNodeSrc from Categories As TreeNode for xml auto, XMLDATA";
cmdCategories = new SqlCommand(strQuery, conNorthwind);
conNorthwind.Open();
dstCategories = new DataSet();
dstCategories.ReadXml(cmdCategories.ExecuteXmlReader(), XmlReadMode.Fragment);
dstCategories.DataSetName = "TREENODES";
dstCategories.WriteXml(Response.OutputStream);
conNorthwind.Close();
}

[孟子E章]

<%@ Page Language="C#"%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<script runat="server">
void Page_Load(Object sender, EventArgs e){
SqlConnection conNorthwind;
SqlCommand cmdCategories;
DataSet dstCategories;
string strQuery;
conNorthwind = new SqlConnection("Server=localhost;UID=sa;PWD=secret;Database=Northwind");
strQuery = "select CategoryName As Text, 'products.aspx?catid=' + LTRIM( STR( CategoryID ) ) " + "As TreeNodeSrc from Categories As TreeNode for xml auto, XMLDATA";
cmdCategories = new SqlCommand(strQuery, conNorthwind);
conNorthwind.Open();
dstCategories = new DataSet();
dstCategories.ReadXml(cmdCategories.ExecuteXmlReader(), XmlReadMode.Fragment);
dstCategories.DataSetName = "TREENODES";
dstCategories.WriteXml(Response.OutputStream);
conNorthwind.Close();
}
</script>

[webserv2]

晕，来晚了！

http://www.developerfusion.com/utilities/convertcsharptovb.aspx

以后可以自己转了，不用发帖了！

授人以渔

嘿嘿！

[jianli0108]

楼上的网站试了试,还不错,收藏了

[popstartzhang]

我也来学习一下。

[meilixueshan2009]

来晚了，顶一下