Txt file as a linked server

• deepforest

  SSCommitted

  Points: 1780

  More actions

  January 15, 2008 at 9:07 am

  #69417

  Anyone knows how to specify space delimited text as a linked server (in schema.ini, maybe)?

  thnx

• ziminski

  SSC Veteran

  Points: 221

  More actions

  January 15, 2008 at 9:38 am

  #768224

  http://msdn2.microsoft.com/en-us/library/ms974559.aspx

  On Error Resume Next

  Const adOpenStatic = 3

  Const adLockOptimistic = 3

  Const adCmdText = &H0001

  Set objConnection = CreateObject("ADODB.Connection")

  Set objRecordSet = CreateObject("ADODB.Recordset")

  strPathtoTextFile = "C:\Databases\"

  objConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _

  "Data Source=" & strPathtoTextFile & ";" & _

  "Extended Properties=""text;HDR=YES;FMT=Delimited"""

  objRecordset.Open "SELECT * FROM PhoneList.csv", _

  objConnection, adOpenStatic, adLockOptimistic, adCmdText

  Do Until objRecordset.EOF

  Wscript.Echo "Name: " & objRecordset.Fields.Item("Name")

  Wscript.Echo "Department: " & _

  objRecordset.Fields.Item("Department")

  Wscript.Echo "Extension: " & objRecordset.Fields.Item("Extension")

  objRecordset.MoveNext

  Loop