on *:TEXT:*:#: {
if ($xpack($1-)) {
if ($read("Website Database\db.txt", s, $nick)) {
write -dl $+ $readn "Website Database\db.txt" $nick $+ _ $+ $1 $+ = $+ $chan $+ = $+ $4-
}
else {
write -i "Website Database\db.txt" $nick $+ _ $+ $1 $+ = $+ $chan $+ = $+ $4-
}
}
}

Perhaps, what exactly is it not doing.

Eamonn.