讨论如何在网络间传递记录集（Recordset）？参与有奖！！！快来哦！！！

Question

1、用recordset.save来保存记录集
2、传送文件
3、用recordset.open(filename)来读取记录集

Answer 1

Public Function XMLFromADO(ByVal pprs As adodb.recordset) As String
 '将纪录集转换成XML
 '使用纪录集内置功能转换
 
    Dim strT   As String
    Dim pstrem As ADODB.Stream
    
    On Error GoTo Er
    strT = ""
    Set pstrem = New ADODB.Stream
    pprs.Save pstrem, adPersistXML
    strT = pstrem.ReadText
Er:
    XMLFromADO = strT
    Set pprs = Nothing
    Set pstrem = Nothing
End Function
Public Function ADORSFromXML(ByVal sXML As String) As adodb.recordset
    Dim pstrem      As ADODB.Stream
    Dim prs As ADODB.Recordset
    
    Set pstrem = New ADODB.Stream
    Set prs = New ADODB.Recordset
    pstrem.Open
    pstrem.WriteText sXML
    pstrem.Position = 0
    prs.Open pstrem
    Set ADORSFromXML = prs
    Set prs = Nothing
    Set pstrem = Nothing
End Function

Answer 2

数据库引擎自己会做，你只要设置好ODBC数据源就行了，何必操心这些。

Answer 3

to IsMe():
    如果查询出来的数据集比较大呢，可能出现以下情况，怎么解决呢？
1、STRING类型放不下
2、当超过8192个BYTE时，用WINSOCK发送时，WINSOCK会把发送包自动分割成好几条来发送。cool222(菜得不能再菜) ：
     因为我是多个CLIENT连接在一个SERVER上，而此时CLIENT要查询远程的数据时，是通过SERVER来查询远程的，并且我不可能为每个CLIENT去配置ODBC，再说我可能根本不知道远程的用户名和密码，而只是通过协议让远程SERVER帮我完成再传送过来。

Answer 4

我现在做的项目中，把取纪录集封装到com+组件中，直接返回记录集。感觉还可以，速度不是问题(用户数据量挺大)

Answer 5

to ： liucai(流才) 
    能告诉我COM+怎么做么？最好有源代码？分不是问题。谢谢！！！
  万分感谢！！！给我MAIL也行。[email protected]

Answer 6

iis+rds我就是用这方法实现的。在internet上多个客户端一个服器服路的很好。事需要呼我

Answer 7

to suhu(zym) :
      有例子吗？能给我吗？