ADO.NET的.Fill方法到底哪错了呀
Dim SqlConn As New SqlConnection(ConnectionString)
SqlConn.Open()
'Dim SqlCommand As New SqlCommand("select * from hn_arealist Order by id", SqlConn)
Dim myData As New SqlDataAdapter("select * from hn_arealist Order by id", SqlConn)
Dim MyDs As New DataSet
myData.Fill(MyDs) '//这行老是出错,但又没提示具体的错误原因,就显示"系统错误"
Dim myAreaList As String
Dim RowCount As Integer = MyDs.Tables(0).Rows.Count
If RowCount > 0 Then
Dim i As Integer
For i = 0 To RowCount - 1
myAreaList = "1="
If myAreaList <> "1=" Then myAreaList += "|"
myAreaList += MyDs.Tables(0).Rows(i).Item("AreaName") + "," + MyDs.Tables(0).Rows(i).Item("ID")
Next
Else
myAreaList = "0=小区列表为空!"
End If
MyDs.Clear()
MyDs.Dispose()
SqlConn.Close()
Return GetHtmlHead(myAreaList)