First you need a form in which your customers will type their info like this
<TABLE>
<FORM METHOD=POST ACTION="cgi-bin/tek.pl" name="customers">
<!-- the action must point to the script that will be processing the form -->
<TR>
<TD>name</TD>
<TD><INPUT TYPE="text" NAME="name"></TD>
</TR>
<TR>
<TD>addr1</TD>
<TD><INPUT TYPE="text" NAME="addr1"></TD>
</TR>
<TR>
<TD>addr2</TD>
<TD><INPUT TYPE="text" NAME="addr2"></TD>
</TR>
<TR>
<TD>submit</TD>
<TD><INPUT TYPE="submit"></TD>
</TR>
</FORM>
</TABLE>
on pressing the submit button a cgi script will be called that could look something like this
#!/usr/bin/perl
#shebang not applicable on win32 systems
#use strict; # good practice
use CGI qw( :standard ); # load cgi library
my $q = new CGI; # create new cgi object
# You are saying you are going to use a M$ access db
# so i have opted for w32odbc to talk to the db
use Win32::ODBC; #Load win32 odbc library
my $db=new Win32::ODBC("export"

or die Win32::ODBC:

umpError();
# create new odbc object the dsn string
# must point to a valid dsn created on the server
# e.g."DSN=SOME_DSN;UID=USER_ID;PWD=PASSWORD"
my %all = $q->Vars(); # Takes all info from form and sticks it into an
# Associative Array.called %all using the cgi vars method
$db->Sql(qq|INSERT INTO customers (name,addr1,addr2)
VALUES (\'$all{'name'}\',\'$all{'addr1'}\',\'$all{'addr2'}\'|);
# Inserts the values in %all into the relevant fields in the db
# the name addr1 and addr2 correspond to the form element names
# from the form that called this script
$db->Close(); #close the db
#confirmation web page that details have gone into db
print $q->header(),
$q->start_html(-title=>'Simple web form cgi capture',
-bgcolor=>'#003399'),
$q->start_table({-border=>'0',
-bgcolor=>'#cccccc',
-align=>'center'}),
$q->Tr(
$q->th({-colspan=>'2'},'Your details have been stored'),
),
$q->Tr(
$q->td({-align=>'center'},'Name = '),
$q->td({-align=>'center'},$all{'name'}),
),
$q->Tr(
$q->td({-align=>'center'},'addr1 = '),
$q->td({-align=>'center'},$all{'addr1'}),
),
$q->Tr(
$q->td({-align=>'center'},'addr2 = '),
$q->td({-align=>'center'},$all{'addr2'}),
),
$q->end_table,
$q->end_html;
Hope this helps Knowledge is power
Power is Mon£y