28. oktober 2001 - 15:16Der er
5 kommentarer og 1 løsning
News funktion
Hejsa eksperter jeg har en news funktion som lige nu virker nogenlunde, men jeg vil gerne have den til at løbe min DB baglæns igennem så jeg får de nyeste nyheder. Jeg bruger mySQL server. Og koden er her :
function getNews() dim objRS Set objRS = Server.CreateObject(\"ADODB.Recordset\") Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"driver={MySql};dns=localhost;Database=DMU;uid=twy;pwd=trustno1\" strSQL = \"SELECT * from nyheder\" Conn.Execute (strSQL) set objRS = Conn.Execute(strSQL) objRS.movelast do while not rs.EOF Response.Write \"<table border=0 width=500><tr><td bgcolor=#44401C>\" & rs(\"dato\") & \"</td></tr><tr><td>\" & rs(\"tekst\") & \"</td></tr><tr><td bgcolor=#44401C align=right>\" &_ \"Skrevet af \" & \"<b>\" & rs(\"forfatter\") & \"</b>\" & \"</td></tr><tr><td border=0> </td></tr>\" objRS.moveback loop end function
set rs = nothing
det er måske lidt rodet men hva faeen det skal først virke.
jeg får denne fejl : Fejltype: Microsoft OLE DB Provider for ODBC Drivers (0x80040E24) Rækkesættet understøtter ikke baglæns hentning.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
function getNews() dim objRS Set objRS = Server.CreateObject(\"ADODB.Recordset\") Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"driver={MySql};dns=localhost;Database=DMU;uid=twy;pwd=trustno1\" strSQL = \"SELECT * from nyheder order by dit_autonumeringsfelt desc\" Conn.Execute (strSQL) set objRS = Conn.Execute(strSQL) objRS.movelast do while not rs.EOF Response.Write \"<table border=0 width=500><tr><td bgcolor=#44401C>\" & rs(\"dato\") & \"</td></tr><tr><td>\" & rs(\"tekst\") & \"</td></tr><tr><td bgcolor=#44401C align=right>\" &_ \"Skrevet af \" & \"<b>\" & rs(\"forfatter\") & \"</b>\" & \"</td></tr><tr><td border=0> </td></tr>\" objRS.movenext loop end function
set rs = nothing
Du skal erstatte dit_autonumeringsfelt med hvad det du identificerer hver nyhed med....det er sikkert id
Jeg fik det til at virke med \"desc\" men hvordan opretter jeg en table med autonummering ? Lige nu sortere jeg på dato + tid. Men ikke et ID felt
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.