16. december 2001 - 19:12
Der er
9 kommentarer og 1 løsning
Isæt asp i html
Hej jeg vil gerne have sat dette: <% Set objConn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"akvarie_db.mdb\") & \"; UID=Administrator; PWD=\" objConn.open DSN response.write \"<html><head><title>Artikel oversigt</title></head><body>\" id=request(\"id\") if id<>\"\" then set objRS = objConn.execute(\"select * from [artikler] where id=\"&id&\"\") if objRS.eof then response.write \"Artiklen du forsøger at få vist eksistere ikke !!\" else response.write \"<B>Slægt : </B> \"&objRS(\"slagt\")&\"<br>\" response.write \"<B>Art : </B> \"&objRS(\"art\")&\"<br>\" response.write \"<B>Var : </B> \"&objRS(\"Var\")&\"<br>\" response.write \"<B>Synonym : </B> \"&objRS(\"synonym\")&\"<br>\" response.write \"<B>Populærnavn : </B> \"&objRS(\"populaernavn\")&\"<br>\" response.write \"<B>Familie : </B> \"&objRS(\"familie\")&\"<br>\" response.write \"<B>Region : </b> \"&objRS(\"region\")&\"<br>\" response.write \"<B>Biotop : </b> \"&objRS(\"biotop\")&\"<br>\" response.write \"<B>Størrelse : </b> \"&objRS(\"stoerrelse\")&\"<br>\" response.write \"<B>Kønsforskel : </b> \"&objRS(\"koensforskel\")&\"<br>\" response.write \"<B>Temperatur : </b> \"&objRS(\"temperatur\")&\"<br>\" response.write \"<B>Adfærd : </b> \"&objRS(\"adfaerd\")&\"<br>\" response.write \"<B>Social : </b> \"&objRS(\"social\")&\"<br>\" response.write \"<B>Foder : </b> \"&objRS(\"foder\")&\"<br>\" response.write \"<B>Opdræt : </b> \"&objRS(\"opdraet\")&\"<br>\" response.write \"<B>Kommentar : </b> \"&objRS(\"kommentar\")& \" \" response.write \"<br>\" response.write \"<B>Hannen : </b> \"&objRS(\"Han\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik\")&\".jpg\"\">\" response.write \"<br>\" response.write \"<br>\" response.write \"<B>Hunnen : </b> \"&objRS(\"Hun\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik_hun\")&\".jpg\"\">\" end if objRS.close : set objRS=nothing else set objRS = objConn.execute(\"select * from [artikler] order by art asc \") if objRS.eof then response.write \"<font color=\"\"blue\"\">Der var desvære ingen artikler i øjeblikket.</font>\" else do while not objRS.eof response.write \"<a href=\"\"default.asp?target=0&id=\" & objRS(\"id\") & \"\"\">\" & objRS(\"art\") & \" - \" & objRS(\"populaernavn\") & \"</a><br>\" objRS.movenext loop end if objRS.close : set objRS=nothing end if response.write \"</body></html>\" objConn.close : set objConn=nothing %> Ind i dette : <html> <head> <style type=\"text/css\"> a:visited { text-decoration: none; color: #cococo } a:link { text-decoration: none; color: #cococo } a:hover { text-decoration: underline; color: #ffffff } </style> <title>Aqua-World . Dk - Forum,Chat,billeder,login, det siger sig selv</title> </head> <body bgcolor=\"#000000\" text=\"#C0C0C0\"> <DIV ID=\"overDiv\" STYLE=\"position: absolute; visibility: hide; z-index: 1; left: 1; top: 1; width: 1; height: 1\"></DIV> <SCRIPT LANGUAGE=\"JavaScript\" SRC=\"../js/overlib.js\"></SCRIPT> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua-World.jpg\" width=\"450\" height=\"125\"></font></td> </tr> </table> </center> </div> <p><font color=\"#000000\"><br> </font> </p> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\"> <tr> <td bgcolor=\"#233547\" style=\"border: 1px solid #606060; \" width=\"150\" valign=\"top\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"1\" width=\"148\"> <tr> <td width=\"100%\" bgcolor=\"#021E38\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua_Menu.jpg\" width=\"150\" height=\"35\"></font></td> </tr> </table> </div> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"148\" bgcolor=\"#C0C0C0\" height=\"306\" style=\"border-collapse: collapse\"> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font face=\"Verdana\" size=\"1\"><font color=\"#000000\"> > </font> <a target=\"_top\" onMouseOver=\"drs(\'Tilbage til den over rå forside!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"INDEX.HTM\"><font color=\"#000000\">Forside</font></a></font><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her er alle nyheder fra TWD, GO GO!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../news/news.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Nyheder</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Kan du ikke lige krasse lidt i vores tagwall (Gæstebog)\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../gbog/gbog.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Forum</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Det her skal du bare se, der er alle de seje links til de seje sider\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../links/links.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Links</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"17\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Leksikon.jpg\" width=\"150\" height=\"35\"></font><tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'YiiR udfordre os lige, vi mangler noget at lave.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/challenge.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Galleri</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Weee vi skal spille, se hvornår TWD har clanwars\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/kalender.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Artikler</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Se Cichlider, Tetra, Barber mm.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/clanwars.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Fisk</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"22\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/opret_login_menu.jpg\" width=\"150\" height=\"35\"></font><tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Join TWD og bliv en af os, vi har brug for dig!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../members/join.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Join</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'ONLY for members\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"arts/Login/default.asp\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Login</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"24\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/kon_menu.jpg\" width=\"150\" height=\"35\"></font><tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Små FilmZ du kan Downloade\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:rasmus@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webdesigner</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her kan du skrive til Webmasteren på Aqua-World.Dk\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:webmaster@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webmaster</font></a><font color=\"#000000\"> </font> </table> </center> </div> <td width=\"7\"></td> <td bgcolor=\"#C0C0C0\" valign=\"top\" width=\"543\" style=\"border: 1px solid #606060; \"> <table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\"> <tr> <td width=\"1%\"> -------- H E R ----- </td> </tr> </table></td> </tr> </table> </div> </td> </tr> </table> </div> </body> </html>
Annonceindlæg fra Computerworld
16. december 2001 - 23:29
#1
du skal da bare knalde det ind i din fil imellem <body> og </body> og selvfølgelig huske at kalde din fil for .asp istedet for htm
16. december 2001 - 23:57
#2
<html> <head> <style type=\"text/css\"> a:visited { text-decoration: none; color: #cococo } a:link { text-decoration: none; color: #cococo } a:hover { text-decoration: underline; color: #ffffff } </style> <title>Aqua-World . Dk - Forum,Chat,billeder,login, det siger sig selv</title> </head> <body bgcolor=\"#000000\" text=\"#C0C0C0\"> <% Set objConn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"akvarie_db.mdb\") & \"; UID=Administrator; PWD=\" objConn.open DSN response.write \"<html><head><title>Artikel oversigt</title></head><body>\" id=request(\"id\") if id<>\"\" then set objRS = objConn.execute(\"select * from [artikler] where id=\"&id&\"\") if objRS.eof then response.write \"Artiklen du forsøger at få vist eksistere ikke !!\" else response.write \"<B>Slægt : </B> \"&objRS(\"slagt\")&\"<br>\" response.write \"<B>Art : </B> \"&objRS(\"art\")&\"<br>\" response.write \"<B>Var : </B> \"&objRS(\"Var\")&\"<br>\" response.write \"<B>Synonym : </B> \"&objRS(\"synonym\")&\"<br>\" response.write \"<B>Populærnavn : </B> \"&objRS(\"populaernavn\")&\"<br>\" response.write \"<B>Familie : </B> \"&objRS(\"familie\")&\"<br>\" response.write \"<B>Region : </b> \"&objRS(\"region\")&\"<br>\" response.write \"<B>Biotop : </b> \"&objRS(\"biotop\")&\"<br>\" response.write \"<B>Størrelse : </b> \"&objRS(\"stoerrelse\")&\"<br>\" response.write \"<B>Kønsforskel : </b> \"&objRS(\"koensforskel\")&\"<br>\" response.write \"<B>Temperatur : </b> \"&objRS(\"temperatur\")&\"<br>\" response.write \"<B>Adfærd : </b> \"&objRS(\"adfaerd\")&\"<br>\" response.write \"<B>Social : </b> \"&objRS(\"social\")&\"<br>\" response.write \"<B>Foder : </b> \"&objRS(\"foder\")&\"<br>\" response.write \"<B>Opdræt : </b> \"&objRS(\"opdraet\")&\"<br>\" response.write \"<B>Kommentar : </b> \"&objRS(\"kommentar\")& \" \" response.write \"<br>\" response.write \"<B>Hannen : </b> \"&objRS(\"Han\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik\")&\".jpg\"\">\" response.write \"<br>\" response.write \"<br>\" response.write \"<B>Hunnen : </b> \"&objRS(\"Hun\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik_hun\")&\".jpg\"\">\" end if objRS.close : set objRS=nothing else set objRS = objConn.execute(\"select * from [artikler] order by art asc \") if objRS.eof then response.write \"<font color=\"\"blue\"\">Der var desvære ingen artikler i øjeblikket.</font>\" else do while not objRS.eof response.write \"<a href=\"\"default.asp?target=0&id=\" & objRS(\"id\") & \"\"\">\" & objRS(\"art\") & \" - \" & objRS(\"populaernavn\") & \"</a><br>\" objRS.movenext loop end if objRS.close : set objRS=nothing end if response.write \"</body></html>\" objConn.close : set objConn=nothing %> <DIV ID=\"overDiv\" STYLE=\"position: absolute; visibility: hide; z-index: 1; left: 1; top: 1; width: 1; height: 1\"></DIV> <SCRIPT LANGUAGE=\"JavaScript\" SRC=\"../js/overlib.js\"></SCRIPT> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua-World.jpg\" width=\"450\" height=\"125\"></font> </td> </tr> </table> </center> </div> <p><font color=\"#000000\"><br> </font> </p> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\"> <tr> <td bgcolor=\"#233547\" style=\"border: 1px solid #606060; \" width=\"150\" valign=\"top\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"1\" width=\"148\"> <tr> <td width=\"100%\" bgcolor=\"#021E38\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua_Menu.jpg\" width=\"150\" height=\"35\"></font> </td> </tr> </table> </div> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"148\" bgcolor=\"#C0C0C0\" height=\"306\" style=\"border-collapse: collapse\"> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font face=\"Verdana\" size=\"1\"><font color=\"#000000\"> > </font> <a target=\"_top\" onMouseOver=\"drs(\'Tilbage til den over rå forside!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"INDEX.HTM\"><font color=\"#000000\">Forside</font></a></font><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her er alle nyheder fra TWD, GO GO!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../news/news.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Nyheder</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Kan du ikke lige krasse lidt i vores tagwall (Gæstebog)\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../gbog/gbog.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Forum</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Det her skal du bare se, der er alle de seje links til de seje sider\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../links/links.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Links</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"17\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Leksikon.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'YiiR udfordre os lige, vi mangler noget at lave.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/challenge.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Galleri</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Weee vi skal spille, se hvornår TWD har clanwars\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/kalender.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Artikler</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Se Cichlider, Tetra, Barber mm.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/clanwars.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Fisk</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"22\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/opret_login_menu.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Join TWD og bliv en af os, vi har brug for dig!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../members/join.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Join</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'ONLY for members\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"arts/Login/default.asp\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Login</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"24\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/kon_menu.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Små FilmZ du kan Downloade\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:rasmus@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webdesigner</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her kan du skrive til Webmasteren på Aqua-World.Dk\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:webmaster@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webmaster</font></a><font color=\"#000000\"> </font> </table> </center> </div> <td width=\"7\"></td> <td bgcolor=\"#C0C0C0\" valign=\"top\" width=\"543\" style=\"border: 1px solid #606060; \"> <table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\"> <tr> <td width=\"1%\"> -------- H E R ----- </td> </tr> </table> </td> </tr> </table> </div> </td> </tr> </table> </center> </div> </body> </html>
17. december 2001 - 18:52
#3
17. december 2001 - 18:56
#4
Hej Gizom Du har også sat den forkerte ind da den skulle være her </font> </table> </center> </div> <td width=\"7\"></td> <td bgcolor=\"#C0C0C0\" valign=\"top\" width=\"543\" style=\"border: 1px solid #606060; \"> <table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\"> <tr> <td width=\"1%\"> -------- H E R ----- </td> </tr> </table> </td> </tr> </table> </div> </td> </tr> </table> </center> </div> </body> </html>
17. december 2001 - 19:14
#5
<html> <head> <style type=\"text/css\"> a:visited { text-decoration: none; color: #cococo } a:link { text-decoration: none; color: #cococo } a:hover { text-decoration: underline; color: #ffffff } </style> <title>Aqua-World . Dk - Forum,Chat,billeder,login, det siger sig selv</title> </head> <body bgcolor=\"#000000\" text=\"#C0C0C0\"> <DIV ID=\"overDiv\" STYLE=\"position: absolute; visibility: hide; z-index: 1; left: 1; top: 1; width: 1; height: 1\"></DIV> <SCRIPT LANGUAGE=\"JavaScript\" SRC=\"../js/overlib.js\"></SCRIPT> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua-World.jpg\" width=\"450\" height=\"125\"></font> </td> </tr> </table> </center> </div> <p><font color=\"#000000\"><br> </font> </p> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"700\"> <tr> <td width=\"100%\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\"> <tr> <td bgcolor=\"#233547\" style=\"border: 1px solid #606060; \" width=\"150\" valign=\"top\"> <div align=\"center\"> <table border=\"0\" cellpadding=\"0\" cellspacing=\"1\" width=\"148\"> <tr> <td width=\"100%\" bgcolor=\"#021E38\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Aqua_Menu.jpg\" width=\"150\" height=\"35\"></font> </td> </tr> </table> </div> <div align=\"center\"> <center> <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"148\" bgcolor=\"#C0C0C0\" height=\"306\" style=\"border-collapse: collapse\"> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font face=\"Verdana\" size=\"1\"><font color=\"#000000\"> > </font> <a target=\"_top\" onMouseOver=\"drs(\'Tilbage til den over rå forside!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"INDEX.HTM\"><font color=\"#000000\">Forside</font></a></font><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her er alle nyheder fra TWD, GO GO!!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../news/news.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Nyheder</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Kan du ikke lige krasse lidt i vores tagwall (Gæstebog)\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../gbog/gbog.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Forum</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Det her skal du bare se, der er alle de seje links til de seje sider\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../links/links.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Links</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"17\"> <p align=\"center\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/Leksikon.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'YiiR udfordre os lige, vi mangler noget at lave.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/challenge.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Galleri</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Weee vi skal spille, se hvornår TWD har clanwars\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/kalender.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Artikler</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Se Cichlider, Tetra, Barber mm.\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../twd/clanwars.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Fisk</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"22\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/opret_login_menu.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Join TWD og bliv en af os, vi har brug for dig!\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"../members/join.htm\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Join</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'ONLY for members\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"arts/Login/default.asp\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Login</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#021E38\" height=\"24\"> <font color=\"#000000\"> <img border=\"0\" src=\"../IMAGES/kon_menu.jpg\" width=\"150\" height=\"35\"></font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Små FilmZ du kan Downloade\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:rasmus@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webdesigner</font></a><font color=\"#000000\"> </font> <tr> <td width=\"100%\" bgcolor=\"#C0C0C0\" height=\"19\"> <font color=\"#000000\" face=\"Verdana\" size=\"1\"> > </font><a target=\"_top\" onMouseOver=\"drs(\'Her kan du skrive til Webmasteren på Aqua-World.Dk\'); return true;\" onMouseOut=\"nd(); return true;\" href=\"mailto:webmaster@aqua-world.dk\"><font face=\"Verdana\" size=\"1\" color=\"#000000\">Webmaster</font></a><font color=\"#000000\"> </font> </table> </center> </div> <td width=\"7\"></td> <td bgcolor=\"#C0C0C0\" valign=\"top\" width=\"543\" style=\"border: 1px solid #606060; \"> <table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\"> <tr> <td width=\"1%\"> <% Set objConn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"akvarie_db.mdb\") & \"; UID=Administrator; PWD=\" objConn.open DSN response.write \"<html><head><title>Artikel oversigt</title></head><body>\" id=request(\"id\") if id<>\"\" then set objRS = objConn.execute(\"select * from [artikler] where id=\"&id&\"\") if objRS.eof then response.write \"Artiklen du forsøger at få vist eksistere ikke !!\" else response.write \"<B>Slægt : </B> \"&objRS(\"slagt\")&\"<br>\" response.write \"<B>Art : </B> \"&objRS(\"art\")&\"<br>\" response.write \"<B>Var : </B> \"&objRS(\"Var\")&\"<br>\" response.write \"<B>Synonym : </B> \"&objRS(\"synonym\")&\"<br>\" response.write \"<B>Populærnavn : </B> \"&objRS(\"populaernavn\")&\"<br>\" response.write \"<B>Familie : </B> \"&objRS(\"familie\")&\"<br>\" response.write \"<B>Region : </b> \"&objRS(\"region\")&\"<br>\" response.write \"<B>Biotop : </b> \"&objRS(\"biotop\")&\"<br>\" response.write \"<B>Størrelse : </b> \"&objRS(\"stoerrelse\")&\"<br>\" response.write \"<B>Kønsforskel : </b> \"&objRS(\"koensforskel\")&\"<br>\" response.write \"<B>Temperatur : </b> \"&objRS(\"temperatur\")&\"<br>\" response.write \"<B>Adfærd : </b> \"&objRS(\"adfaerd\")&\"<br>\" response.write \"<B>Social : </b> \"&objRS(\"social\")&\"<br>\" response.write \"<B>Foder : </b> \"&objRS(\"foder\")&\"<br>\" response.write \"<B>Opdræt : </b> \"&objRS(\"opdraet\")&\"<br>\" response.write \"<B>Kommentar : </b> \"&objRS(\"kommentar\")& \" \" response.write \"<br>\" response.write \"<B>Hannen : </b> \"&objRS(\"Han\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik\")&\".jpg\"\">\" response.write \"<br>\" response.write \"<br>\" response.write \"<B>Hunnen : </b> \"&objRS(\"Hun\")& \" \" response.write \"<br>\" response.write \"<img src=\"\"/akva/images/Artikel/\"&objRS(\"grafik_hun\")&\".jpg\"\">\" end if objRS.close : set objRS=nothing else set objRS = objConn.execute(\"select * from [artikler] order by art asc \") if objRS.eof then response.write \"<font color=\"\"blue\"\">Der var desvære ingen artikler i øjeblikket.</font>\" else do while not objRS.eof response.write \"<a href=\"\"default.asp?target=0&id=\" & objRS(\"id\") & \"\"\">\" & objRS(\"art\") & \" - \" & objRS(\"populaernavn\") & \"</a><br>\" objRS.movenext loop end if objRS.close : set objRS=nothing end if objConn.close : set objConn=nothing %> </td> </tr> </table> </td> </tr> </table> </div> </td> </tr> </table> </center> </div> </body> </html>
18. december 2001 - 16:14
#6
Hej Gizom jeg gir 30 oveni hvis du retter denne <% Farve = 1 Set connect = Server.CreateObject(\"ADODB.Connection\") strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"Forum.mdb\") Connect.Open strDSN Set forums = Connect.Execute(\"SELECT * FROM Forums\") %> <% DO UNTIL Forums.EOF If farve=1 Then baggrund=\"#15A5EA\" Farve= Farve + 1 Else baggrund=\"#1A8AFB\" farve=1 End If %> <%=Baggrund%> style=\"BORDER-RIGHT: rgb(0,0,0) 1px solid;\"><a href=show_data.asp?ForumID=<%=Forums(\"ForumID\")%>><%=Forums(\"Navn\")%></a> <%=Baggrund%>><%=Forums(\"Beskrivelse\")%> <%Forums.MoveNext LOOP %> Fejl er : #15A5EA style=\"BORDER-RIGHT: rgb(0,0,0) 1px solid;\">Test #15A5EA>Dette er Test forummet#1A8AFB style=\"BORDER-RIGHT: rgb(0,0,0) 1px solid;\">Test2 #1A8AFB>Dette er Test2 Forum Hilsen Techno Boy
18. december 2001 - 22:49
#7
Hvad er det egentlig du vil med det? Jeg går ud fra at det du vil udskrive et eller andet afhængigt om farve=1 eller forskelligt fra 1 Du sætter Farve=1 så tester du med en IF sætning om farve=1, det er den jo for du har lige sat Farve til at være 1, så sætter du din variabel baggrund til at være =\"#15A5EA\" og tæller Farve op med +1 så farve nu er lig 2 og du kommer således ikke til at afvikle det kode der står under ELSE da Farve var lig med 1 ved første gennemløb og aldrig mere vil være lig med 1 igen, da du har talt Farve op med +1. Der efter forstår jeg ikke med sikkerhed hvad det er du vil: <%=Baggrund%> style=\"BORDER-RIGHT: rgb(0,0,0) 1px solid;\"><a href=show_data.asp?ForumID=<%=Forums(\"ForumID\")%>><%=Forums(\"Navn\")%></a> <%=Baggrund%>><%=Forums(\"Beskrivelse\")%> Vend lige tilbage så skal jeg nok prøve at fixe det for dig.
18. december 2001 - 23:33
#8
Prøv dette, hvis det ikke er således du vil have det må du melde tilbage! <Scriptet er ikke testet> og din IF er heller ikke helt OK vil jeg mene! <% Farve = 1 Set connect = Server.CreateObject(\"ADODB.Connection\") strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"Forum.mdb\") Connect.Open strDSN Set forums = Connect.Execute(\"SELECT * FROM Forums\") Response.write \"<Table>\" DO UNTIL Forums.EOF If farve=1 Then baggrund=\"#15A5EA\" Farve= Farve + 1 Else baggrund=\"#1A8AFB\" farve=1 End If Response.write \"<tr>\" Response.write \"<td bgcolor=\'\" & baggrund & \"\' style=\'BORDER-RIGHT: rgb(0,0,0) 1px solid;\'><a href=\'show_data.asp?ForumID=\" & Forums(\"ForumID\") & \"\'>\" & Forums(\"Navn\") & \"</a></td>\" Response.write \"<td>\" & Forums(\"Beskrivelse\") & \"</td>\" Response.write \"</tr>\" Forums.MoveNext LOOP Response.write \"</Table>\" %>
19. december 2001 - 00:01
#9
Takker det virkede
19. december 2001 - 12:47
#10
Takker for point :>
Kurser inden for grundlæggende programmering