String Or Binary Data Would Be Truncated

[mestre fyoda]

o campo data ele é dateBox é um .ocx que eu baixei é o Input32X .

porque ta dando esse erro ?

eu já testei no sql e não é o sql o campo é grande e verifiquei mas não é o tamanho do campo .

[William Rodrigues]

Salve!

Vix...parada estranha cara...Quando começa assim, eu reinstalo logo (brincadeira)

Nos mostre parte do código e indique onde aparece o erro cara.

Usa que tipo de conexão?

Abraços,

William Rodrigues

[mestre fyoda]

aqui esta o erro .

Private Sub Image1_Click()

Set teste = cn.Execute(" Insert into Agendar_Consulta (nom_pac,hora,data) values('" & nome.Text & "','" & hora.Value & "','" & data.Value & "') ")

Unload Me

End Sub

Conexao :

Global cn As ADODB.Connection

Global rs As ADODB.Recordset

Global rs2 As ADODB.Recordset

Global agenda As String

Private Sub Main()

Dim strArquivo As String

Dim strLocal As String

Dim Conexao As String

Set cn = New ADODB.Connection

Set rs = New ADODB.Recordset

Set cn = CreateObject("ADODB.Connection")

Conexao = "Driver={SQL Server};" & _

"Server=RAFAEL;" & _

"Database=Dentista;" & _

"Uid=sa;Pwd=janio1;"

cn.CursorLocation = adUseClient

cn.Open Conexao

Agendamento.Show

End Sub

[mariozneto]

Veja seu código:

Set teste = cn.Execute(" Insert into Agendar_Consulta (nom_pac,hora,data) values('" & nome.Text & "','" & hora.Value & "','" & data.Value & "') ")

o Certo seria assim:

Set teste = cn.Execute(" Insert into Agendar_Consulta (nom_pac,hora,data) values('" & nome.Text & "',#" & hora.Value & "#,#" & data.Value & "#) ")

Amigo, você terá que usar Malha para salvar um Campo data!!!!

Falow... T+

[mestre fyoda]

eu salvei um campo data sem usar malha .

to começando a entender esses erros de eof e bof ... .

[mariozneto]

eu salvei um campo data sem usar malha .

to começando a entender esses erros de eof e bof ... .

Mas o Campo no seu Banco de Dados estava com tipo "Date" ????

Falow... T+

[mestre fyoda]

não ta , não curto usar , uso text porque ai manipulo , mas antes quando usava dava pau .

[mariozneto]

não ta , não curto usar , uso text porque ai manipulo , mas antes quando usava dava pau .

Me desculpe amigo, mas existe muita coisa que você não poderá fazer, colocando uma data em um Campo texto!!!! Porque você não aprende a trabalhar com data ????

Toda dúvida que você tiver, eu me comprometo a lhe ensinar, tenha certeza que você vai gostar!!!!

Falow... T+

[mestre fyoda]

heheh já desenvolvi sistemas sem campo data e com , mas eu preferi mexer sem .

não é questão d saber ou não .

[mariozneto]

heheh já desenvolvi sistemas sem campo data e com , mas eu preferi mexer sem .

não é questão d saber ou não .

OK!!!!

Mas se precisar de ajuda me fala!!!!

Falow... T+

[mestre fyoda]

ok . se presizar tambem de ajuda estou aqui .

me ajuda la com o outro tópico

[mariozneto]

ok . se presizar tambem de ajuda estou aqui .

me ajuda la com o outro tópico

OK!!!

Falow... T+