Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/05/2005, 11:40
Avatar de u_goldman
u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses
Puntos: 98
Clases como triángulo de las Bermudas

No salgo de mi asombro...alguien tiene alguna explicación?
Resulta que estoy generando un sistema de pagos, y bueno...entre otras cosas tengo que enviar un requestID, pensé en hacerlo mediante la fecha y la propiedad sessionID, hasta ahí todo bien, pero cuando trato de asignar el valor de este miembro desde adentro de la clase....me manda como fecha 12/30/1899, si lo asigno desde afuera, está todo bien, obviamente lo resolví asignando este valor desde afuera, pero no encuentro la explicación, a alguien le ha pasado esto??

Les dejo el fragmento de la clase

Código:
Class Epayment
'Private members
            Private m_RequestID

	Public Property Get RequestID()
		RequestID = m_RequestID
	End Property
	Public Property Let RequestID(p_data)
		m_RequestID = p_data
	End Property

	Public Function CallPaymentSystem()
		Dim PostData
		Dim ObjXML
		Dim ObjXSL
		Dim xmlFileName
		Dim boolProceed
                          
                         m_RequestID = cstr(month(date) & day(date) & year(date) & replace(replace(time(), ":", "")," ","") & session.sessionID)
            End Function            
End Class
Si desde afuera asigno a la propiedad RequestID el mismo valor, lo hace correctamente.

Dato curioso! salu!!!!
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway