Jump to content
Fórum Script Brasil
  • 0

Tipo E/ou Tamanho Do Campo


Gabriel Cabral
 Share

Question

aí pessoal....

ve se alguém aí pode me ajudar nisso....

eu tenho duas textbox para serem colocados horarios...

uma é a txtDuracao

outra é a txtAtend_TempoDisp

os dois campo para armazenamento desses "horarios" são do tipo Text

e para subtrair o txtAtend_TempoDisp da txtDuracao eu uso o seguinte codigo

Dim descontarhoraduracao As Integer
Dim descontarminutoduracao As Integer
Dim tempodispatend As String
tempodispatend = txtAtend_TempoDisp.Text

descontarhoraduracao = Hour(txtDuracao.Text)
descontarminutoduracao = Minute(txtDuracao.Text)
txtAtend_TempoDisp.Text = TimeSerial(Hour(tempodispatend) - descontarhoraduracao, Minute(tempodispatend) - descontarminutoduracao, 0)
no final de tudo a conta é feita... mas há um erro ao gravar... eis aqui o erro Run-time error '3163': The field is too small to accept the amount of data you attempted to add. Try inserting or pasting less data Este erro está dando na seguinte linha:
DadosAtendimentos.Recordset.Fields("Atend_TempoDisp") = txtAtend_TempoDisp.Text

está linha está na procedure do botao de comando que grava o registro...

Qual o problema???

Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0
acho que o texto que você quer gravar é maior do que cabe no campo não?? qual o tamanho do campo e qual o texto que aparece na textbox??

O campo é do tipo texto com tamanho 5

e era pra aparecer na textbox e gravar no campo qualquer tipo de horario como xx:xx

Ex.: 09:28

estranho....porque há uns dias atras estava funcionando perfeitamente...

agora está dando esse erro mesmo eu não mudando nada no código...

acho que o texto que você quer gravar é maior do que cabe no campo não?? qual o tamanho do campo e qual o texto que aparece na textbox??

O campo é do tipo texto com tamanho 5

e era pra aparecer na textbox e gravar no campo qualquer tipo de horario como xx:xx

Ex.: 09:28

estranho....porque há uns dias atras estava funcionando perfeitamente...

agora está dando esse erro mesmo eu não mudando nada no código...

Pronto kuroi

axei o problema

a textbox estava com a propriedade MaxLength = 0

coloquei ela = 5

agora ta tudo certinho

obrigado

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.

 Share



  • Forum Statistics

    • Total Topics
      150.1k
    • Total Posts
      647.1k
×
×
  • Create New...