Access Datenbank Abfrage mit ASP ?

Ch4oS

Grünschnabel
Huhu,

Mein Problem :) :

Ich hab ne Access Datenbank und soll nun mit Hilfe von ASP die Daten ausgeben.
Nur leider hab ich mit ASp noch nie was gemacht.

Kann mir einer nen Tutorial empfehlen das auf das Thema Datenbankenzugriff mit ASp eingeht ? Hab schon hier im Forum un bei Google gesucht bin aber noch nciht so ganz fündig geworden.

Ich mein wenn mir das hier einer schnell erklären kann wär natürlich noch besser :)
Aber selber lernen kann natürlich auch nciht schaden ....

Danke

MfG Ch4oS
 

Ch4oS

Grünschnabel
Ich noch mal :)

hab jetzt bisl gesucht und gebastelt. Nur leider funktioniert das ganze nicht so :( Hier mal mein Quelltext:

Wie gesagt ich hab noch nie mit ASP gearbeitet

-----------------

<html>
<head>
</head>
<body>
<% @ Language="VBScript"
LCID = 1031 %><%
Option Explicit
Response.Buffer = true
Session.LCID = 1031

Dim rs, strConn, Conn, strPfadDB, SQL

set rs = Server.CreateObject("ADODB.Recordset")
strPfadDB = Server.MapPath("ServerKonf.mdb")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPfadDB
SQL = "Select * from Komplett"
rs.Open SQL, strConn, 0, 1

%>
<table border=1>
<tr>
<th bgcolor="#b9b9b9">Rechner</th>
<th bgcolor="#b9b9b9">Betriebssystem</th>
<th bgcolor="#b9b9b9">Netzwerk</th>
<th bgcolor="#b9b9b9">IP-Adresse</th>
<th bgcolor="#b9b9b9">Rechner-Typ</th>
<th bgcolor="#b9b9b9">Haupt</th>
<th bgcolor="#b9b9b9">Festplatten-Kapazität</th>
<th bgcolor="#b9b9b9">Rack-Nr</th>
<th bgcolor="#b9b9b9">Nutzung</th>
<th bgcolor="#b9b9b9">Leistungsaufnahme</th>
<th bgcolor="#b9b9b9">kVA Anzahl</th>
<th bgcolor="#b9b9b9">Wirkleistung (Wärmeabgabe) kW</th>
<th bgcolor="#b9b9b9">kW Anzahl</th>
</tr>
<%
Do while not rs.EOF
Response.Write("<tr>")
Response.Write("<td>" & rs.Fields("Rechner").Value & "</td>")
Response.Write("<td>" & rs.Fields("Betriebssystem").Value & "</td>")
Response.Write("<td>" & rs.Fields("Netzwerk").Value & "</td>")
Response.Write("<td>" & rs.Fields("IP-Adresse").Value & "</td>")
Response.Write("<td>" & rs.Fields("Rechner-Typ").Value & "</td>")
Response.Write("<td>" & rs.Fields("Haupt").Value & "</td>")
Response.Write("<td>" & rs.Fields("Festplatten-Kapazität").Value & "</td>")
Response.Write("<td>" & rs.Fields("Rack-Nr").Value & "</td>")
Response.Write("<td>" & rs.Fields("Nutzung").Value & "</td>")
Response.Write("<td>" & rs.Fields("Leistungsaufnahme").Value & "</td>")
Response.Write("<td>" & rs.Fields("kVA Anzahl").Value & "</td>")
Response.Write("<td>" & rs.Fields("Wirkleistung (Wärmeabgabe) kW").Value & "</td>")
Response.Write("<td>" & rs.Fields("kW Anzahl").Value & "</td>")
Response.Write("</tr>")
rs.MoveNext
Loop

rs.Close
set rs = nothing
%>
</table>
</body>
</html>

----------------------
 

Ch4oS

Grünschnabel
Habs mithilfe der Seite http://www.asphelper.de geschafft die Daten auzulesen

<html>
<head>

</head>
<body>



<%

Response.Buffer = true
Session.LCID = 1031

Dim rs, strConn, Conn, strPfadDB, SQL

set rs = Server.CreateObject("ADODB.Recordset")
strPfadDB = Server.MapPath("Server_Konf.mdb")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPfadDB
SQL = "Select * from Komplett"
rs.Open SQL, strConn, 0, 1

%>

<table border=1>
<tr>
<th bgcolor="#b9b9b9">Rechner</th>
</tr>
<%

Do while not rs.EOF
Response.Write("<tr>")
Response.Write("<td>" & rs.Fields("Rechner").Value & "</td>")
Response.Write("</tr>")
rs.MoveNext
Loop

rs.Close
set rs = nothing
%>
</table>

</body>
</html>


MfG Ch4oS
 

Neue Beiträge