Dim objConn As SqlConnection
0 Dim strSql As String
0 strSql = "SELECT TOP 10 * FROM Customers"
0 objConn = New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
0 Dim sdaCust As New SqlDataAdapter(strSql, objConn)
0 Dim dstCust As New DataSet()
0 sdaCust.Fill(dstCust, "Customers")
追é®ä¸æ¯å¾æç½ï¼ ä½ è½è¯¦ç»ç¹åï¼