Fecha de emisión en el script vb [duplicado]

Esta pregunta ya tiene una respuesta aquí:

Dar formato a la fecha y hora actuales en VBScript 1 respuesta

Mi problema es cuando recupero la fecha que me da en este formato:

lastseenstatus=rsprefobj("lastseentstamp")

19-07-2014 15:31:32

Lo quiero en7/19/2014 3:31:32 PM formatear conAM/PM intacto.

Por favor ayuda..

Respuestas a la pregunta(2)

Su respuesta a la pregunta