#!/usr/bin/perl $first = $field{'first'}; $last = $field{'last'}; $address = $field{'address'}; $email = $field{'email'}; $phone = $field{'phone'}; $user = $field{'user'}; $pass = $field{'pass'}; use DBI; $dbh = DBI->connect("dbi:ODBC:'driver = Driver do Microsoft Access(*.mdb); dbq=test.mdb'"); print"
"; $sth = $dbh->prepare("SELECT ID,FirstName,LastName,Address,Email,Phone,Username,Password FROM Dreamcpu"); $sth->executive(); print"
ID | First | Last | Address | Phone | User | Password | \n"; while (@row = $sth->fetchrow_array) { print"|
---|---|---|---|---|---|---|---|
$_ | "; } print"
##
CGI Error
The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:
Can't locate object method "connect" via package "DBI" (perhaps you forgot to load "DBI"?) at C:\Inetpub\wwwroot\cgi-bin\database1.pl line 12.