am eifachste isches wohl d fälder per GET z übergäh.
do infos dezue:
http://board.gulli.com/thread/996158-vbnet-post-und-get/

.Document.Forms(0).feld1.Value = Username.Text
.Document.Forms(0).feld2.Value = Passwort.Text

wbrWebBrowser.Navigate App.Path & "\form.htm"

Username.Text = "Name"
Passwort.Text = "Passwort"

function MailVersenden($an, $cc, $bcc, $from, $betreff, $text, $datei, $dateiname) {

$email_subject = $betreff; // The Subject of the email

// $email_to = ""; // Who the email is too

$headers = "From: ".$from;



$semi_rand = md5(time());
$mime_boundary = "==Multipart_Boundary_x{$semi_rand}x";

$headers .= "\nMIME-Version: 1.0\n" .
"Content-Type: multipart/mixed;\n" .
" boundary=\"{$mime_boundary}\"";

$email_message .= "This is a multi-part message in MIME format.\n\n" .
"--{$mime_boundary}\n" .
"Content-Type:text/plain; charset=\"iso-8859-1\"\n" .
"Content-Transfer-Encoding: 7bit\n\n" .
$text . "\n\n";

if (is_array($datei)) {
foreach($datei AS $key => $value) {
if (file_exists($value)) {
$fileatt = $value; // Path to the file
$fileatt_type = "application/octet-stream"; // File Type
if ($dateiname[$key]) {
$fileatt_name = $dateiname[$key];// Filename that will be used for the file as the attachment
}else{
$fileatt_name = basename($value);
}

$file = fopen($fileatt,'rb';
$data = fread($file,filesize($fileatt));
fclose($file);


$data = chunk_split(base64_encode($data));

$email_message .= "--{$mime_boundary}\n" .
"Content-Type: {$fileatt_type};\n" .
" name=\"{$fileatt_name}\"\n" .
"Content-Disposition: attachment;\n" .
" filename=\"{$fileatt_name}\"\n" .
"Content-Transfer-Encoding: base64\n\n" .
$data . "\n\n";
$a++;
if ($a == count($datei)) {
$email_message .= "--{$mime_boundary}--\n\n";
}else{
$email_message .= "--{$mime_boundary}\n";
}
unset($data);
unset($file);
unset($fileatt);
unset($fileatt_type);
unset($fileatt_name);
}
}
}elseif($datei) {
if (file_exists($datei)) {
$fileatt = $datei; // Path to the file
$fileatt_type = "application/octet-stream"; // File Type
if ($dateiname) {
$fileatt_name = $dateiname; // Filename that will be used for the file as the attachment
}else{
$fileatt_name = basename($datei);
}

$file = fopen($fileatt,'rb';
$data = fread($file,filesize($fileatt));
fclose($file);


$data = chunk_split(base64_encode($data));

$email_message .= "--{$mime_boundary}\n" .
"Content-Type: {$fileatt_type};\n" .
" name=\"{$fileatt_name}\"\n" .
//"Content-Disposition: attachment;\n" .
//" filename=\"{$fileatt_name}\"\n" .
"Content-Transfer-Encoding: base64\n\n" .
$data . "\n\n" .
"--{$mime_boundary}--\n";
unset($data);
unset($file);
unset($fileatt);
unset($fileatt_type);
unset($fileatt_name);
}
}


$ok = @mail($an, $email_subject, $email_message, $headers);
echo "OK: $ok";
}