Foxtable(狐表)用户栏目专家坐堂 → 如何生成网页


  共有1692人关注过本帖平板打印复制链接

主题:如何生成网页

帅哥哟,离线,有人找我吗?
lihe60
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6848 积分:43334 威望:0 精华:0 注册:2009/3/2 14:07:00
如何生成网页  发帖心情 Post By:2017/11/16 11:14:00 [只看该作者]

       Dim sb As New StringBuilder
        sb.AppendLine("<style Type='text/css'>")
        '<!--
        'Table {  font-size: 12px}
        '-->
        '</style>
        '<Table width="642" align="center">
        '<tr>
        sb.AppendLine("<td align='center' colspan='2'><font face='黑体' size='5'>中国工商银行</font>&nbsp;&nbsp;&nbsp;网上银行电子回单</td>")
        '</tr>
        '<tr align="center">
        '<td align="center" colspan="2"><IMG SRC="blackdot.gif" WIDTH="500" HEIGHT="2" BORDER=0 ALT=""></td>
        '</tr>
        '<tr>
        '<td heigth="1" colspan="2">&nbsp;</td>
        '</tr>
        '<tr>
        '<td>电子回单号码:0472-1646-4017-4614</td>
        '</tr>
        '</Table>
        '<Table  width="600" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
        '<tr height="80" align="center">
        '<td>
        '<Table width="600" align="center" border="1" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
        '<tr><td width=31 height=40 rowspan=3 align=center valign=middle>付款人</td>
        '<td width=64 height=20 align=center valign=middle>户 名</td>
        '<td width=189 height=20 align=left valign=middle> 屋中介服务有限公司 &nbsp;</td>
        '<td width=31 height=40 rowspan=3 align=center valign=middle>收款人</td>
        '<td width=73 height=20 align=center valign=middle>户 名</td>
        '<td width=198 height=20 align=left valign=middle>某有限公司&nbsp;</td></tr>
        '<tr><td width=64 height=20 align=center valign=middle>账 号</td>
        '<td width=189 height=20 align=left valign=middle>12110120192002125&nbsp;</td>
        '<td width=73 height=20 align=center valign=middle>账 号</td>
        '<td width=198 height=20 align=left valign=middle>1211020019200161&nbsp;</td></tr>
        '<tr><td width=64 height=20 align=center valign=middle>开户银行</td>
        '<td width=189 height=20 align=left valign=middle>中国工商银行股份有限公司绍兴分行营业部&nbsp;</td>
        '<td width=73 height=20 align=center valign=middle>开户银行</td>
        '<td width=198 height=20 align=left valign=middle>中国工商银行绍兴县支行&nbsp;</td></tr>
        '<tr><td height=20 colspan=2 align=center valign=middle>金 额</td>
        '<td colspan=4 align=left valign=middle>人民币(大写):壹佰万元整   ¥1,000,000.00&nbsp;</td></tr>
        '<tr><td height=20 colspan=2 align=center valign=middle>摘 要</td>
        '<td align=left valign=middle>划款&nbsp;</td>
        '<td colspan=2 align=center valign=middle>业务(产品)种类</td>
        '<td align=left valign=middle>普通贷记&nbsp;</td></tr>
        '<tr><td height=20 colspan=2 align=center valign=middle>用 途</td>
        '<td colspan=4 align=left valign=middle>划款&nbsp;</td></tr>
        '<tr><td height=20 colspan=2 align=center valign=middle>交易流水号</td>
        '<td align=left valign=middle>4530736&nbsp;</td>
        '<td colspan=2 align=center valign=middle>时间戳</td>
        '<td align=left valign=middle>2015-03-03 09:41:21&nbsp;</td></tr>
        '<tr><td height=100 colspan=2 rowspan=2 align=center valign=middle><img src="tuzhang.gif"></td>
        '<td height=80 colspan=4 align=left valign=top>备注:<br>客户备注:  </td>
        '</tr><tr><td height=20 colspan=4 align=left valign=middle>验证码:<b>356681041654172</td></tr>
        '<tr><table width=600 border=1 cellspacing=0 cellpadding=0 bordercolorlight=#000000 bordercolordark=#FFFFFF>
        '<tr><td height=20 width=75 align=center valign=middle>记账网点</td>
        '<td height=20 width=125 align=left valign=middle>100&nbsp;</td>
        '<td height=20 width=75 align=center valign=middle>记账柜员</td>
        '<td height=20 width=125 align=left valign=middle>23&nbsp;</td>
        '<td height=20 width=75 align=center valign=middle>记账日期</td>
        '<td height=20 width=125 align=left valign=middle>2015年03月03日&nbsp;</td></tr></Table></tr>
        '</Table>
        '</td>
        '</tr>
        '</Table>
        '<Table width="642" align="center">
        '<tr>
        '<td align="right">打印日期:2015年03月31日  </td>
        '</tr>
        '<tr><td><IMG SRC="blackdot.gif" WIDTH="642" HEIGHT="1" BORDER=0 ></td></tr>
        '<tr>
        '<td>重要提示:</td>
        '</tr>
        '<tr>
        '<td>1.如果您是收款方,请到工行网站www.icbc.com.cn电子回单验证处进行回单验证.</td>
        '</tr>
        '<tr>
        '<td>2.本回单不作为收款方发货依据,并请勿重复记账.</td>
        '</tr>
        '<tr>
        '<td>3.您可以选择发送邮件,将此电子回单发送给指定的接收人.</td>
        '</tr>
        '</Table>
        'e.WriteString(sb.ToString)

[此贴子已经被作者于2017/11/16 11:14:43编辑过]

 回到顶部
总数 12 1 2 下一页