参数无效 [英] Parameter is not valid

问题描述

请别人帮助我。我已经使用工作代码存储了图像，但是当我尝试检索它时，会出现该错误。我的申请是招生并考虑到这一点，我想审查输入的数据并在必要时进行更改。现在，我只想要正确的代码来显示图片。希望有人能快点帮助我



我尝试过：



< pre lang =vb> 私有 Sub Button1_Click（发件人正如 System。 Object ，e As System.EventArgs）句柄 Button1.Click
connection = 新 SqlConnection（ < span class =code-string> server = .\SQLEXPRESS; Database = NMTC Admissions Database; integrated security = true）
connection.Open（）
If IsNumeric（Tbs.Text）= False 或 Tbs.Text = 然后
MessageBox.Show（ 输入正确的索引号）
Tbs.Focus（）
退出 Sub
结束 如果
Dim 命令 As 新 SqlCommand（ 选择[名字]，[其他名称]，性别，[入学年份，[以前的shs]，[wassce / ssce等级]，[提供课程]，[宿舍详细信息]，电话，[学费支付]，[电子邮件地址]，std_photo来自Tbl_Students5，其中std_id = @id ，connection）
command.Parameters.Add（ @ id， SqlDbType.VarChar）.Value = Tbs.Text

Dim 表 As <跨越ss =code-keyword>新 DataTable（）
Dim adapter As 新 SqlDataAdapter（命令）



adapter.Fill（table）
如果 table.Rows.Count（）< = 0 那么
MessageBox.Show（ 抱歉，该索引号不存在）
Tbs.Focus（）
退出 Sub
结束 如果

TbFn.Text = table.Rows（ 0 ）（ 0 ）。ToString（）
TbOn1.Text = table.Rows（ 0 ）（ 1 ）。ToString
Tbgen.Text = table.Rows（ 0 ）（ 2 ）。ToString
Tbdate.Text = table.Rows（ 0 ）（ 3 ）。ToString
TbPs.Text = table。行（ 0 ）（ 4 ）。ToString
TbG.Text = table.Rows（< span class =code-digit> 0 ）（ 5 ）。ToString
TbCo.Text = table.Rows（ 0 ）（ 6 ）。ToString
TbHd.Text = table.Rows（ 0 ）（ 7 ）。ToString
TbCn.Text = table.Rows（ 0 ）（ 8 ）。ToString
TbFp.Text = table.Rows（ 0 ）（ 9 ）。ToString
TbE.Text = table.Rows（ 0 ） （ 10 ）。ToString


CbF.Checked = False
CbM.Checked = False

connection.Close（）
end sub

解决方案

请参阅此处：为什么我得到参数无效。我从数据库中读取图像时出现异常？ [ ^ ] - 代码在C＃中，但它非常明显（如果您真的无法读取它，则存在在线转换器：代码转换器 [ ^ ]）

Pls someone help me. I have stored the images with a working code but when i try to retrieve it, that error appears. My application is to make admissions and regarding that, i want to review data entered and make alterations where necessary. For now, i want only the correct code to display the picture. Hope someone quickly help me

What I have tried:

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        connection = New SqlConnection("server=.\SQLEXPRESS; Database=NMTC Admissions Database; integrated security=true")
        connection.Open()
        If IsNumeric(Tbs.Text) = False Or Tbs.Text = "" Then
            MessageBox.Show("Enter a Correct Index Number")
            Tbs.Focus()
            Exit Sub
        End If
        Dim command As New SqlCommand("select [First Name],[other name(s)],Gender, [year of admission], [previous s.h.s], [wassce/ ssce grade],[course to offer],[hostel details],phone,[school fees paid],[email address], std_photo from  Tbl_Students5 where std_id = @id", connection)
        command.Parameters.Add("@id", SqlDbType.VarChar).Value = Tbs.Text

        Dim table As New DataTable()
        Dim adapter As New SqlDataAdapter(command)



        adapter.Fill(table)
        If table.Rows.Count() <= 0 Then
            MessageBox.Show("Sorry, That Index Number Does Not Exist")
            Tbs.Focus()
            Exit Sub
        End If

        TbFn.Text = table.Rows(0)(0).ToString()
        TbOn1.Text = table.Rows(0)(1).ToString
        Tbgen.Text = table.Rows(0)(2).ToString
        Tbdate.Text = table.Rows(0)(3).ToString
        TbPs.Text = table.Rows(0)(4).ToString
        TbG.Text = table.Rows(0)(5).ToString
        TbCo.Text = table.Rows(0)(6).ToString
        TbHd.Text = table.Rows(0)(7).ToString
        TbCn.Text = table.Rows(0)(8).ToString
        TbFp.Text = table.Rows(0)(9).ToString
        TbE.Text = table.Rows(0)(10).ToString


        CbF.Checked = False
        CbM.Checked = False

            connection.Close()
end sub

解决方案

See here: Why do I get a "Parameter is not valid." exception when I read an image from my database?[^] - the code is in C# but it's pretty obvious (and online converters exist if you really can't read it: Code Converter[^] )

这篇关于参数无效的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！