فراخوانی تابع نوشته شده در access

[mortezahbh]

با سلام:لبخندساده:

در داخل دیتابیس اکسس من یک Modual دارم که داخل اون یک تابع نوشته شده

حالا میخوام توسط دلفی از این تابع در کوئری هام استفاده کنم

در خود بانک اطلاعاتی از تابع استفاده میشه و مشکلی نداره ولی وقتی همون کوئری رو در دلفی درخواست میکنم اخطار میده که تابع استفاده شده در کوئری ناشناخته است

امیدوارم منظورم رو رسونده باشم

باتشکر:چشمک:

[hadisalahi2]

تا جایی که من تحقیق کردم نمیشه
من خودم برای این موضوع کلی این در و اون در زدم
کلی هم توی سایت آفیس و مایکروسافت چرخیدم

متاسفانه این قابلیت Sp در اکسس وجود نداره که مثل Sql Server بشه راحت با Sp های اون ارتباط برقرار کرد

واسه همین من ترجیح میدم از اکثر موارد از SQl Server استفاده کنم

[mortezahbh]

چقدر بد :ناراحت:

پس از دوستانی که با زبان vb آشنایی دارن خواهش میکنم این کد (تابع داخل بانک اطلاعاتی) رو به زبان دلفی برگردونن


Public Function fAppendDogNames(intOwnerstudent_id As Integer) As String
Dim intNoOfDogs As Integer, strNames As String

intNoOfDogs = DCount("*", "Debts", "[student_id]=" & intOwnerstudent_id)

If intNoOfDogs = 1 Then
fAppendDogNames = DLookup("[title]", "Debts", "[student_id]=" & intOwnerstudent_id)
Exit Function
Else
Dim MyDB As DAO.Database, MyRS As DAO.Recordset
Set MyDB = CurrentDb()
Set MyRS = MyDB.OpenRecordset("Select * From Debts Where [student_id]=" & intOwnerstudent_id, dbOpenSnapshot)
MyRS.MoveFirst
Do While Not MyRS.EOF
If Len(strNames) = 0 Then
strNames = MyRS![title]
Else
strNames = strNames & " " & MyRS![title]
End If
MyRS.MoveNext
Loop
fAppendDogNames = strNames
End If

MyRS.Close
Set MyRS = Nothing
End Function

فکر کنم درحال حاضر این تنها راهش باشه

با سپاس:قلب:

[hadisalahi2]

توصیه من اینکه که برای Sp بری سراغ Sql Server

[mortezahbh]

توصیه من اینکه که برای Sp بری سراغ Sql Server
خیلی ممنون از نظرتون ولی این پروژه دیگه تمومه فقط همینجاشو میخواستم درست کنم و وقت طراحی دوباره دیتابیس رو ندارم

[hadisalahi2]

وقت طراحی دوباره دیتابیس رو ندارم
احتیاجی واسه طراحی مجدد نیست

Import / Export رو برای همین روزها اختراع کردن :لبخند: