NAO CONSIGO GRAVAR DADOS

ANINHA 27/03/2011 11:10:19
#369338
Bom dia,

Não estou conseguindo gravar os dados no SQLServer...

Erro >> O formato da seqüência de inicialização não está de acordo com a especificação iniciada no índice 0.

Erro na linha >> Dim con As New SqlConnection(strCon)

  Imports Microsoft.VisualBasic
Imports System.Data.SqlClient




Public Class Banco
    Private strCon As String

    Public Sub New()
        strCon = strCon = [Ô]Data source=.\SQLEXPRESS;AttachDbFilename=C:\Documents and Settings\Ana Cláudia\Meus documentos\Visual Studio 2008\WebSites\WebSiteTeste\App_Data\Database.mdf;Integrated Security=True;User Instance=True[Ô]
        [ô][ô] strCon = strCon = [Ô]Data source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Database.mdf;Integrated Security=True;User Instance=True[Ô]

    End Sub

    Public Function SalvarDadosLogin(ByVal usuario As String, ByVal senha As String, ByVal idlogin As String) As Boolean
        Dim gravou As Boolean
        Dim con As New SqlConnection(strCon)





        Dim comando As New SqlCommand([Ô]SalvarDadosLogin[Ô], con)
        comando.CommandType = Data.CommandType.StoredProcedure

        comando.Parameters.Add(New SqlParameter([Ô]@usuario[Ô], Data.SqlDbType.VarChar, 20))
        comando.Parameters([Ô]@usuario[Ô]).Value = usuario
        comando.Parameters.Add(New SqlParameter([Ô]@senha[Ô], Data.SqlDbType.VarChar, 10))
        comando.Parameters([Ô]@senha[Ô]).Value = senha
        comando.Parameters.Add(New SqlParameter([Ô]@idlogin[Ô], Data.SqlDbType.Int))
        comando.Parameters([Ô]@idlogin[Ô]).Value = idlogin


        Try
            con.Open()
            gravou = comando.ExecuteNonQuery




        Catch ex As Exception

            MsgBox([Ô]ERRO[Ô], MsgBoxStyle.Information, [Ô]ATENÇÂO[Ô])

        Finally
            con.Close()

        End Try

        Return gravou



 End Function


End Class
PEGUDO 27/03/2011 12:29:45
#369344
Tem sinal de iqual demais
strCon [txt-color=#e80000]=[/txt-color] strCon = [Ô]Data source=.\SQLEXPRESS...

Exemplo:
Dim sqlConnectString As String = [Ô]Data Source=.\SQLEXPRESS;AttachDbFilename=[txt-color=#e80000]CaminhoDoBancoDeDados[/txt-color]\[txt-color=#e80000]SeuBancoDeDados.mdf[/txt-color];Integrated Security=True;User Instance=True[Ô]
FERRETTO 27/03/2011 17:23:09
#369360 Resposta escolhida
Tente trocar o [Ô]strCon = strCon =[Ô] por [Ô]strCon = strCon &[Ô] se for necessario strCom receber ele mesmo, se não, apenas utilize o exemploa acima
ANINHA 27/03/2011 17:44:28
#369362
Oi,

Finalmente deu certo...

Ficou assim...

   strCon = strCon & [Ô]Data source=.\SQLEXPRESS;AttachDbFilename=C:\WebSiteTeste\App_Data\Database.mdf ;Integrated Security=True;User Instance=True[Ô]


Muito obrigada aos dois pela atenção e ajuda...
Tópico encerrado , respostas não são mais permitidas
Voltar