% If Not Request.QueryString("error") = "" Then
ErrorCode = "&error=" & Request.QueryString("error")
End If %>
<% If Session("SbNuUserGood") = True Then
Set RSMem = Server.CreateObject("ADODB.Recordset")
Mem = "SELECT * FROM tblMember WHERE ID = " & Session("SbNuUserID") & " "
RSMem.Open Mem, Connect, adOpenStatic, adLockOptimistic
End If
Set RSMainCat = Server.CreateObject("ADODB.Recordset")
MainCat = "SELECT Name, ID, Ordning FROM tblClassCat WHERE IsNull(SubCatID) = True AND Deleted = False GROUP BY Name, ID, Ordning ORDER BY Ordning, Name, ID "
RSMainCat.Open MainCat, Connect, adOpenStatic, adLockOptimistic %>
Ny Annons!
Här kan Du lägga in en ny Köpes-/Säljesannons!
Annonserna ligger aktiva i 45 dagar.
Vill Du förlänga tiden, får Du gå in och redigera annonsen...
...då sätts 45 nya dagar.
OBS!! Skivbaren.nu förbehåller sig rätten att redigera/radera opassande annonser! OBS!!