具有附加功能的纯ASP上载脚本

时间:2011-01-10 15:25:39

标签: html asp-classic

来源:http://forums.aspfree.com/code-bank-54/pure-asp-upload-script-with-additional-features-94647.html

大家好,

我试图使用上面可以找到的“Shadow Wizards”图片上传脚本......除了一件事,它对我很有用。我的表单的一部分包括具有相同名称的复选框(疾病/食物列表)我需要能够选择这些的多个插入到数据库中但是看起来这个运行我只能得到一个值来提交(点击的最后一个值)。

我已经快速浏览了一下谷歌,我认为我已经把它归结为存在,因为表单上的enctype是“multipart / form-data”。

是否有人(甚至是Shadow_Wizard本人)知道这种方式?如果不是我将不得不寻找另一个允许多个复选框的图像上传解决方案。

1 个答案:

答案 0 :(得分:1)

问题出在第159-160行的Shadowuploader.asp中。在m_Reuqest字典中覆盖了strElementValue。

所以你必须略有不同:

            'append to request collection
        if m_Request.Exists(strElementName) then
            m_Request(strElementName) = m_Request(strElementName) & ", " & strElementValue
        else
            m_Request(strElementName) = strElementValue
        end if

如果m_Request Dictionary中已经存在strElementName,则使用逗号分隔值。

如果你想要,你可以添加一些额外的智能,并在循环之后将m_request字典中的每个逗号分隔值更改为数组:

        dim itm, arr, n
    for each itm in m_Request
        if instr(m_Request(itm), ", ") > 0 then
            arr = split( m_Request(itm), ", ")
            m_Request(itm) = arr
        end if
    next

上传后,您可以访问复选框的值,如下所示:

objUpload("chk")(1)

使用经典的asp ...时总是没有简单的解决方案。