带clob字段的表怎么导出到sqlserver、access、excel等数据库

Question

我帮你顶，
你用sqlserver里面的dts订制包来转换，oracle我才弄，不懂：）

Answer 1

sqlserver不认识破ORACLE的CLOB类型

Answer 2

自己做转换程序吧，给你一个把oracle的clob或blob字段写到文件里的过程，用vb写的
sqlserver我没弄过，余下的工作你自己再想办法Sub Main()
  Dim con As New ADODB.Connection 
  Dim cmd As New ADODB.Command   Dim rst As New ADODB.Recordset   Dim LogFileName As String 
  Dim LogFileNum As Integer   Dim sql As String        ' SELECT statement 
  Dim clob_data As Variant ' data from a text file 
  Dim vardata As Variant   ' data retrieved from clob data in chunks 
  Dim vardata_len As Long  ' length of the data retrieved from the CLOB 
column 
  Dim done As Boolean      ' done = True if finished retrieving all the data 
  Dim Data As Variant      ' the entire data retrieved from the CLOB column   On Error GoTo ErrorHandler   ' open a text file 
  LogFileName = "c:\myfile.txt" 
  LogFileNum = FreeFile 
  Open LogFileName For Input As LogFileNum   ' load text from file to a local variable 
  clob_data = Input$(LOF(LogFileNum), LogFileNum) 
  Close #LogFileNum   ' connect as adldemo/adldemo 
  con.CursorLocation = adUseServer 
  con.Open "Provider=OraOLEDB.Oracle;Data Source=db9i;" & _ 
           "User Id=adldemo;Password=adldemo;"   ' open a recordset 
  sql = "select clip_id, story from MULTIMEDIA_TAB" 
  rst.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText   ' add a new record 
  rst.AddNew 
  rst!clip_id = 1234 
  rst!story.AppendChunk (clob_data) 
  rst.Update   ' fetch entire CLOB data 
  Do While (Not (done)) 
    vardata = rst!story.GetChunk(4096) 
    If Not (IsNull(vardata)) Then 
      Data = Data & vardata 
    Else 
      done = True 
    End If 
  Loop 
  ' validate fetched data 
  If Data = clob_data And Len(clob_data) = rst!story.ActualSize Then 
    MsgBox "The CLOB data (of " & Len(clob_data) & " bytes) " & _ 
           "was inserted and retrieved properly!" 
  End If   ' cleanup 
  con.Execute "delete from multimedia_tab where clip_id = 1234" 
  rst.Close 
  con.Close   Exit Sub 
ErrorHandler: 
  MsgBox "Error: " & Err.Description 
End Sub 

Answer 3

如果写程序，我可以用DELPHI把它弄到SQLSERVER里，但是，好像太麻烦了，不知有没有什么工具可以直接导的，请各位帮忙