80分 如何在应用程序中自动提交网页数据?c#或delphi
网页的源程序如下:
<html>
<head>
<title>宽带计费系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/skins/default/css/eyouipb.css" type="text/css">
<script language="javascript">
function fastlogin()
{
window.open("/php/fast_login.html", "fastlogin", "toolbar=no,menubar=no,location=no,resizable=no,scrollbars=no,menubar=no,width=380,height=200,top=0,left=100");
};
function submitit(typename)
{
document.user.logintype.value=typename;
document.user.submit();
};
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<div align="center">
<form action=http://10.10.1.1/php/user_cmd.php method=post name=user> <table width="638" border="0" cellspacing="0" cellpadding="0" height="68">
<input type=hidden name=logintype>
<tr>
<td background="/skins/default/image/new-tittle-1.jpg" valign="bottom" align="center">
<div align="center"> <font color="#B33535">IPB Version 3.6.2 </font></div>
</td>
</tr>
</table>
<table width="638" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2" height="75"><img src="/skins/default/image/new-tittle-2.jpg" width="638" height="76"></td>
</tr>
</table>
<table width="638" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="429"><img src="/skins/default/image/new-3.jpg" width="429" height="28"></td>
<td rowspan="3" background="/skins/default/image/new-5.jpg">
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="191">
<tr>
<td height="2"><img src="/skins/default/image/bulletin-tittle.gif" width="187" height="28"></td>
</tr>
<tr>
<td height="144" bgcolor="#C47878" valign="top">
<div>
<script language=javascript>
document.writeln("<marquee id=\"go\" height=\"150\" scrollamount=\"1\" scrollDelay=\"1\" direction=\"up\" onmouseover=\"go.stop()\" onmouseout=\"go.start()\" >");
document.writeln("<table width=\"165\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">");
document.writeln(" <tr> ");
document.writeln(" <td height=\"30\"><font color=\"#ffffff\"> <br>");
document.writeln(" 输入用户名密码后直接按回车,请不要点击连线国内,连线国际等按钮。<br>");document.writeln("误点连线国内的同志,请在10.10.1.1页面输入用户名密码后点击右下角离线按钮,然后重新登录即可。<br>");document.writeln("如果要离开机器,请点击离线后关机,避免外人用自己的用户名密码上网,造成不良后果。<br>");document.writeln("对于学生宿舍的同学,一经发现有盗用他人ip号码的事件,第一次警告,第二次发现由管理员封id号码。<br>");document.writeln(" <br>");document.writeln(" <br>");document.writeln(" <br>"); document.writeln("</a></font></td>");
document.writeln(" </tr>");
document.writeln("</table></marquee>");
</script>
</div>
</td>
</tr>
<tr>
<td valign="bottom" height="11">
<div align="center"><img src="/skins/default/image/bulletin-bottom.gif" width="187" height="17"></div>
</td>
</tr>
</table>
</div>
</td>
<td rowspan="3" width="10">
<div align="right"><img src="/skins/default/image/new-6.jpg" width="22" height="203"></div>
</td>
</tr>
<tr>
<td width="429" background="/skins/default/image/new-4.jpg" height="145">
<div align="center">
<table width="70%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td width="24%">
<div align="right"><font color="#FFFFFF">用户名:</font></div>
</td>
<td width="76%">
<input name=loginuser tabindex=1 size="20">
</td>
</tr>
<tr>
<td width="24%">
<div align="right"><font color="#FFFFFF">域:</font></div>
</td>
<td width="76%">
<select name=domainid width=150>
<option>:::::请选择域::::</option>
<option value='1' selected >localhost</option>
</select>
</td>
</tr>
<tr>
<td width="24%">
<div align="right"><font color="#FFFFFF">密 码:</font></div>
</td>
<td width="76%">
<input name=password type=password tabindex=2 size="20">
<input name=refer type=hidden value='http://10.10.1.1/php/onlinestatus.php?logout_offnet=1'>
</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="429"><img src="/skins/default/image/new-8.jpg" width="101" height="30"><input tabindex=3 type=image border=0 src="/skins/default/image/new-login-1.jpg" width="83" height="30" onClick="javascript:submitit('连线国际');"><input tabindex=4 type=image border=0 src="/skins/default/image/new-login-2.jpg" width="80" height="30" onClick="javascript:submitit('连线国内');"><input tabindex=5 type=image border=0 src="/skins/default/image/new-login-3.jpg" width="71" height="30" onClick="javascript:submitit('连线城域');"><img src="/skins/default/image/new-9.jpg" width="94" height="30"></td>
</tr>
</table>
<table width="638" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="/skins/default/image/new-10.jpg" width="638" height="67"></td>
</tr>
</table>
<table width="638" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="/skins/default/image/enter-bottom.jpg" height="36">
<table width="500" border="0" cellspacing="0" cellpadding="0" align="right">
<tr>
<td width="217" height="15"> </td>
<td width="71" height="15"><font color="#FFFFFF"><a tabindex=6 href="/php/fillin.php"><font color="#FFFFFF">用户注册</font></a></font></td>
<td width="21" height="15"><img src="/skins/default/image/enter-line-1.jpg" width="2" height="36"></td>
<td width="59" height="15"><font color="#FFFFFF"><a tabindex=6 href="javascript:submitit('离线');"><font color=#FFFFFF>离 线</font></a></font></td>
<td width="21" height="15"><img src="/skins/default/image/enter-line.jpg" height="36"></td>
<td width="50" height="15"><font color="#FFFFFF"><a tabindex=7 href="javascript:submitit('查看详情');"><font color=#FFFFFF>查看详情</font></a></font></td>
<td width="21" height="15"><img src="/skins/default/image/enter-line.jpg" height="36"></td>
<td width="50" height="15"><font color="#FFFFFF"><a tabindex=7 href="index-en.php"><font color=#FFFFFF>English</font></a></font></td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</div>
</body>
</html>
编写一个应用程序,能够自动完成提交用户名和密码,用delphi或者vs2003,2005都可以
分不多,小生刚学习,多谢大侠指导!!!