岁月联盟 · 中国技术网 本站主页 | 安全认证 | 用户服务 | 技术论坛
新闻快报 | 新手学堂 | 黑客特区 | 程序语言 | 数 据 库 | 防 火 墙 | 路由交换 | 系统集成 | 服 务 器 | 存储备份 | 考试认证
Windows | Linux | Java | 协议分析 | 问题解答 | 进程大全 | 网页设计 | 多 媒 体 | 图库资料 | 软件下载 | 站内下载
  您现在的位置: 岁月联盟 >> 数据库 >> MySQL数据库 >> 数据库正文
数据从sqlserver导入mysql数据库的体验
作者:未知 文章来源:本站整理 点击数: 更新时间:2007-12-18 18:28:17
是将image类型数据取出来写到文件中,以文件形式保存,将文件路径存到数据库中,方法见下:
  
  function makeattach(fileContentType,filevalue,i)
    select case fileContentType
      case "application/msword"
        ext="doc"
  
      case "application/vnd.ms-excel"
        ext="exl"
        
      case "application/vnd.ms-powerpoint"
        ext="pps"
        
      case "application/x-rar-compressed"
        ext="rar"
        
      case "application/x-zip-compressed"
        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] 


  • 上一个数据库:
  • 下一个数据库:
  •  
    热门文章
    推荐文章
    关于我们 | 发展历程 | 网站地图 | 广告服务 | 招贤纳士 | 战略合作 | 友情链接 | 著作声明 | 联系我们
    Copyright © 2002-2007 SYUE All rights reserved.
    E_mail:Admin@Syue.Com 皖ICP备05004589号
    未经授权禁止转载、摘编、复制或建立镜像.如有违反,追究法律责任.
    天龙八部私服 传世私服 传奇世界私服 天龙八部私服 bet365 天龙八部私服 热血江湖私服 英雄合击传奇私服 热血江湖私服 bet365 bet365