好学IT学院:IT信息技术分享交流平台
来源:互联网  作者:本站整理  发布时间:2006-12-23  ★★★加入收藏〗〖手机版
摘要:因工作需要,要将存放在sql server数据库中的数据全部导入到mysql数据库中,在网上搜集相关资料,找到两种方法,现在分别谈谈对他们的看法。…

下面再介绍一下asp脚本实现sql server中mydb数据库的数据向mysql中mydb数据库导入

<%
set conn=server.createobject("adodb.connection")
conn.open 'web', 'admin', '123456' // 'web'是sqlserver中mydb的数据源名,'admin'是访问mydb的用户名,'123456'是访问mydb的密码
set rs=server.createobject("adodb.recordset")
sql="select ID,name,username,password,datediff(s,'1970-01-01 00:00:00',recdate)-8*3600,reid,filename,fileContentType,filevalue from senddate" //这条sql语句实现了将datetime类型的recdate字段转化成unix时间戳的int型
rs.open sql,conn,1,3
set conn1=server.createobject("adodb.connection")
conn1.open "myoa","root","q1-d6=7?"
i=1
do while not rs.eof
  field1 = rs(0)  
  field2 = rs(1)  
  field3 = rs(2)  
  field4 = rs(3)  
  field5 = rs(4)  
  sql1 = "insert into user(ID,name,username,password,recdate)
values("&field1&",'"&field2&"','"&field3&"','"&field4&"',"&field5&")"
conn1.execute sql1
rs.movenext
i=i+1
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
conn1.close
set conn1=nothing

%>

以上两个是分别采用php脚本和asp脚本对user表的数据进行由sql server到mysql的导入其间我采用2种回避的方法来避免ntext,image类型数据的传递,一种是将ntext字段改为nvarchar(4000),因为实际情况,原始数据中该字段的数据长度都未超过4000个字,所以并没有出现数据截断,另一个手段是将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的数据库中保存。

时间匆忙,先总结到这里,希望这些文字能对有需要的人有些帮助,少走些弯路,感谢您的阅读。

Web领域10大最吃香的网站开发技术
  虽然现在美国经济出现危机,但是网站开发领域依然很繁荣,因为不论是现在或者将来,网络必定是人们日常生活中不可缺少的组成部分。NETT…
  • 好学触屏公众号虎力全开、杨帆起航!
  • 好学考试H5触屏版开放内测