- or download this
if ($in{tax_id} ne "") { #Only update this record IF it has a value!
$dbh->do (qq{ UPDATE `reg_users` SET `tax_id` = ? WHERE `username`
+ = ? },
...
$dbh->do (qq{ UPDATE `reg_users` SET `aff` = ?, `aff_su_date` = ?
+WHERE `username` = ? },
undef, "yes", $formated_date, $username);
$dbh->disconnect();
- or download this
$dbh->do (qq{ UPDATE `reg_users` SET `aff_url` = ?, `aff` = ?, `af
+f_su_date` = ? WHERE `username` = ? },
undef, $in{aff_url}, "yes", $formated_date, $username)
+;
$dbh->disconnect();
- or download this
$thank_you_html = qq~
Aff URL is <b>$in{aff_url}</b /><br />
Tax ID is <b>$in{tax_id}</b /><br />
~;