请教：数据库问题

Question

我想把数据库geotest.exe(加密更名的密码2004123)中表subject的fid字段为0的所有项列在combo1里 下边是本菜写的代码可总是显示错误 说类型不匹配 请问为什么怎么改？
Option Explicit
Public Conn As New ADODB.Connection
Public cont As String
Public StrSQL As String
Dim mRst As New ADODB.Recordset
Private Sub Form_Load()
    Dim i As Integer
    mRst.CursorLocation = adUseClient
    StrSQL = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\geotest.exe" & ";Persist Security Info=False;Jet OLEDB:Database Password=" + "2004123"
    Conn.Open StrSQL
    mRst.Open "Select * From subject Where fid=" + 0 + "", StrSQL, adOpenKeyset, adLockOptimistic, adCmdText
    For i = 1 To mRst.RecordCount
        cont = mRst("name")
        Combo1.AddItem cont
        mRst.MoveNext
    Next
    Conn.Close
End Sub

Answer 1

加密成文件geotest.exe干嘛？你的數據不是可以設置密碼嗎？VB打開數據不認這個geotest.exe文件啊！

Answer 2

"+0+" 这是什么意思呀！
这样写可能会好点
“Select * From subject Where fid=0”  (fid为数字型）
“Select * From subject Where fid=‘0’”（fid为字符型）