- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- httpRequest种的e.Path在内部函数种怎么表达 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=133821)
-- 发布时间：2019/4/21 13:00:00
-- httpRequest种的e.Path在内部函数种怎么表达
如题，
For
Each
key As
String
In e.Files.Keys
next
这个在内部函数中应该改成什么样的？
还有 Dim e As RequestEventArgs = args(0) 这个要不要加上？
-- 发布时间：2019/4/21 17:12:00
--
加上
Dim e As RequestEventArgs = args(0)
你在调用函数的时候，需要添加e参数进去，如
http://www.foxtable.com/mobilehelp/scr/0025.htm
-- 发布时间：2019/4/21 20:57:00
--
内部函数 - uppackage
\'加载快递单
Dim e As RequestEventArgs = args(0)
Dim sb As New StringBuilder
sb.appendLine("<form enctype=\'multipart/form-data\' action=\'uppackageaccept.htm\' method=\'post\' id=\'uppack\' name=\'uppack\'>")
sb.appendLine("UP Files: <input type=\'file\' accept=\'.xls,.xlsx\' name=\'up1\' id=\'up1\'><br/><br/>")
sb.appendLine("<input Type=\'submit\' name=\'Sumbit\' id=\'Sumbit\' value=\'Update\'>") \'确定按钮
sb.appendLine("</form>")
e.WriteString(sb.ToString)
内部函数 - uppackageaccept
Dim e As RequestEventArgs = args(0)
网络监视器中 HttpRrquest
Select Case e.Path
Case "uppackage.htm"
Functions.Execute("uppackage",e)
Case "uppackageaccept.htm"
Functions.Execute("uppackageaccept")
End Select
此主题相关图片如下：qq截图20190421205512.png
这是什么原因呢？
-- 发布时间：2019/4/22 9:52:00
--
搞定~ 代码错误
-- 发布时间：2019/4/22 9:59:00
--
改成，比如
Functions.Execute("uppackageaccept", e)