如何对得到的字符串进行分析并保存在数据库中.txt

VB技巧问答10000例,是一个教程

分 解 字 符 串 就 使 用 “字符串按符号分割”中 的 Str2Array就 可 以 。 先 以 “ :” 号 作 为 分 割 符 ， 得 到 记 录 号 87。 然 后 用 “ ,” 号 进 行 分 割 ， 得 到 “ dn=k'85211460” 、 “ en=h'30&1” 、 “ orpt=zon” 三 个 部 分 。 再 对 三 个 部 分 用 “ =” 号 分 割 。 假 定 最 终 的 分 割 结 果 保 存 在 三 个 变 量 中 ， 如 sDN、 sEN和 sOrpt。 
    如 果 你 的 EN和 记 录 号 (我 假 定 你 说 的 记 录 号 是 前 面 87这 样 的 数 )之 间 有 联 系 ， 你 最 好 在 数 据 库 中 增 加 一 个 记 录 号 字 段 。 
    你 可 以 使 用 FindFirst查 找 记 录 ， 如 ： 
    Recordset.FindFirst "dn = '" + sDN +"'" 
    If Recrodset.NoMatch Then 
     ' 未 找 到 
     .... 
    Else 
     Recordset.Edit 
     Recordset("orpt") = sOrpt ' 修 改 表 中 的 值 
     MsgBox Recordset("en") ' 得 到 字 段 的 值 
    End If 
    显 示 具 有 格 式 的 文 本 可 以 使 用 Format函 数 (参 见 帮 助 文 件 )。 
<END>