|
| Læs fra tekstfil ODBC Fra : Allan Schuster Bach |
Dato : 28-01-02 22:03 |
|
Jeg har forsøgt, forgæves, at læse fra en tekst fil, hvad hjælp af adodb.
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Text Driver
(*.txt;*.csv)};DefaultDir=c:\inetpub\wwwroot\test\_private"
Set RS = Conn.Execute ("SELECT * From form_results.txt")
Og jeg få følgende fejl
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
/test/process1.asp, line 9
hvor linie 9 er conn.open, hvilken selvfølgelig er data tilslutningen. Men
umiddelbart kan jeg ikke se hvad der går alt, en der kan hjælpe
Allan Bach
| |
Anders H. Poulsen (23-02-2002)
| Kommentar Fra : Anders H. Poulsen |
Dato : 23-02-02 19:50 |
|
"Allan Schuster Bach" <dsl33239@vip.cybercity.dk> skrev i en meddelelse
news:a34e8s$2np5$1@news.cybercity.dk...
> Jeg har forsøgt, forgæves, at læse fra en tekst fil, hvad hjælp af adodb.
>
> Set Conn = Server.CreateObject("ADODB.Connection")
>
> Allan Bach
>
Hej Allan
Jeg har også (for en del tid siden) bikset med tekstfiler.
Nedenstående kode virkede for mig. Måske kan det også hjælpe dig!.
--------------------
Dim oConn As New ADODB.Connection
Dim oRS As New ADODB.Recordset
Dim Fil as String
Fil = "99112100.TXT"
'ODBC Text Driver
oConn.Mode = adModeUnknown
oConn.ConnectionString = _
"Provider=MSDASQL;" & _
"Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"Dbq=D:\Projekter\VB\ADO\Logfiler\;" & _
"Extensions=asc,csv,tab,txt;" & _
"Persist Security Info=False"
oConn.Open
oRS.CursorLocation = adUseClient
oRS.Open "Select * From " & Fil & "", _
oConn, adOpenStatic, adLockReadOnly, adCmdText
Set oRS.ActiveConnection = Nothing
Set DataGrid1.DataSource = oRS
--------------------
Mvh
Anders H. Poulsen
| |
|
|