databas connection

8 svar · 649 visningar · startad av deleex 30 sep. 2003

deleexMedlem sedan maj 2003107 inlägg

Frågan30 sep. 2003 07:57#1

Här nedan finns en liten databaskoppling jag skulle vilja ha
hjälp med, det är så att den här databaskopplingen skriver
ut nyheter från ett nyhetsscript, fast nu vill jag bara visa
de 5 senaste nyheterna... hur gör jag...??

<%
Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("db/members.mdb")

SQL = "SELECT * From mess ORDER BY id DESC"
Set rs = db.Execute(SQL)
%>

<%
Do Until rs.EOF
%>

<%=rs("till")%> | <%=rs("rubrik")%> <br>

<%
rs.MoveNext
Loop
%>

@ndersMedlem sedan juni 200032 967 inlägg

30 sep. 2003 07:59#2

SQL = "SELECT [b]TOP 5 [/b]* From mess ORDER BY id DESC"

Använd gärna [kod]-taggarna dock.

Mvh

Engine^Medlem sedan dec. 20003 887 inlägg

30 sep. 2003 09:01#3

Du bör även använda dig av OleDb istället för Odbc, när du skapar connections...

MSDN skrev:

Data Access Performance

Use the native OLE DB connection strings as much as possible. Native OLE DB connection strings are generally faster than most ODBC DNSs. In addition, OLE DB connection strings are more flexible because your application will be able to make use of any OLE DB provider.

db.Open "Provider=Microsoft.Jet.OleDb.4.0; Data Source=" & Server.MapPath("db/members.mdb")

danisMedlem sedan aug. 2002157 inlägg

30 sep. 2003 09:06#4

<% 
Set db = Server.CreateObject("ADODB.Connection") 
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("db/members.mdb") 

Set rs = db.Execute("SELECT TOP 5 * From mess ORDER BY id DESC") 
Do Until rs.EOF 

response.write ""&rs("till")&" | "&rs("rubrik")&"<br>"

rs.MoveNext 
Loop 
rs.close : set rs = nothing
%>

StevePMedlem sedan mars 2003772 inlägg

30 sep. 2003 09:37#5

läs inlägget ovan Danis

<% 
Set db = Server.CreateObject("ADODB.Connection") 
db.Open "Provider=Microsoft.Jet.OleDb.4.0; Data Source=" & Server.MapPath("db/members.mdb")
Set rs = db.Execute("SELECT TOP 5 * From mess ORDER BY id DESC") 
Do Until rs.EOF 

response.write ""&rs("till")&" | "&rs("rubrik")&"<br>"

rs.MoveNext 
Loop 
rs.close : set rs = nothing
%>

danisMedlem sedan aug. 2002157 inlägg

1 okt. 2003 00:44#6

Som jag ansåg så var inte databaskopplingen så viktig i denna fråga. :)

StevePMedlem sedan mars 2003772 inlägg

1 okt. 2003 10:00#7

Den är väl alltid viktig?

deleexMedlem sedan maj 2003107 inlägg

3 okt. 2003 18:13#8

Jag har redan från första svaret fixat så att de 5 senaste inläggen visas... :)

Nexus86Medlem sedan okt. 20023 030 inlägg

3 okt. 2003 18:17#9

Då skulle det väl inte vara för mycket begärt att acceptera det inlägget som svar så om någon söker efter lösning på samma problem så kan han/hon välja att bara visa lösta trådar. :)