Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: uadm26
  • Order by date
  1. uadm26

    Collect data from table and write to a file

    Thank's PHV. But I decide to use something to output like csv: But thank's any way. Set Rs1 =CreateObject( "ADODB.Recordset" ) Rs1.Open Source, Connect, adOpenForwardOnly Do while not Rs1.EOF WScript.Echo Rs1(0) & "," & Rs1(1) Rs1.movenext Loop
  2. uadm26

    Collect data from table and write to a file

    Help me to finish this code, please. Dim Source Dim Connect Dim Rs1,intString Source = "SELECT * FROM UnidadeOrganica" Connect = "Provider=sqloledb;Data Source=SQL2PMACL02;" & _ "Initial Catalog=GrupoBanifMCS;Integrated Security=SSPI;" Set Rs1 =CreateObject( "ADODB.Recordset" )...
  3. uadm26

    Collect data from table and write to a file

    Has I can see it's not so easy, maybe I will use other way to get this information.
  4. uadm26

    Collect data from table and write to a file

    Hi, PHV That's my problem, when I use "count(*)" and this code, I only get one line. cmd.Prepared = True Set rs = cmd.Execute sunumber = rs(0) wscript.echo sunumber cn.Close But I need to insert the code to get all rows information to a file. That must be something like using a loop.
  5. uadm26

    Collect data from table and write to a file

    Hi, I need to do a vbscript or a VB that connect to a database, execute a sql statement and send the output to a file. I have the done something so far, but I can't finish it. Can someone help me? Dim cmd Dim rs Dim params Dim param Dim ArgObj, sunumber Set ArgObj = WScript.Arguments set...

Part and Inventory Search

Back
Top