#!/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();
| |
 |
KEYBOARD FINGERINGS
G. David Peters
Keyboard Fingerings is designed to review standard and special fingerings
for the major, natural minor, and harmonic minor scales. The review
includes instructions and major and minor scale review for both the
right and left hands. The computer judges the accuracy of the scale
performance in each section and on the final test. Single staves are
used, with treble for the right-hand exercises and bass for the left-hand.
The program also features student evaluation and record keeping. Requires
MIDI.
|
| |
Download Windows Demo
|
Windows CD-ROM: 1167CD
Single Station Price: $39.95
Lab Pack (5 stations) Price: $140.00
Site/Network License (24 stations) Price: $320.00
System requirements: Windows 98, 2000, XP
|
