Byta connection string för att läsa .csv istället för .xls

2 svar · 426 visningar · startad av Mattias Nordin 6 mars 2006

Mattias NordinMedlem sedan dec. 20051 056 inlägg

Frågan6 mars 2006 13:15#1

Connection string som jag tidigare har använt är:

Set objConn = CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\webroot\table\" &varExcelFileName &" ;Extended Properties=Excel 8.0;"

Vill nu istället köra kommaseparerad fil istället för excel.

Provar med...

<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"Dbq=D:\webroot\table\" &varExcelFileName &";" & _
"Extensions=asc,csv,tab,txt;" & _
"Persist Security Info=False"
%>

Och det ger följande fel:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Text Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x57e8 Thread 0x5794 DBC 0x9ed1024 Text'.

Är det någon som förstår felmeddelandet. Är det ett syntaxfel?

Fredde MannenMedlem sedan nov. 20014 054 inlägg

6 mars 2006 13:41#2

Är inte haj på connectionsstrings, men kan "Persist Security Info=False" ha något med det att göra? För i övrigt ser den rätt ut connectionstringen.. för den typen av Registernyckel har jag inte sett: 'Temporary (volatile) Jet DSN for process 0x57e8 Thread 0x5794 DBC 0x9ed1024 Text' höhö :)

Mattias NordinMedlem sedan dec. 20051 056 inlägg

6 mars 2006 13:45#3

Hade tur och hittade en artikel som förklarade lite mer.

<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
[b]"Dbq=D:\webroot\table\;" & _ [/B]
"Extensions=asc,csv,tab,txt;" & _
"Persist Security Info=False"
%>

<%  'With Excel & ADO, you work with the sheet as a table
if sSearchValue <> "" then 
  Set objRS = objConn.Execute("select * from nya_derivat.csv WHERE Manufacturer = '" &sSearchValue &"'") 
else

Filen anges i sql-frågan.

Det fungerar. :)