<% strCheckAdmin = Mid(Session("SbNuAdmin"), 6, 1) strDate = DateAdd("d", -1, Date) %> <% Set RSFairs = Server.CreateObject("ADODB.Recordset") Fairs = "SELECT tblFair.CountryID, tblCountry.ID AS CoID, tblCountry.SName AS CoName FROM tblFair INNER JOIN tblCountry ON tblFair.CountryID = tblCountry.ID WHERE tblFair.FairDate > " & strDate & " AND tblFair.Deleted = False GROUP BY tblCountry.SName, tblCountry.ID, tblFair.CountryID ORDER BY tblCountry.SName, tblCountry.ID, tblFair.CountryID " RSFairs.Open Fairs, Connect, adOpenStatic, adLockOptimistic Set RSFairsOrg = Server.CreateObject("ADODB.Recordset") FairsOrg = "SELECT tblFair.OrgID, tblFairOrg.ID AS OID, tblFairOrg.Name AS OName FROM tblFair INNER JOIN tblFairOrg ON tblFair.OrgID = tblFairOrg.ID WHERE tblFair.FairDate > " & strDate & " AND tblFair.Deleted = False GROUP BY tblFairOrg.Name, tblFairOrg.ID, tblFair.OrgID ORDER BY tblFairOrg.Name, tblFairOrg.ID, tblFair.OrgID " RSFairsOrg.Open FairsOrg, Connect, adOpenStatic, adLockOptimistic Set RSOrg = Server.CreateObject("ADODB.Recordset") Org = "SELECT tblFairOrg.CountryID, tblCountry.ID AS CoID, tblCountry.SName AS CoName FROM tblFairOrg INNER JOIN tblCountry ON tblFairOrg.CountryID = tblCountry.ID WHERE tblFairOrg.Deleted = False GROUP BY tblCountry.SName, tblCountry.ID, tblFairOrg.CountryID ORDER BY tblCountry.SName, tblCountry.ID, tblFairOrg.CountryID " RSOrg.Open Org, Connect, adOpenStatic, adLockOptimistic %>

Kommande Skivmässor!

Här finns information om kommande Skivmässor samt Arrangörer världen över!

Välj vilka Mässor Du vill se:
Visa hela listan
Visa alla under 2009
Visa alla under 2010

Mässor i:
Arrangerade av:


Välj vilka Arrangörer Du vill se:
Visa hela listan

Arrangörer i:

<% If strCheckAdmin = "1" Then %> Lägg till Mässa | Lägg till Arrangör | Admin Länderna <% End If %>


Saknar Du någon Mässa eller Arrangör??

Vi försöker hålla denna lista över kommande Skivmässor så aktuell som möjligt...
...men vi behöver hjälp av Er besökare med tips.

Ni är välkomna att maila in information om Mässor / Arrangörer som Ni saknar i listan.
Det spelar ingen roll vilket land de finns i...

Den info vi önskar angående Mässor, är:
Datum*
Land*
Stad*
Plats*
Tid
Entréavgift
Arrangör
Ev. övrig info

Den info vi önskar angående Arrangörer, är:
Namn*
Kontaktperson
Hemsida
E-Post
Telefon
Fax
Postadress
Ev. övrig info

* = Obligatoriska uppgifter.