فراخوانی توابع SQL از VB6

[h1and1saman]

سلام
میشه توابعی رو که درون SQLنوشته شده اند و صدا زد؟

[isaac23]

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

تا اونجایی که من بلدم از طریق وی بی با اس کیو ال هر کاری بخای میشه انجام داد . حالا شما کدوم توابع رو میخای باید بگید .

[h1and1saman]

سلام
فکر کردم عنوان گویا باشه
در خود sql یه تابع نوشتم که مثلا دو تا عدد بگیره و جمع کنه
چطور میشه دوتا مقدار رو از vb6 بهش ارسال کرد.
اگه نتونستم منظورمو برسونم بگید بیشتر توضیح بدم
فکر کنم از این سبک در برنامه نویسی چند لایه استفاده میشه

[isaac23]

دقیقا نمی دونم چرا میخای این کارور بکنی ولی مگه دستور SUM کارت رو نمیندازه .؟

[h1and1saman]

نه این یه مثال ساده بود که سبک کار رو یاد بگیرم وگرنه کاری که می خام انجام بیشتر ازاینه
عات این کار هم اینه که سرعت انجام کار روی داده ها وقتی در خود sql انجام بشه مطمئنا بیشتره و امنیت بیشتره و کلی کد نویسی سمت vb کمتر میشه و انجام تغییرات هم ساده تر میشه.
در کل‌اگه هیچ از مزایا را نداشته باشه هم یاد گرفتنش ضرری نداره میتونه جایی به درد بخوره که مطمئن فایده داره
ممنون میشم اگه کسی بلده راهنمایی کنه

[samiasoft]

نه این یه مثال ساده بود که سبک کار رو یاد بگیرم وگرنه کاری که می خام انجام بیشتر ازاینه
عات این کار هم اینه که سرعت انجام کار روی داده ها وقتی در خود sql انجام بشه مطمئنا بیشتره و امنیت بیشتره و کلی کد نویسی سمت vb کمتر میشه و انجام تغییرات هم ساده تر میشه.
در کل‌اگه هیچ از مزایا را نداشته باشه هم یاد گرفتنش ضرری نداره میتونه جایی به درد بخوره که مطمئن فایده داره
ممنون میشم اگه کسی بلده راهنمایی کنه

سوالتون رو ای کاش اینطور ساده میکردید شاید دوستان بهتر کمک کنند :

چطوری میشود توابعی که داخل یک تکست باکس هست را اجرا نمود؟

[h1and1saman]

نه سوال من این نیست
یه سرچ تو سایتهای خارجی زدم یه چیزی گیرم اومد البتخ تست نزدم میزارم شاید بدرد کسی خورد یا کسی شاید خواست تکمیل کنه.ولی کلیت کار اینه


Set cnn = New ADODB.Connection
cnn.ConnectionString = cStrConn
cnn.Open "File Name=" & App.Path & "\Config\VCH2.udl;"

Set cmd = New ADODB.Command
cmd.ActiveConnection = cnn
cmd.CommandTimeout = 15
cmd.CommandType = adCmdText

cmd.CommandText = "SELECT fnRutaFichero(@ID_FICHERO)"

cmd.Parameters.Append cmd.CreateParameter("@ID_FICHERO", adVarChar, adParamInput, , "VCH2")

cmd.Execute