<% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "DSN=d2248-template;Password=@01#$befacpeijaagokgapkfabe" Set RecSet = Server.CreateObject("ADODB.RecordSet") Addera = "SELECT * FROM Veckanssajt ORDER BY ID DESC;" RecSet.Open Addera, Connect, adOpenStatic %>

KUNSKAP   Artiklar   Intervjuer   Dokumentation   Kurser     Webbdesign     JavaScript     DHTML     HTML     CSS     CGI     XML     ASP   Forum   Lag och Rätt  RESURSER   Sponsorer   Banner Xchange   CGI   Forum   Gästböcker   Hotell   Javascript   Nyhetsbrev   Omdirigering   Promotion   Räknare  FILARKIV   Backup   Färgverktyg   Firewalls   Ftp-klienter   Ftp-servrar   Html-editorer   Länktestare   Mailservrar   Submiters   Tillbehör   Webläsare   Webservrar   Misc  SAJTEN   Skryt   Nyheter   Kontakta   Om Citruz.nu   Veckanssajt

"Webbyggarens smultronställe #1" CITRUZ/KUNSKAP/LITTERATUR/HANDBÖCKER Handböcker Under denna kategori har vi sammanställt en lista på handböcker till olika program. DREAMWEAVER3 HANDBOKEN Boken beskriver på ett lättfattligt sätt hur du skapar proffsiga webbsidor. Du får lära dig formatera text, lägga in länkar, hantera bilder, ljud och video samt mycket mera. Pris: 292kr på Adlibris.se LÄR DIG FRONTPAGE 2000 PÅ 3 VECKOR Denna bok är mer omfattande och går lite djupare än Lär dig FrontPage 2000 på 24 timmar. Boken tar dig steg för steg närmare målet: att lära dig bli en proffsig Frontpage-användare. På 21 dagslektioner lotsas du framåt till att lära dig de viktigaste delarna i FrontPage. Boken är mycket pedagogisk och välstrukturerad. Pris: 405kr på Adlibris.se Flash 4! Creative Web Animation Flash 4 från Macromedia ger din sajt mer liv men är ganska komplicerat om man vill lära sig alla funktioner. Denna handbok är skriven för att få din huvudvärk att släppa. Pris: £24.05 på Amazon.co.uk   Copyright (c) 2000-2001 Citruz.nu | Kontakta | Om Citruz.nu |

<% RecSet.Close Addera = "SELECT * FROM artiklar ORDER BY ID DESC;" RecSet.Open Addera, Connect, adOpenStatic %> <% RecSet.Close %> <% Set RecSet = Server.CreateObject("ADODB.RecordSet") Addera = "SELECT * FROM Kurser ORDER BY ID DESC;" RecSet.Open Addera, Connect, adOpenStatic %> <% RecSet.Close %> <% Set RecSet = Server.CreateObject("ADODB.RecordSet") Addera = "SELECT * FROM Resurser ORDER BY ID DESC;" RecSet.Open Addera, Connect, adOpenStatic %> <% RecSet.Close %> <% Set RecSet = Server.CreateObject("ADODB.RecordSet") Addera = "SELECT * FROM Filer ORDER BY ID DESC;" RecSet.Open Addera, Connect, adOpenStatic %>  VECKANS SAJT " target="_blank"> <% Response.Write = RecSet("Titel") %> <% Response.Write = RecSet("Text") %>  ARTIKLAR&INTERVJUER <% RecSet.MoveNext %> "> <% Response.Write = RecSet("Överskrift") %> <% Response.Write = RecSet("Text") %> "> <% Response.Write = RecSet("Överskrift") %> <% Response.Write = RecSet("Text") %>  NYASTE KURSEN  "> <% Response.Write = RecSet("Överskrift") %> .gif" width="13" height="13"> BETYG: <% betygfun = RecSet("Betyg") betygbad = 5 - betygfun Do until Tal => betygfun %> <% Tal = Tal + 1 Loop Tal = "1" Do until Tal => betygbad %> <% Tal = Tal + 1 Loop Tal = "1" betygfun = "0" betygbad = "0" %> <% Response.Write = RecSet("Text") %>  NYASTE RESURSEN "> <% Response.Write = RecSet("Överskrift") %> .gif" width="13" height="13"> BETYG: <% Dim fun Dim bad dim T Dim a Dim b dim ta fun = RecSet("Betyg") bad = 5 - fun Do until T => fun %> <% T = T + 1 Loop T = "" Do until Ta => bad %> <% Ta = Ta + 1 Loop Ta = "" fun = "" bad = "" %> <% Response.Write = RecSet("Text") %>  NYASTE FILEN " target="_blank"> <% Response.Write = RecSet("Överskrift") %> BETYG: <% Dim x Dim y dim z dim z2 x = RecSet("Betyg") y = 5 - x Do until z => x %> <% z = z + 1 Loop z = "" Do until z2 => y %> <% z2 = z2 + 1 Loop z2 = "1" x = "" y = "" %> <% Response.Write = RecSet("Text") %> <% RecSet.Close Connect.Close Set Connect = Nothing %>