You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
17 lines
413 B
Perl
17 lines
413 B
Perl
#!C:/perl/bin
|
|
|
|
use DBI;
|
|
|
|
$dbhandle = DBI->connect("dbi:ODBC:address");
|
|
|
|
$sqlstatement="DELETE * FROM emp WHERE address='I'";
|
|
|
|
print "Content-type: text/html \n\n";
|
|
|
|
$statementhandle = $dbhandle->prepare($sqlstatement);
|
|
|
|
$statementhandle->execute || die "<br><br>Could not execute SQL statement ... <br>";
|
|
print "<br><br>Executed ...<br>";
|
|
|
|
$dbhandleandle->disconnect();
|
|
$statementhandle->finish(); |