这个swf怎么才能下载下来呢

你下载的是一个壳

因为该东西的是从外部动态调入的

里面只有一些控件

动态读取你自己添加的数据库里面的信息

你可以吧这个FLASH下载下来

然后反编译修改读取路径的AS 如果要实现动态添加 需要懂得WEB方面的一些技术 如ASP等

保存到数据库不是最佳的选择

你可以搜索一下Uploadify 插件 这个插件非常好用

一般将存为文件

大致代码如下:

$("#btn_upload_attachment")uploadify({

height: 25,

swf: '/Scripts/plugin/uplodify/uploadifyswf',

uploader: '/Home/Upload',

queueSizeLimit: 1,

formData: { ID: newId },

buttonText: '选择文件',

width: 80,

onUploadSuccess: function (file, data, response) {

eval("data=" + data);

AddToAttachmentList(dataData);

}

});

后台代码处理:

[AcceptVerbs(>

这个你看看符合你要求不

uploadxasp

<% Dim FormData, FormSize, Divider, bCrLf

FormSize = RequestTotalBytes

FormData = RequestBinaryRead(FormSize)

bCrLf = ChrB(13) & ChrB(10)

Divider = LeftB(FormData, InStrB(FormData, bCrLf) - 1)

'将上传的文件保存到path所指定的目录下面。

'Formfield 上传表单的"file"域名 Path

' 要保存文件的服务器绝对路径，形式为："d:\path\subpath"或"d:\path\subpath\"

'MaxSize 限制上传文件的最大长度，以KByte为单位

' SavType 服务器保存文件的方式：

'0 唯一文件名方式，如果有同名则自动改名；

'1 报错方式，如果有同名则出错；

'2 覆盖方式，如果有同名则覆盖原来的文件

Function SaveFile(FormFileField, Path, MaxSize, SavType)

Dim StreamObj,StreamObj1

Set StreamObj = ServerCreateObject("ADODBStream")

Set StreamObj1 = ServerCreateObject("ADODBStream")

StreamObjMode = 3

StreamObj1Mode = 3

StreamObjType = 1

StreamObj1Type = 1

SaveFile = ""

StartPos = LenB(Divider) + 2

FormFileField = Chr(34) & FormFileField & Chr(34)

If Right(Path,1) <> "\" Then

Path = Path & "\"

End If

Do While StartPos > 0

strlen = InStrB(StartPos, FormData, bCrLf) - StartPos

SearchStr = MidB(FormData, StartPos, strlen)

If InStr(bin2str(SearchStr), FormFileField) > 0 Then

FileName = bin2str(GetFileName(SearchStr,path,SavType))

If FileName <> "" Then

FileStart = InStrB(StartPos, FormData, bCrLf & bCrLf) + 4

FileLen = InStrB(StartPos, FormData, Divider) - 2 - FileStart

If FileLen <= MaxSize1024 Then

FileContent = MidB(FormData, FileStart, FileLen)

StreamObjOpen

StreamObj1Open

StreamObjWrite FormData

StreamObjPosition=FileStart-1

StreamObjCopyTo StreamObj1,FileLen

If SavType =0 Then

SavType = 1

End If

StreamObj1SaveToFile Path & FileName, SavType

StreamObjClose

StreamObj1Close

If SaveFile <> "" Then

SaveFile = SaveFile & "," & FileName

Else

SaveFile = FileName

End If

Else

If SaveFile <> "" Then

SaveFile = SaveFile & ",TooBig"

Else

SaveFile = "TooBig"

End If

End If

End If

End If

If InStrB(StartPos, FormData, Divider) < 1 Then

Exit Do

End If

StartPos = InStrB(StartPos, FormData, Divider) + LenB(Divider) + 2

Loop

End Function

'获取表单值

Function GetFormVal(FormName)

GetFormVal = ""

StartPos = LenB(Divider) + 2

FormName = Chr(34) & FormName & Chr(34)

Do While StartPos > 0

strlen = InStrB(StartPos, FormData, bCrLf) - StartPos

SearchStr = MidB(FormData, StartPos, strlen)

If InStr(bin2str(SearchStr), FormName) > 0 Then

ValStart = InStrB(StartPos, FormData, bCrLf & bCrLf) + 4

ValLen = InStrB(StartPos, FormData, Divider) - 2 - ValStart

ValContent = MidB(FormData, ValStart, ValLen)

If GetFormVal <> "" Then

GetFormVal = GetFormVal & "," & bin2str(ValContent)

Else

GetFormVal = bin2str(ValContent)

End If

End If

If InStrB(StartPos, FormData, Divider) < 1 Then

Exit Do

End If

StartPos = InStrB(StartPos, FormData, Divider) + LenB(Divider) + 2

Loop

End Function

Function bin2str(binstr)

Dim varlen, clow, ccc, skipflag

skipflag = 0

ccc = ""

varlen = LenB(binstr)

For i = 1 To varlen

If skipflag = 0 Then

clow = MidB(binstr, i, 1)

If AscB(clow) > 127 Then

ccc = ccc & Chr(AscW(MidB(binstr, i + 1, 1) & clow))

skipflag = 1

Else

ccc = ccc & Chr(AscB(clow))

End If

Else

skipflag = 0

End If

Next

bin2str = ccc

End Function

Function str2bin(str)

For i = 1 To Len(str)

str2bin = str2bin & ChrB(Asc(Mid(str, i, 1)))

Next

End Function

Function GetFileName(str,path,savtype)

Set fs = ServerCreateObject("ScriptingFileSystemObject")

str = RightB(str,LenB(str)-InstrB(str,str2bin("filename="))-9)

GetFileName = ""

FileName = ""

For i = LenB(str) To 1 Step -1

If MidB(str, i, 1) = ChrB(Asc("\")) Then

FileName = MidB(str, i + 1, LenB(str) - i - 1)

Exit For

End If

Next

If savtype = 0 and fsFileExists(path & bin2str(FileName)) = True Then

hFileName = FileName

rFileName = ""

For i = LenB(FileName) To 1 Step -1

If MidB(FileName, i, 1) = ChrB(Asc("")) Then

hFileName = LeftB(FileName, i-1)

rFileName = RightB(FileName, LenB(FileName)-i+1)

Exit For

End If

Next

For i = 0 to 9999

hFileName = hFileName & str2bin(i)

If fsFileExists(path & bin2str(hFileName) & i & bin2str(rFileName)) = False Then

FileName = hFileName & str2bin(i) & rFileName

Exit For

End If

Next

End If

Set fs = Nothing

GetFileName = FileName

End Function

%>

原来你是做网站啊,呵呵,Dreamweaver 是不能胜任的,你需要写个

VBS,你也可以在网上直接下一个现成的,自己写也很麻烦

你在网上搜索一下这个吧,也许能给你启发哦

爱雪儿文件上传系统 Version 300

>

我都用struts带的commons-fileUpload组件smartUpload没用过，但是我想你这句upfilesaveAs(upFilePath,FileSAVEAS_PHYSICAL);应该有返回值吧。如果接受到文件信息并写入硬盘返回true什么的。最后再判断这个返回值，真写入了文件后再把信息写入数据库。你写入数据库代码直接放在上传文件代码后面，不管你文件传成功没有都把视频信息写入数据库，这样的结构本身就是不合理的。

flash视频是这样的，开发者设计一个flash文件，然后将该文件放到网页上，这个文件就好比是我们的media player等播放器，真正的视频数据是需要这个flash文件再从数据库现成读取出来的，所以你下载的仅仅是这个flash文件，真正的视频是没那么容易下载到的

这个问题一般有2个办法解决：

1、在服务器端的设置方法，以weblogic为例，会在weblogic里设置session通过链接间传递，以此来实现sessionid的一致性；

2、上一个方式针对单节点单服务挂在方式，如果使用了集群，则需要首先在分发服务器进行“源地址”模式的会话保持，同时外挂一台缓存（当然也可以使用数据库等等）来实现同样的sessionid传递效果。

这样每次交互就不会因为跨框架导致会话失效。

以上就是关于这个swf怎么才能下载下来呢全部的内容，包括:这个swf怎么才能下载下来呢、.net MVC中 在视图中上传的附件图片怎么保存到数据库、ASP中怎么实现图片上传到文件夹等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！