ADP中能通过窗体添加OLE对象吗，如加入图片！！！

XMX64311

各位老师，ADP中能通过窗体添加OLE对象吗，如通过单击窗体中的按钮，然后找到图片并保存到数据库！

zhuyiwen

XMX64311 发表于 2012-4-12 15:00
temp = "Select * From [Warranty information]"
   RS.Open temp, CurrentProject.Connection, adOpen ...

这样做当然行不通。

难道你在mdb中这样通得过？


你直接绑定窗体记录源呀，那样才能 Link 图片。

1. Me.RecordSource = "Select * From [Warranty information]"

复制代码

不用辛苦去写这样一大堆的代码。

XMX64311

运行时错误提示如上图所示！

XMX64311

[

XMX64311

老师在线吗？

XMX64311

   temp = "Select * From [Warranty information]"
   RS.Open temp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
   RS.AddNew

RS("Claim NO") = Me![Text1]
RS("Service station") = Me![Text2]
RS("production date") = Me![Text3]
RS("engine NO") = Me![Text4]
RS("sale date") = Me![Text5]
RS("repair date") = Me![Text6]
RS("mileage") = Me![Text7]
RS("time in service") = Me![Text8]
RS("Customer complaint") = Me![Text9]
RS("Failure description") = Me![Text10]
RS("technical issue") = Me![Text11]
RS("root cause") = Me![Text12]
RS("Corrective Action") = Me![Text13]
RS("owner") = Me![Text14]
RS("Claim invoice NO") = Me![Text15]
RS("Claim invoice date") = Me![Text16]
RS("Claim Money") = Me![Text17]
RS("Customer") = Me![Combo1]
RS("Product Type") = Me![Combo2]
RS("Part NO") = Me![Combo3]
RS("Appearance problem") = Me![Combo4]
RS("Responsibility") = Me![Combo5]
RS("Link for Failure Mode illustration") = Me![OLE1]
RS("Link for Support Document") = Me![OLE2]
RS("input date") = Me![Text99]

RS.Update
RS.Close

其中的OLE1和OLE2中的对象，我是怎么也保存不到数据库中！

zhuyiwen

当然可以，与mdb操作一致