WEB开发网
开发学院数据库MySQL SQLserver数据库导入Mysql数据库的体验 阅读

SQLserver数据库导入Mysql数据库的体验

 2007-04-26 15:48:33 来源:WEB开发网   
核心提示:ext="zip" case "image/gif" ext="gif" case "image/pjpeg" ext="jpg" case "text/plain" ext="txt&qu

ext="zip"

case "image/gif"
ext="gif"

case "image/pjpeg"
ext="jpg"

case "text/plain"
ext="txt"

case else
ext="x"

end select
if ext<>"x" then
set fso=server.createobject("FileSystemObject")
fName="attech"&i&"."&ext
Dir="d:attach"
If fso.FileExists(Dir & fName) Then fso.deletefile Dir & fName
If fName<>"" AND NOT fso.FileExists(Dir & fName) Then
Set strm1=Server.CreateObject("ADODB.Stream")
strm1.Open
strm1.Type=1 'Binary
strm1.Write filevalue
strm1.SaveToFile Dir & fName,2
Set strm1=Nothing
end if
makeattach=fName
end if
end function

这个函数有3个输入参数,第一个是文件的contentType,第二个是文件的二进制数值,第三个是个可以区别文件名的变量,先根据contentType确定所存文件的后缀名,然后就是将二进制数值保存成指定文件名的文件,并将文件名作为输出参数返回,将返回的参数作为数据写到mysql的数据库中保存。
时间匆忙,先总结到这里,希望这些文字能对有需要的人有些帮助,少走些弯路,感谢您的阅读。:)

上一页  1 2 

Tags:SQLserver 数据库 导入

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接