将vb转成c#的代码,100分
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<Script runat="Server">
Sub Page_Load
Dim conNorthwind As SqlConnection
Dim cmdProducts As SqlCommand
Dim dstProducts As DataSet
Dim strQuery As String
conNorthwind = New SqlConnection( "Server=localhost;UID=sa;PWD=secret;Database=Northwind" )
strQuery = "select ProductName As Text from Products As TreeNode " & _
"Where CategoryID=@categoryID for xml auto, XMLDATA "
cmdProducts = New SqlCommand( strQuery, conNorthwind )
cmdProducts.Parameters.Add( new SqlParameter( "@categoryID", Request.QueryString( "catID" ) ) )
conNorthwind.Open()
dstProducts = New DataSet
dstProducts.ReadXml( cmdProducts.ExecuteXmlReader(), XmlReadMode.Fragment )
dstProducts.DataSetName = "TREENODES"
dstProducts.WriteXml( Response.OutputStream )
conNorthwind.Close()
End Sub
</Script>