作者linsevenligh (飞天蛙)
看板Visual_Basic
标题[.NET] 请高手帮忙。。感谢
时间Wed Dec 20 02:00:17 2006
这是做收寻
不过其中 SqlDataReader出现型别位定义
这怎麽解决呢。。感谢
Private Sub btnInput_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnInput.Click
Scn.Open() ' 开启资料库连结
' 建立Command物件的SQL指令
' SqlCommandObj = New SqlCommand(strSQL, objCon)
' 执行SQL指令
Scm.Parameters("@userid").Value() = userid.Text
'多载。 将 CommandText 传送至 Connection ，并建置 SqlDataReader
Dim myRd As SqlDataReader＝Scm.ExecuteReader()
While myRd.Read()
For i As Integer = 0 To myRd.FieldCount - 1
Select Case myRd.GetName(i) '取得指定资料行的名称。
Case "name2"
name2.Text = myRd.GetString(i)
Case "forte"
forte.Text = myRd.GetString(i)
Case "ww"
ww.Text = myRd.GetString(i)
Case "god"
god.Text = myRd.GetString(i)
Case "userid"
userid.Text = myRd.GetString(i)
End Select
Next
End While
myRd.Close()
Scn.Close() ' 关闭资料库连结
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.171.137.212
1F：推 fumizuki:错误点在哪？ Scn 是什麽？ 12/20 21:11
2F：推 fumizuki:有 Import System.Data.SqlClient 吗 12/20 21:12
3F：→ linsevenligh:感谢指点~如同板大所说~问题已解决 12/21 02:37