将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>
<%@ 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>
...全文
相关推荐
VB.Net to C# Converter将VB代码转换成C#代码
本资源为【VB.Net to C# Converter】软件,它可以将VB代码转换成C#代码,效果很好
华视CVR100U驱动及VB\VC\Delphi\C#例子(可用)
华视CVR100U驱动及VB\VC\Delphi\C#例子(可用),我试了好久,终于找到了这个可用的,
C#转VB软件 小工具
C#转VB软件,能把c#转成vb,正确率还是满高的了。
vb.net华视身份证读卡器程序CVR-100U源代码
vb.net华视身份证读卡器程序CVR-100U源代码,官网只提供了VB的源码,所以借鉴官网源码修改成VB.net。
SharpDevelop_4.3.0.9390 VB代码转C#工具
实测可用,具体使用流程本站搜索文档。也可以自己操作,不是很难


