小吳 VBQA 程式設計討論

sorry 更正 Dim MSdataRS As ADODB.Recordset 出現使用者自訂型態未定義.請指導，謝謝！

你確定你有引用Adodb的物件嗎??

ADODB物件是ms ext 2.1 object library嗎？還是其他的，請指導‧謝謝！

:::是MicroSoft ActiveX Data Objects 2.5 Library

謝謝小琳 我只有看到MicroSoft ActiveX Data Objects 2.7 library加入2.7後出現 ActiveX元件無法產生物件， Public db As Connection Public apppath As String Sub Main() If Right(App.Path, 1) = "\" Then 　　　　apppath = Left(App.Path, Len(App.Path) - 1) 　　Else 　　　　apppath = App.Path 　　End If 　　 　　Set db = New Connection ←就是這處出現錯誤 請大家幫忙糾正，謝謝！

正確的寫法 dim db as new adodb.connection 或 dim db as adodb.connection set　db = adodb.connection 你少了Adodb 去找本書或上網看一下 或MSDN 都有許多的範例 你問的還只是個開始 後面的問題會更多吧

Dear brl 整個程式已成功了，謝謝你和小琳！ 確是漏了adodb，不過宣告那裡要用public不是用dim，因為是在模組內宣告，而且還有其他form會call到‧ best regards