Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]上传文件名称出错


  共有2596人关注过本帖树形打印复制链接

主题：[求助]上传文件名称出错
美女呀，离线，留言给我吧！
OKK
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：407 积分：4268 威望：0 精华：0 注册：2016/11/22 19:30:00 		[求助]上传文件名称出错  发帖心情 Post By：2019/3/16 22:15:00 [显示全部帖子]

Select Case e.Path
    Case "upload.htm"
        Dim wb As New weui
        wb.AddForm("","form1","receive.htm")
        With wb.AddInputGroup("form1","ipg1","文件上传")
            With .AddUploader("ABC128","照片",True)
                .AllowDelete = True '允许删除
                .Incremental = True '允许 重复选择文件或连续拍照
            End With
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "确定", "button").Attribute= "" '调用js函数上传
        End With
        wb.AddToast("","tst1", "正在上传",1)
        wb.AddToast("","tst2", "上传成功",0)
        wb.AddToast("","tst3", "上传失败",0).Icon= "warn"
        wb.AppendHTML("<script src='./lib/ajaxform.js'></script>") '引入脚本文件
        e.WriteString(wb.Build) '生成网页
    Case "receive.htm"
        For Each key As String In e.Files.Keys
            For Each fln As String In e.Files(key)
messagebox.show(fln)
                e.SaveFile(key,fln,"d:\web\uploadfiles\" & fln) '保存接收到的文件
            Next
        Next
        e.WriteString("OK")
End Select


以上代码，得出结果fln = abc 应该fln = ABC 才对
也就是，本来是大写的，现在变成了小写
请问怎么设置，让大小写不改变？
 回到顶部
美女呀，离线，留言给我吧！
OKK
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：407 积分：4268 威望：0 精华：0 注册：2016/11/22 19:30:00 		  发帖心情 Post By：2019/3/17 16:27:00 [显示全部帖子]

图片点击可在新窗口打开查看

 回到顶部
美女呀，离线，留言给我吧！
OKK
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：407 积分：4268 威望：0 精华：0 注册：2016/11/22 19:30:00 		  发帖心情 Post By：2019/3/18 12:10:00 [显示全部帖子]

没有其它方法吗？


我需要的不是保存大写，而是保存原来的，原来是大写就大写，原来是小写就小写
 回到顶部
美女呀，离线，留言给我吧！
OKK
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：407 积分：4268 威望：0 精华：0 注册：2016/11/22 19:30:00 		  发帖心情 Post By：2019/3/18 13:30:00 [显示全部帖子]

晕，我居然写错了，，，我是想获取key，messagebox.show(key)

代码中With .AddUploader("ABC128","照片",True)


messagebox.show(key)  得出的结果是abc128
 回到顶部
美女呀，离线，留言给我吧！
OKK
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：407 积分：4268 威望：0 精华：0 注册：2016/11/22 19:30:00 		  发帖心情 Post By：2019/3/18 21:25:00 [显示全部帖子]

明白，谢谢！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05664 秒, 5 次数据查询