Select Case e.Path
Case "upload.htm"
Dim sb As New StringBuilderf
Dim fl As String = e.GetValues("fl") '客户端文件
Dim cun As String = e.GetValues("cun") '存储位置
e.SaveFile("",fl,cun) '保存接收到的文件 ' 这里怎么写？
sb.AppendLine("以上文件服务器已正确接收并保存!")
e.WriteString(sb.ToString)
End Select