主题：移动开发 照片上传咨询

1、参考

 

http://www.foxtable.com/webhelp/scr/2717.htm

 

2、3、代码应该有问题，下面两个地方重复了，只能用一次e.WriteString

 

1、在代码那里加入msgbox，看是否进入执行了代码，看执行到哪里开始出问题，弹出对应的值看有什么不同。

 

2、你httprequest是否写了多次 e.WriteString ？在函数执行完以后还写了 e.WriteString ？

 不设置缩放呢？

 

 在服务器端，保存之后，再对图片进行处理也行，这样简单很多。

试试

 

alert("123");

var v3 = document.getElementById("up128_thumbnails").getElementsByTagName("li").length;

alert(v3);

回复10楼，bug。生成html代码的时候，url没加引号。

 

For Each key As String In e.Files.Keys
    Dim ls As new List(Of String)
    For Each fl As String In e.Files(key)
        Dim NewName As String = fl
        Dim idx As Integer = fl.LastIndexOf(".")
        If idx > 0 Then    '如果有上傳照片
            Dim cnt As Integer = 1
            Do While FileSys.FileExists("e:/web/images/photo/" & NewName)
                NewName = fl.Insert(idx,"(" & cnt & ")")
                cnt = cnt + 1 '递增序号
            Loop
            e.SaveFile(key,fl,"e:/web/images/photo/" & NewName)
            ls.add(newname)
        End If
    Next
    dr.Lines("照片") = ls
Next