|
|
Postada em 30/06/2006 11:59 hs
amigos, estou pegando uma data d um codigo d barras, entao a data vem assim (20061201 "mes,mes,dia), ai quero salvar essa data d pagamento no banco access, so q preciso formatar assim (01122006, "dia,mes,ano), estou usando assim: TabCad("DatPgtParc1") = Format(G, "dd/mm/yyyy") so q dá erro: rum timer errro "6" overflow por dá erro, ja mudei a declaracao da variavel para (Data, date, long, strin, interger)... como corrijo isso?
|
|
|
|
|
|
|
|
Postada em 30/06/2006 16:41 hs
Olá, A função Format não tem como reconhecer o conteúdo da sua variável como uma data. Por isso, você terá que fazer manualmente: Dim SuaData as String SuaData = Right$(G, 2) & "/" & Mid$(G,5,2) & "/" Left$(G,2) TabCad!DatPgtParc1 = CDate(SuaData) Um abraço, Sandro.
|
|
|
|
CarlinhosBrown
não registrado
|
|
Postada em 01/07/2006 12:46 hs
amigo sandro, deu erro na linda , SuaData = Right$(G, 2) & "/" & Mid$(G,5,2) & "/" Left$(G,2), talvez falte alguma coisa ai q nao descobri poderia me ajudar novamente...
|
|
|
|
|
|
Postada em 01/07/2006 18:03 hs
Olá, Vou tentar te ajudar, mas o que contém a variável G que você escreveu no primeiro tópico? Eu imaginei que fosse a data no formato ano,mes, dia. Além disso, qual o erro que deu?
|
|
|
|
|
|
Postada em 03/07/2006 07:42 hs
Dim SuaData as String SuaData = MID(G, 7,2) & "/" & Mid(G,5,2) & "/" MID(G,1,4)
|
|
|
|
|