下面再介绍一下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的数据库中保存。