%@LANGUAGE="JAVASCRIPT" LCID=2057%>
<%
var ReleaseDetail__varReleaseID = "0";
if(String(Request.QueryString("ReleaseID")) != "undefined") {
ReleaseDetail__varReleaseID = String(Request.QueryString("ReleaseID"));
}
%>
<%
var ReleaseDetail_cmd = Server.CreateObject ("ADODB.Command");
ReleaseDetail_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ReleaseDetail_cmd.CommandText = "SELECT remjimbr.tblRelease.ReleaseID, remjimbr.tblRelease.ArtistID, remjimbr.tblRelease.ReleaseTitle, remjimbr.tblRelease.CatalogueNumber, remjimbr.tblRelease.Barcode, remjimbr.tblRelease.ImageFileName, remjimbr.tblRelease.ReleaseDate, remjimbr.tblRelease.Notes, remjimbr.tblRelease.Active, remjimbr.tblRelease.SuggestedRetailPrice, remjimbr.tblArtist.ArtistName, remjimbr.tblFormat.FormatType FROM remjimbr.tblRelease JOIN remjimbr.tblArtist ON (remjimbr.tblArtist.ArtistID = remjimbr.tblRelease.ArtistID) JOIN remjimbr.tblFormat ON (remjimbr.tblFormat.FormatID = remjimbr.tblRelease.FormatID) WHERE remjimbr.tblRelease.ReleaseID = ?";
ReleaseDetail_cmd.Prepared = true;
ReleaseDetail_cmd.Parameters.Append(ReleaseDetail_cmd.CreateParameter("param1", 5, 1, -1, ReleaseDetail__varReleaseID)); // adDouble
var ReleaseDetail = ReleaseDetail_cmd.Execute();
var ReleaseDetail_numRows = 0;
%>
<%
var Release_cmd = Server.CreateObject ("ADODB.Command");
Release_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
Release_cmd.CommandText = "SELECT remjimbr.tblRelease.ReleaseID, remjimbr.tblRelease.ReleaseTitle, remjimbr.tblRelease.ArtistID, remjimbr.tblArtist.ArtistName, remjimbr.tblFormat.FormatType FROM remjimbr.tblRelease JOIN remjimbr.tblArtist ON (remjimbr.tblArtist.ArtistID = remjimbr.tblRelease.ArtistID) JOIN remjimbr.tblFormat ON (remjimbr.tblFormat.FormatID = remjimbr.tblRelease.FormatID) WHERE (remjimbr.tblRelease.Active = 1 AND remjimbr.tblRelease.DotDash = 1) ORDER BY remjimbr.tblArtist.ArtistName, remjimbr.tblRelease.ReleaseTitle";
Release_cmd.Prepared = true;
var Release = Release_cmd.Execute();
var Release_numRows = 0;
%>
<%
var Artist_cmd = Server.CreateObject ("ADODB.Command");
Artist_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
Artist_cmd.CommandText = "SELECT ArtistID, ArtistName, Active FROM remjimbr.tblArtist WHERE (Active = 1 AND DotDash = 1) ORDER BY ArtistName";
Artist_cmd.Prepared = true;
var Artist = Artist_cmd.Execute();
var Artist_numRows = 0;
%>
<%
var ArtistOld_cmd = Server.CreateObject ("ADODB.Command");
ArtistOld_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ArtistOld_cmd.CommandText = "SELECT ArtistID, ArtistName FROM remjimbr.tblArtist WHERE (Active = 0 AND DotDash = 1) ORDER BY ArtistName";
ArtistOld_cmd.Prepared = true;
var ArtistOld = ArtistOld_cmd.Execute();
var ArtistOld_numRows = 0;
%>
<%
var ReleaseNews__varReleaseID = "0";
if(String(Request.QueryString("ReleaseID")) != "undefined") {
ReleaseNews__varReleaseID = String(Request.QueryString("ReleaseID"));
}
%>
<%
var ReleaseNews_cmd = Server.CreateObject ("ADODB.Command");
ReleaseNews_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ReleaseNews_cmd.CommandText = "SELECT remjimbr.tblNews.NewsID, remjimbr.tblNews.NewsDate, remjimbr.tblNews.Headline FROM remjimbr.tblNews JOIN remjimbr.tblReleaseNews ON (remjimbr.tblReleaseNews.NewsID = remjimbr.tblNews.NewsID) WHERE remjimbr.tblReleaseNews.ReleaseID = ? ORDER BY remjimbr.tblNews.NewsDate DESC";
ReleaseNews_cmd.Prepared = true;
ReleaseNews_cmd.Parameters.Append(ReleaseNews_cmd.CreateParameter("param1", 5, 1, -1, ReleaseNews__varReleaseID)); // adDouble
var ReleaseNews = ReleaseNews_cmd.Execute();
var ReleaseNews_numRows = 0;
%>
<%
var ReleaseGenre__varReleaseID = "0";
if(String(Request.QueryString("ReleaseID")) != "undefined") {
ReleaseGenre__varReleaseID = String(Request.QueryString("ReleaseID"));
}
%>
<%
var ReleaseGenre_cmd = Server.CreateObject ("ADODB.Command");
ReleaseGenre_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ReleaseGenre_cmd.CommandText = "SELECT remjimbr.tblGenre.GenreKeyword, remjimbr.tblGenre.GenreID FROM remjimbr.tblGenre JOIN remjimbr.tblReleaseGenre ON (remjimbr.tblReleaseGenre.GenreID = remjimbr.tblGenre.GenreID) WHERE remjimbr.tblReleaseGenre.ReleaseID = ?";
ReleaseGenre_cmd.Prepared = true;
ReleaseGenre_cmd.Parameters.Append(ReleaseGenre_cmd.CreateParameter("param1", 5, 1, -1, ReleaseGenre__varReleaseID)); // adDouble
var ReleaseGenre = ReleaseGenre_cmd.Execute();
var ReleaseGenre_numRows = 0;
%>
<%
var ReleaseLabel__varReleaseID = "0";
if(String(Request.QueryString("ReleaseID")) != "undefined") {
ReleaseLabel__varReleaseID = String(Request.QueryString("ReleaseID"));
}
%>
<%
var ReleaseLabel_cmd = Server.CreateObject ("ADODB.Command");
ReleaseLabel_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ReleaseLabel_cmd.CommandText = "SELECT remjimbr.tblLabel.LabelName, remjimbr.tblLabel.LabelID FROM remjimbr.tblLabel JOIN remjimbr.tblReleaseLabel ON (remjimbr.tblReleaseLabel.LabelID = remjimbr.tblLabel.LabelID) WHERE remjimbr.tblReleaseLabel.ReleaseID = ? ORDER BY remjimbr.tblLabel.LabelName";
ReleaseLabel_cmd.Prepared = true;
ReleaseLabel_cmd.Parameters.Append(ReleaseLabel_cmd.CreateParameter("param1", 5, 1, -1, ReleaseLabel__varReleaseID)); // adDouble
var ReleaseLabel = ReleaseLabel_cmd.Execute();
var ReleaseLabel_numRows = 0;
%>
<%
var ReleaseTrack__varReleaseID = "0";
if(String(Request.QueryString("ReleaseID")) != "undefined") {
ReleaseTrack__varReleaseID = String(Request.QueryString("ReleaseID"));
}
%>
<%
var ReleaseTrack_cmd = Server.CreateObject ("ADODB.Command");
ReleaseTrack_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
ReleaseTrack_cmd.CommandText = "SELECT remjimbr.tblTrack.TrackTitle, remjimbr.tblTrack.Composers, remjimbr.tblTrack.TrackLength, remjimbr.tblTrack.ArtistID, remjimbr.tblReleaseTrack.TrackNumber, remjimbr.tblArtist.ArtistName FROM remjimbr.tblTrack JOIN remjimbr.tblReleaseTrack ON (remjimbr.tblReleaseTrack.TrackID = remjimbr.tblTrack.TrackID) LEFT OUTER JOIN remjimbr.tblArtist ON (remjimbr.tblArtist.ArtistID = remjimbr.tblTrack.ArtistID) WHERE remjimbr.tblReleaseTrack.ReleaseID = ? ORDER BY remjimbr.tblReleaseTrack.TrackNumber";
ReleaseTrack_cmd.Prepared = true;
ReleaseTrack_cmd.Parameters.Append(ReleaseTrack_cmd.CreateParameter("param1", 5, 1, -1, ReleaseTrack__varReleaseID)); // adDouble
var ReleaseTrack = ReleaseTrack_cmd.Execute();
var ReleaseTrack_numRows = 0;
%>
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
Release_numRows += Repeat1__numRows;
%>
<%
var Repeat6__numRows = -1;
var Repeat6__index = 0;
ReleaseNews_numRows += Repeat6__numRows;
%>
<%
var Repeat2__numRows = -1;
var Repeat2__index = 0;
ReleaseLabel_numRows += Repeat2__numRows;
%>
<%
var Repeat3__numRows = -1;
var Repeat3__index = 0;
ReleaseGenre_numRows += Repeat3__numRows;
%>
<%
var Repeat5__numRows = -1;
var Repeat5__index = 0;
ReleaseTrack_numRows += Repeat5__numRows;
%>
<%
var Repeat7__numRows = -1;
var Repeat7__index = 0;
Artist_numRows += Repeat7__numRows;
%>
<%
var Repeat8__numRows = -1;
var Repeat8__index = 0;
ArtistOld_numRows += Repeat8__numRows;
%>
<% function replaceAll(strSource,lookFor,replaceWith) {
strLowerCase = strSource.toLowerCase();
lookForLower = lookFor.toLowerCase();
while(strLowerCase.indexOf(lookForLower) != -1) {
posStart = strLowerCase.indexOf(lookForLower)
posEnd = posStart + lookFor.length
strLowerCase = strLowerCase.substring(0,posStart) + replaceWith + strLowerCase.substring(posEnd,strLowerCase.length)
strSource = strSource.substring(0,posStart) + replaceWith + strSource.substring(posEnd,strSource.length)
}
return strSource
}%>
dot dash - Release- <%=ReleaseDetail.Fields.Item("ArtistName").Value%>-<%=ReleaseDetail.Fields.Item("ReleaseTitle").Value%>
- <%=ReleaseDetail.Fields.Item("ReleaseTitle").Value%>: release information from Dot Dash Recordings">
, <%=ReleaseDetail.Fields.Item("ReleaseTitle").Value%>, Dot Dash, Remote Control, independent music, Australia">
<%
var AdvertRS_cmd = Server.CreateObject ("ADODB.Command");
AdvertRS_cmd.ActiveConnection = MM_connRemoteControlRecords_STRING;
AdvertRS_cmd.CommandText = "SELECT * FROM tblFlashAd WHERE Active = 1";
AdvertRS_cmd.Prepared = true;
var AdvertRS = AdvertRS_cmd.Execute();
var AdvertRS_numRows = 0;
// Select a random row number
AdvertRS.MoveFirst();
var i = 1;
while (!AdvertRS.EOF) {
AdvertRS.MoveNext();
i++
}
var rndMax = i;
var rndNumber;
rndNumber = Math.floor(rndMax * Math.random());
rndNumber = rndNumber + 1; //Add one to prevent it from going to zero, and to make it count the last record too
if (rndMax > 0) {
AdvertRS.MoveFirst();
var i = 1;
while (i < rndNumber) {
AdvertRS.MoveNext();
i++
}
}
%>