USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  VALORES MONETÁRIOS
Samukaf13
GUARULHOS
SP - BRASIL
ENUNCIADA !
Postada em 14/07/2011 14:51 hs            

Estou fazendo um softer que precisa fazer operações monetárias,
o problema é o seguinte, quando eu cadastro os dados,a conexão
com o banco é realizada normalmente e os dados são salvos no banco,
mas quando eu vou ver o valor que eu digitei assim: 37,89 é salvo
assim: 37,00. Não tem jeito, ele não salva os números após a virgula.

Uso o Visual Basic 6.
Microsoft access 2003, no access, meu campo chama-se valor, tipo de
dados: número, tamanho do campo: decimal, e formato: unidade monetária.

Meu módulo no banco está do seguinte jeito:

Option Explicit
Public cnn As ADODB.Connection
Public con As New ADODB.Connection
Public rsdados As ADODB.Recordset
Public sql As String
Public sql2 As String

Public Function abrebanco()
Set cnn = New ADODB.Connection
cnn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "anco.mdb"
End Function

Será que existe algum complemento ou referência que está faltando?

Por favor, me ajudem, preciso disso urgente.

Fico no aguardo, valeuuu!

Samuka ;)
   
Treze
não registrado
ENUNCIADA !
Postada em 14/07/2011 18:28 hs   
bom vc postou  sua conexão mas o ideal seria vc postar como salva os dados

porém seria algo assim

sSQL = "insert into tabela (campo1,campo2) values('" & CDbl(txtvalor.text) & "',....

veja que onde coloquei cdbl é o nde o valor é convertido para double
   
Eduardo
não registrado
ENUNCIADA !
Postada em 14/07/2011 19:27 hs   
Use campo Unidade monetária.
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página