03/05/2008, 09:30
|
| | | Fecha de Ingreso: noviembre-2006
Mensajes: 45
Antigüedad: 18 años, 5 meses Puntos: 0 | |
| Re: Problema al convertir de numeros a texto
Nada pense que si m habia funcionado pero nada
Dim codigo2 As String
For i = 0 To contador - 1
rsAddV.AddNew
rsAddV!ID = codigo
rsAddV!ID_Cliente = frmRechSol.txtSolicitud(0).Text
rsAddV!Imp_Venta = total / Val(Me.txtPlazos.Text)
rsAddV!Fec_Venta = Date
rsAddV!Cod_Mueble = aMuebles(i)
codigo2 = AutoCodigo(rsAddV, "Cod_Venta")
rsAddV!Cod_Venta = codigo2
rsAddV.Update
Next
la primera iteracion si que m lo hace pero en la segunda me da error update o cancelupdat sin addnew o edit. |