title: How can I modify this VBScript?
body: <p>Our company runs a mixed environment of Linux and Windows servers (accounts side on Windows, orders side on Linux). We have to synchronise some information about customer accounts between these systems.</p>
  
  <p>Below is one of the scripts that we have scheduled on a Windows server to export customer account information to a text file that then gets picked up by a Linux server and imported.</p>
  
  <p>What I wanted to do, to make the workflow better and to improve the speed was to also do the SQL update on the Linux server from within the script, rather than exporting and then waiting for the Linux server to collect it. </p>
  
  <p>Is it possible?</p>
  
  <p>My experience mainly lies in Linux scripting (bash etc.) but I did manage to write the below script originally with some help.</p>
  
  <h2>Existing script</h2>
  
  <pre><code>Option Explicit
  
  Dim sDir : sDir = "\\Server\Data"
  Dim sCS  : sCS  = Join(Array( _
          "Provider=vfpoledb" _
        , "Data Source=" &amp; sDir _
        , "Collating Sequence=general" _
  ), ";")
  Dim oCN : Set oCN = CreateObject("ADODB.CONNECTION")
  oCN.Open sCS
  Dim oRS : Set oRS = oCN.Execute("SELECT SN_ANALSYS, SN_CRLIM, SN_CURRBAL FROM " &amp; WScript.Arguments(0) &amp; "_SNAME.DBF WHERE SN_ANALSYS != '' ORDER BY SN_ANALSYS ASC")
  Do Until oRS.EOF
     WScript.Echo oRS.Fields(0).value, "50", oRS.Fields(1).Value
     WScript.Echo oRS.Fields(0).value, "51", oRS.Fields(2).Value
     oRS.MoveNext
  Loop
  oCN.Close
  </code></pre>
  
  <h2>New script</h2>
  
  <pre><code>Option Explicit
  
  Dim sDir : sDir = "\\Server\Data"
  Dim sCS  : sCS  = Join(Array( _
          "Provider=vfpoledb" _
        , "Data Source=" &amp; sDir _
        , "Collating Sequence=general" _
  ), ";")
  Dim oCN : Set oCN = CreateObject("ADODB.CONNECTION")
  oCN.Open sCS
  Dim oRS : Set oRS = oCN.Execute("SELECT SN_ANALSYS, SN_CRLIM, SN_CURRBAL FROM " &amp; WScript.Arguments(0) &amp; "_SNAME.DBF WHERE SN_ANALSYS != '' ORDER BY SN_ANALSYS ASC")
  Do Until oRS.EOF
     //
     // make connection to Oracle SQL server on Linux server
     // run update statement using oRS.Fields
     //
     oRS.MoveNext
  Loop
  oCN.Close
  </code></pre>
  
  <p>I already have the Oracle Instant Client installed on the Windows server since we use it for other things.</p>