我是OpenWork架构的新手，需要通过TCL上传.xml文件。我浏览了文档并尝试使用此处提到的代码：http://wiki.tcl.tk/13675
但是，我无法理解代码，并且复制粘贴不起作用。有人可以建议一种更简单的工作方式来上传TCL中的文件吗？工作代码会有很大的帮助。
我需要通过HTTP表单上传文件（带有输入类型文件参数），我要求提供服务器端代码。
答案 0 :(得分：0)
OpenACS已经内置了文件上传（假设你使用的是OpenACS表单构建器，也就是ad_form，template :: form - 它有很多名字！）。您需要使用的特定小部件是template::widget::file
一个有效的例子在General Comments包中（参见file-ae.adp，file-add.tcl和file-add-2.tcl）： http://cvs.openacs.org/browse/OpenACS/openacs-4/packages/general-comments/www/file-ae.adp?r=1.6 http://cvs.openacs.org/browse/OpenACS/openacs-4/packages/general-comments/www/file-add.tcl?r=1.4 http://cvs.openacs.org/browse/OpenACS/openacs-4/packages/general-comments/www/file-add-2.tcl?r=1.6
具体来说，请注意2个ad_page_contract参数，并在代码中按照这些变量进行操作：
upload_file:notnull
upload_file.tmpfile:tmpfile
答案 1 :(得分：-1)
在大多数情况下，重新发明网络协议并不值得，所以我建议使用经过验证的社区库。根据我的个人经验，我很高兴处理libcurl（见http://curl.haxx.se/libcurl/tcl）