#!/usr/bin/perl -w
use DBI;
use Date::Calc qw(Today);
use CGI qw(:standard);
print "Content-type: text/plain\n\n";
$theDB = DBI ->connect ('DBI:mysql:ecsmedia', 'ecsmedia', 'S3cq8esL') or die("Cannot connect.\n");
($year,$month,$day) = Today();
$theProduct = param("filename");
$theDate = "$month/$day/".substr($year, -2);
$theReferrer = $ENV{'HTTP_REFERER'};
$Query = "SELECT * FROM productCounters WHERE Product='$theProduct' AND Date='$theDate'";
$result = $theDB->prepare($Query) or die("error preparing SQL\n");
$result->execute() or die("error executing SQL\n");
if (@row = $result->fetchrow_array) {
$newCount = $row[2] + 1;
$newReferrer = $row[3].",".$theReferrer;
$Query = "UPDATE productCounters SET Count=$newCount, Referrers='$newReferrer' WHERE Product='$theProduct' AND Date='$theDate'";
$theDB->do($Query) or die("Invalid update");
}
else{
$Query = "INSERT INTO productCounters (Product, Date, Count, Referrers) VALUES ('$theProduct','$theDate','1','$theReferrer')";
$theDB->do($Query) or die("Invalid insert");
}
$result->finish();
$theDB->disconnect();
| |
|
MUSIC THEORY BUILDER
G. David Peters
Music Theory Builder is designed to help users better identify visually or aurally major, minor, diminished, and augmented
intervals as well as major, minor, diminished, and augmented chords. Several options to choose from including selection of
inversion and the clef for the drill are available. The program features student evaluation and record keeping. (MIDI OPT)
|
| |
|
Download Windows Demo
Download Macintosh OS X Demo
Download Macintosh OS 8.5-9.x Demo
Hybrid CD-ROM: 1641CD
Single Station Price: $59.95
Lab Pack (5 stations) Price: $160.00
Site/Network License (24 stations) Price: $480.00
Sys. requirements: Win 98, 2000, XP, Mac OS 8.5-9.2, 10.1-10.x
|
