Results 1 to 2 of 2
  1. #1
    Join Date
    Dec 2002
    Location
    KY
    Posts
    56

    Unanswered: Getting a error in DTS Active x script

    Can anybody help me with this?

    I'm trying to update three fields in one table from an import table. Is the anything you see missing in my code:

    Dim rs1, strSQL

    strSQL = "Select safety_valve_cap, hydro_date, hydro_psi, state_No From HBC_ZImport"
    set rs1 = objConn.Execute(strSQL)

    Do While NOT rs1.EOF

    strSQL = "Update HBC_Boiler_Inspection set Safety_Valve_Cap = '" & rs1 ("Safety_Valve_Cap") & "', "
    strSQL = strSQL & " Hydro_PSI = '" & rs1 ("Hydro_PSI") & "', "
    strSQL = strSQL & " Hydro_Date = '" & rs1 ("Hydro_Date") & "' "
    strSQL = strSQL & " where Boiler_ID = (Select ID from HBC_Boiler where State_No = ' " & rs1 ( "State_No") & " ') & " ' "
    objConn.Execute(strSQL)

    rs1.MoveNext()
    Loop

    Function Main()
    Main = DTSTaskExecResult_Success
    End Function

  2. #2
    Join Date
    Dec 2002
    Posts
    1,245

    Re: Getting a error in DTS Active x script

    Look at http://dbforums.com/t673820.html

    Hugh Scott


    Originally posted by Bigced_21
    Can anybody help me with this?

    I'm trying to update three fields in one table from an import table. Is the anything you see missing in my code:

    Dim rs1, strSQL

    strSQL = "Select safety_valve_cap, hydro_date, hydro_psi, state_No From HBC_ZImport"
    set rs1 = objConn.Execute(strSQL)

    Do While NOT rs1.EOF

    strSQL = "Update HBC_Boiler_Inspection set Safety_Valve_Cap = '" & rs1 ("Safety_Valve_Cap") & "', "
    strSQL = strSQL & " Hydro_PSI = '" & rs1 ("Hydro_PSI") & "', "
    strSQL = strSQL & " Hydro_Date = '" & rs1 ("Hydro_Date") & "' "
    strSQL = strSQL & " where Boiler_ID = (Select ID from HBC_Boiler where State_No = ' " & rs1 ( "State_No") & " ') & " ' "
    objConn.Execute(strSQL)

    rs1.MoveNext()
    Loop

    Function Main()
    Main = DTSTaskExecResult_Success
    End Function

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •