Query Delete dando esse erro

Question

A minha query delete está escrita assim:

   Private Sub Btn_Excluir_Clientes_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Excluir_Clientes.Click
        Try
            Me.ClientesTableAdapter.Cliente_DeleteQuery(Txt_ID_Cliente.Text)
            Me.ClientesTableAdapter.Fill(Me.BancoDataSet.Clientes)
            MsgBox("Excluido com sucesso")
        Catch ex As Exception

        End Try
       

    End Sub

Error 38 Argument not specified for parameter 'Usuário_que_Cadastrou1' of 'Public Overridable Overloads Function Cliente_DeleteQuery(ID_Cliente As Integer, Razão_Social As String, Razão_Social1 As String, Nome_Fantasia As String, Nome_Fantasia1 As String, CPF_CNPJ As String, CPF_CNPJ1 As String, Inscrição_Estadual As String, Inscrição_Estadual1 As String, Endereço As String, Endereço1 As String, Bairro As String, Bairro1 As String, CEP As String, CEP1 As String, Cidade As String, Cidade1 As String, UF As String, UF1 As String, Telefone_da_Empresa As String, Telefone_da_Empresa1 As String, Celular_da_Empresa As String, Celular_da_Empresa1 As String, Site As String, Site1 As String, E_Mail As String, E_Mail1 As String, Nome_do_Responsável_da_Empresa As String, Nome_do_Responsável_da_Empresa1 As String, Telefone_do_Responsável As String, Telefone_do_Responsável1 As String, Celular_do_Responsável As String, Celular_do_Responsável1 As String, Data_de_Cadastramento As String, Data_de_Cadastramento1 As String, Observação As String, Observação1 As String, Usuário_que_Cadastrou As String, Usuário_que_Cadastrou1 As String) As Integer'. C:\Info_Master\Info_Master\Frm_Del_Clientes.vb 5 13 Info_Master

Answer 1

O erro é claro: Voce nao esta especificando o resto dos parametros.. Seu metodo Cliente_DeleteQuery nao possui somente um parametro mas todos esses:

ID_Cliente As Integer, Razão_Social As String, Razão_Social1 As String, Nome_Fantasia As String, Nome_Fantasia1 As String, CPF_CNPJ As String, CPF_CNPJ1 As String, Inscrição_Estadual As String, Inscrição_Estadual1 As String, Endereço As String, Endereço1 As String, Bairro As String, Bairro1 As String, CEP As String, CEP1 As String, Cidade As String, Cidade1 As String, UF As String, UF1 As String, Telefone_da_Empresa As String, Telefone_da_Empresa1 As String, Celular_da_Empresa As String, Celular_da_Empresa1 As String, Site As String, Site1 As String, E_Mail As String, E_Mail1 As String, Nome_do_Responsável_da_Empresa As String, Nome_do_Responsável_da_Empresa1 As String, Telefone_do_Responsável As String, Telefone_do_Responsável1 As String, Celular_do_Responsável As String, Celular_do_Responsável1 As String, Data_de_Cadastramento As String, Data_de_Cadastramento1 As String, Observação As String, Observação1 As String, Usuário_que_Cadastrou As String, Usuário_que_Cadastrou1 As String

Se voce nao fornece-los, entao esse erro é disparado. Uma maneira de resolver o problema é criar um metodo com somente um parametro:ID_Cliente As Integer.

Att

---

William John Adam Trindade
Analyste-programmeur
----------------------------------------------------------

Sogi Informatique ltée

Answer 2

Muito Obrigado;