Populate a Adobe PDF form using vb6 code

I just need a vb6 code that do the following tasks: 1-Open a pdf file created with Adobe Live Cycle Designer 2-Change the value property of 4 text fields 3-Save the pdf file 4-close the pdf file I already have the code but for some reason it does not work: Declarations Option Explicit Dim gApp As [login to view URL] Dim gPDDoc As [login to view URL] Dim jso As Object ' this is the java script object Dim iFileName As String Dim iNewFileName As String Dim iTopWarningField As Object Dim iCurrentDateField As Object Dim iLastNameField As Object Dim iFirstNameField As Object Dim SaveRet As Integer Private Sub Command1_Click() iFileName = "C:\Documents and Settings\User\My Documents\cfrm\pdf\New Patient Form.pdf" iNewFileName = "C:\Documents and Settings\User\My Documents\cfrm\pdf\New Patient Form.pdf" Set gApp = CreateObject("AcroExch.App") Set gPDDoc = CreateObject("AcroExch.PDDoc") If [login to view URL](iFileName) Then Set jso = [login to view URL] 'set the java script object 'Now start to get a pointer to the pdf fields Set iTopWarningField = [login to view URL]("F1[0].Page1[0].TopWarning[0]") Set iCurrentDateField = [login to view URL]("F1[0].Page1[0].CurrentDate[0]") Set iFirstNameField = [login to view URL]("F1[0].Page1[0].Patient[0].FirstName[0]") Set iLastNameField = [login to view URL]("F1[0].Page1[0].Patient[0].LastName[0]") 'Now start to set the property value of the text fields in the pdf form [login to view URL] = "text" [login to view URL] = CStr([login to view URL]) [login to view URL] = [login to view URL] [login to view URL] = [login to view URL] [login to view URL] "New Patient Form_API" '[login to view URL] (PDDocRequiresFullSave) SaveRet = [login to view URL](PDSaveFull, iNewFileName) '-1 if saved successfully [login to view URL] End If End Sub