Hent data fra perl database i ASP
Jeg har en Perl database, som jeg gerne vi ha nogle oplysninger fra, ind på en ASP side.Hvordan gør jeg det, jeg har noget script som jeg tror man kan bruge noget af.
<SCRIPT Language=\"PerlScript\" RUNAT=\"Server\">
use Fcntl;
use AnyDBM_File;
$flags = O_CREAT | O_RDWR;
$db = \"D:/InetPub/www.stivert.dk/datadir/users\";
tie(%users, \'AnyDBM_File\', $db , $flags, 0666) || die \"kunne ikke åbne dbm\\n\";
sub test {
if (!$users{$_[0]}) {
return \"error: not found\";
}
else {
@user_info=split(/\\|/,$users{$_[0]});
return \"$user_info[0]|$user_info[2]\";
}
}
</SCRIPT>
<%
var info = test(userName);
info = info.split(\"|\");
password = info[0];
}
else password = \"error: not found\";
