Jump to content
Fórum Script Brasil
  • 0

String Or Binary Data Would Be Truncated


mestre fyoda

Question

11 answers to this question

Recommended Posts

  • 0

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

Link to comment
Share on other sites

  • 0

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+

Link to comment
Share on other sites

  • 0
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!!!! biggrin.gif

Falow... T+

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152k
    • Total Posts
      651.6k
×
×
  • Create New...