Insert duplicado

[flag 0]

Eu estou começando agora com aspx, e estou indo devagar. Porém encontrei um problema.

 

Eu estou inserindo alguns valores na tbl_Produtos, porém os valores são inseridos duplicados.

 

Alguém tem um dica?

 

Segue o código abaixo o código:

 

If (Me.IsValid) Then

 

Dim strBDPath As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Documents and Settings\pato\Meus documentos\Visual Studio 2005\WebSites\PhoneShop\App_Data\db_PhoneShop.mdf;Integrated Security=True;User Instance=True"

 

Dim Conexao As SqlConnection = New SqlConnection()

Dim Command As SqlCommand = New SqlCommand()

Conexao.ConnectionString = strBDPath

Conexao.Open()

 

Command.Connection = Conexao

Command.CommandType = CommandType.Text

Command.CommandText = "INSERT INTO tbl_Produtos (COD_CAT,COD_SUBCAT,PROD_Nome,PROD_Desc,PROD_Preco,PROD_Img) VALUES (" & comboCat.Text & ",'1','" & txtProduto.Text.ToUpper & "','" & txtDesc.Text & "','" & txtValor.Text & "','" & txtImg.Text & "')"

 

Command.ExecuteNonQuery()

 

Conexao.Close()

 

End If

 

Ps.: O mais estranho é que eu estou o mesmo modelo de código em uma outra página que está inserindo somente uma vez.

 

De qualquer forma vlw galera

Abraços

[eriva_br 7]

tenta coloca um break-point (F9) no inicio da função e vai deputando passo a passo (F11) pra ver se verifica pq. ele entra na segunda vez ai na mesma função