Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conn As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection(ConfigurationSettings.AppSettings("LawConnStr"))
Dim sql As String
Dim Cmd As New System.Data.OleDb.OleDbCommand(sql, conn)
conn.Open()
Cmd.CommandText = "select " & CStr(Request("txt")) & " from pic where id=" & CInt(Request("id"))
Dim xx1reader As System.Data.OleDb.OleDbDataReader = Cmd.ExecuteReader()
xx1reader.Read()
Label1.Text = xx1reader("& CStr(Request('txt')) &")
xx1reader.Close()
conn.Close()
End Sub
这一句错误:Label1.Text = xx1reader("& CStr(Request('txt')) &")是不是哪个符号写错了啊? 请高手帮我改一下! 非常感谢!!
Dim conn As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection(ConfigurationSettings.AppSettings("LawConnStr"))
Dim sql As String
Dim Cmd As New System.Data.OleDb.OleDbCommand(sql, conn)
conn.Open()
Cmd.CommandText = "select " & CStr(Request("txt")) & " from pic where id=" & CInt(Request("id"))
Dim xx1reader As System.Data.OleDb.OleDbDataReader = Cmd.ExecuteReader()
xx1reader.Read()
Label1.Text = xx1reader("& CStr(Request('txt')) &")
xx1reader.Close()
conn.Close()
End Sub
这一句错误:Label1.Text = xx1reader("& CStr(Request('txt')) &")是不是哪个符号写错了啊? 请高手帮我改一下! 非常感谢!!
=========
你这里并不是用来连接字符串的,就可以直接
Label1.Text = xx1reader(CStr(Request('txt')))