Tobi: Tabellenstruktur einer AccessDB in ASP auslesen

Beitrag lesen

Also bei mir hat folgendes funktioniert:

<%
str_Connection_Ziel  = DeineDSN

'Verbindung herstellen
 SET objConn = Server.CreateObject("ADODB.Connection")
 objConn.Open str_Connection_Ziel

str_FieldSQL = "SELECT TOP 1 * FROM DeineTabelle"
 'RecordSet erzeugen
 Set RS = objConn.Execute(str_FieldSQL)

str_Spalten = "<select name=""Spalten"" size=""8"" multiple>" & vbCrLF

FOR i = 0 TO (RS.Fields.Count -1)

str_ZielSpalten = str_Spalten & "<option value=""" & RS(i).Name & """>" & RS(i).Name & "</option>" & vbCrLf

NEXT

str_Spalten = str_Spalten & "</select>" & vbCrLF

'Alles schließen
 RS.Close
 objConn.Close
%>

Hoffe es funktioniert,
Tobi