以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]用HTML生成网页的关键字获取 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159072) |
-- 作者:sweet果果 -- 发布时间:2020/12/12 18:26:00 -- [求助]用HTML生成网页的关键字获取 用HTML生成网页的代码中,产品、客户、雇员等名称都是提前定义好的, 能不能由表的一列取值自动生成?比如表A有一个列名为“单位名称”的列,该列的1-6行内容依次是:企业单位A,企业单位B,企业单位C,企业单位D,企业单位E,企业单位F; 能不能由1-6行的内容取代“产品、客户、雇员。。。”等名称呢? 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编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/12/13 20:15:00 -- dim r as row = tables("a").rows(0) sb.AppendLine(r("单位名称") & ": <input name=\'cp\' id=\'cp\'><br/><br/>")
|