用HTML生成网页的代码中,产品、客户、雇员等名称都是提前定义好的,
能不能由表的一列取值自动生成?比如表A有一个列名为“单位名称”的列,该列的1-6行内容依次是:企业单位A,企业单位B,企业单位C,企业单位D,企业单位E,企业单位F;
能不能由1-6行的内容取代“产品、客户、雇员。。。”等名称呢?
Dim sb As New StringBuilder
sb.AppendLine("<form enctype='multipart/form-data' method='post' id='form1' name='form1'>")
sb.AppendLine("产品: <input name='cp' id='cp'><br/><br/>")
sb.AppendLine("客户: <input name='kh' id='kh'><br/><br/>")
sb.AppendLine("雇员: <input name='gy' id='gy'><br/><br/>")
sb.AppendLine("单价: <input type='number' name='dj' id='dj'><br/><br/>")
sb.AppendLine("折扣: <input type='number' name='zk' id='zk' min='0' max='0.15' step='0.01'><br/><br/>")
sb.AppendLine("数量: <input type='number' name='sl' id='sl'><br/><br/>")
sb.AppendLine("日期: <input type='date' name='rq' id='rq'><br/><br/>")
sb.AppendLine("<input Type='submit' name='Sumbit' id='Sumbit' value='确定'>")
sb.AppendLine("</form>")
e.WriteString(sb.ToString)
[此贴子已经被作者于2020/12/12 18:25:46编辑过]