Editar no GridView

[taiti 0]

Bom dia, estava precisando de uma ajuda para editar no GridView Fiz a sequintes funções , mas na hora de fazer o upload ele dar erro , gostaria de saber oq fiz de errado.

 

Protected Sub GridView1_RowEditing(ByVal scod As Object, ByVal e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GridView1.RowEditing

GridView1.EditIndex = e.NewEditIndex

End Sub

 

Protected Sub GridView1_RowCancelingEdit(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCancelEditEventArgs) Handles GridView1.RowCancelingEdit

GridView1.EditIndex = -1

End Sub

 

Protected Sub GridView1_RowUpdating(ByVal scod As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating

'Para pegar o valor do textBox que esta na segunda coluna da minha grid

Dim vv As TextBox = GridView1.Rows(e.RowIndex).Cells(2).Controls(0)

Dim cmm As SqlCommand = BD.CriarCommand

cmm.CommandText = "update cliente set cod = @cod,nome=@nome,ende=@ende,tel=@tel where cod=@cod"

cmm.ExecuteNonQuery()

GridView1.EditIndex = -1

End Sub

[quintelab 91]

Qual o erro taiti ?

[taiti 0]

Object reference not set to an instance of an object

, ONDE ELE APONTA O ERRO A ESSA FUNÇÃO:

 

Public Shared Function CriarCommand() As SqlCommand

Dim cmm As SqlCommand = Con.CreateCommand

If Not (Tran Is Nothing) Then

cmm.Transaction = Tran

End If

CriarCommand = cmm

End Function

 

mas especificamente na primeira linha

[taiti 0]

Consequir sanar aquele erro abrir o banco na função:

 

Protected Sub GridView1_RowUpdating(ByVal scod As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating

'Para pegar o valor do textBox que esta na segunda coluna da minha grid

Try

BD.Abrir()

Dim vv As TextBox = GridView1.Rows(e.RowIndex).Cells(2).Controls(0)

Dim cmm As SqlCommand = BD.CriarCommand

cmm.CommandText = "update cliente set cod=@cod"

cmm.Parameters.Add("@cod", SqlDbType.Int).Value = scod

cmm.ExecuteNonQuery()

GridView1.EditIndex = -1

Finally

BD.Fechar()

End Try

End Sub

 

 

mas ele me dao o sequinte erro agora:

 

Failed to convert parameter value from a GridView to a Int32.

 

Quem puder ajudar agradeço