BOTAO EDITAR -VB 2008

BRUNIN 18/05/2011 16:32:37
#374300
Bom amigos meu problema é :
Qual codificação uso para editar dados das tabelas criadas
fiz um form de pesquisa que me traz os dados
mas como disse queria criar um botão editar para o caso de haver alguma modificação nos serviços ou data de entrega.
conto com ajuda o mais breve possivel pois o tempo de entrega do software esta acabando
grato desde já.
abaixo mando meu codigo de pesquisar q esta funcionando bem.
TECLA 18/05/2011 21:10:53
#374332
Segue um método de exemplo:

Public Sub atualizaCliente(ByVal Codigo As Integer, ByVal Nome As String, ByVal ClienteEndereco As String,_
 ByVal ClienteCidade As String, ByVal ClienteEstado As String, ByVal ClienteTelefone As String, ByVal ClienteEmail As String) 
        Dim strConexaoOleDb As String = ConfigurationSettings.AppSettings([Ô]strConexaoBD[Ô])
        Dim strSQL As String = [Ô]UPDATE Cliente SET Nome=[ô][Ô] & Nome & [Ô][ô], Endereco=[ô][Ô] & ClienteEndereco & [Ô][ô], Cidade=[ô][Ô] _ 
& ClienteCidade & [Ô][ô],  Estado=[ô][Ô] & ClienteEstado & [Ô][ô], Telefone=[ô][Ô] & ClienteTelefone & [Ô][ô] WHERE Codigo=[Ô] & Codigo & [Ô][Ô]
        Try
            conexaoOleDb = Cria_Conexao_OleDb(strConexaoOleDb)
            daOleDb = cria_DataAdapter_OleDb(conexaoOleDb, strSQL)
            comandoOleDb = cria_Comando_OleDb(conexaoOleDb, strSQL)
            conexaoOleDb.Close()
        Catch mExcecao As System.Exception
            mErro = mExcecao.ToString
            conexaoOleDb.Close()
        End Try
End Sub


Fonte: http://www.macoratti.net/vbn_ccco.htm
Tópico encerrado , respostas não são mais permitidas
Voltar