文本-数据库转换

Question

可以用简单的程序把and处理为其他的分隔符号，然后导入数据库不就行了吗？

Answer 1

Do While Not EOF(nFile)
        Line Input #nFile, sDataInput
        nPosition = InStr(1, sDataInput, "and")
        for i=1 to 4
           Select case i
           case 1
                rs!字段=Mid(sDataInput,1,nPosition-1)
           case 2
                ...
           End select
           sDataInput=Mid(sDataInput,nPosition+3)
       next i
Loop
希望有用！
 
                 
               

Answer 2

随便说说：
加一个IF ，如果读到“AND”，就NEXT。
我MAIL你这方面一例子，看看吧！

Answer 3

    把文本读入变量，然后逐字符搜索空格，判断空格后的字符是否为A，如是则继续判断后一字符是否为N，然后继续判断是否为N、D，如不是则把下一空格前的文字读入变量，最后输入数据库字段。
    此方法不适用包含and数据字段的文本。