مشکل در بروزرسانی فرم

[M59alizadeh]

سلام دوستان

در یک فرم میخواهم که به رکورد مشخصی از یک SubForm برم اما خطا میگیره :
DoCmd.GoToRecord acDataForm, "MIS_Car_Cartable_view", acGoTo, 25
به پیغام خطای زیر برمی خورم :
Run-time error 2489
The Object MIS_Car_Cartable_view isn,t open
لطفا راهنمایی بفرمایید .

[M59alizadeh]

کسی نبود کمک کنه ؟

[مهدی قربانی]

سلام
دوست گرامي اول يك سئوال : خودتون چقدر جستجو و تحقيق كرديد تا جواب رو پيدا كنيد ؟
اگر يه مقدار در اينترنت جستجو مي كرديد جواب سئوالتون رو پيدا مي كرديد
قصد نصيحت ندارم فقط خواستم بدونيد اگر اقدام مي كرديد نياز به اين همه معطلي نبود
حقير با 7 دقيقه جستجو در اينترنت پاسخ سئوال شما رو پيدا كردم
لينك : http://p2p.wrox.com/topic.asp?TOPIC_ID=31029
بگذريم
در نمونه تقديمي راه حل فوق رو با كمي تغييرات شبيه سازي كردم اميدوارم مشكلتون حل بشه موفق باشيد .

Private Sub Combo0_AfterUpdate()
On Error GoTo Err_Combo0_AfterUpdate

' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[a] = '" & Me![Combo0] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

' ÇäÊÞÇá ÝæßæÓ Èå ÓÇÈÝÑã
Forms("form1").Controls("table2").SetFocus

' ÈÚÏ ÇäÊÞÇá Èå ÑßæÑÏ ãæÑÏ äÙÑ ÏÑ ÓÇÈÝÑã
DoCmd.GoToRecord , , acGoTo, 3
Exit_Combo0_AfterUpdate:
Exit Sub
Err_Combo0_AfterUpdate:
' ßäÊÑá ÎØÇ ÏÑ ÕæÑÊí ßå ÑßæÑÏí ÏÑ ÓÇÈÝÑã æÌæÏ äÏÇÔÊå ÈÇÔå íÇ ÊÚÏÇÏ ÑßæÑÏåÇ ßãÊÑ ÈÇÔå
If Err.Number = 2105 Then
Cancel = True
Else
MsgBox Err.Description
Resume Exit_Combo0_AfterUpdate
End If
End Sub

[M59alizadeh]

سلام به دوست عزیز
خیلی ممنون از جواب شما و بسیار متشکر از راهنمایی شما
من در خصوص مشکلی که عرض کردم خیلی پرس و جو و خیلی هم در اینترنت جستجو کردم و جوابهای زیادی پیدا شد که نهایتا نتیجه نداد .
راهنمایی شما رو هم انجام دادم و متاسفانه نشد .
در اینجا لازمه یه توضیحی بدم :
مواردی که شما نوشته بودین در حالتی که بانک اطلاعتی برنامه خود Access باشه به خوبی جواب میده و من قبلا استفاده کردم اما در حالتیکه بانک اطلاعاتی SQL Server باشه (مثل برنامه الان من) هنگامی که مثلا از دستور زیر :
Dim rs As Object
Set rs = Me.Recordset.Clone
Form_MIS_Cmr_Supplier_Sub.Requery
DoCmd.GoToRecord acDataForm, "MIS_Cmr_Supplier_Sub", acGoTo, 50
استفاده کنیم از خط سوم
با خطای Run time error 91 برخورد می کنم (Object Varaible or With block varaiable not set )
مشکل من اینه
باز هم از شما ممنونم دوست عزیز .

[مهدی قربانی]

سلام
دوست خوبم خوب اگر اين توضيحات كاملتر رو در همون پست اول مي داديد خيلي بهتر بود تصور حقير اين بود كه شما از اكسس استفاده مي كنيد به هر حال ، شما از چه اينترفيسي استفاده مي كنيد اكسس پروجكت يا VB

[M59alizadeh]

سلام عرض شد
Interface مورد استفاده من همون Access هستش که تو مجموعه نرم افزار Office نصب میشه .
و همانطوریکه که قبلا عرض کردم Interbase برنامه هم Micosoft SQL server 2000)
در هر حال ممنون میشم اگر در این زمینه تجربه ای دارید منو راهنمایی کنید .