چسباندن دو ركرو از يك فيلد به يكديگر

[behboodi2000]

با سلام خدمت كليه دوستان و اساتيد محترم
در نمونه پيوست من يك جدول دارم كه در آن آيات قرآن با شماره سوره و هر آيه در يك ركورد نوشته شده است .مي خواستم دوستان راهنمائي بفرمايند كه چگونه مي توانم آيات يك سوره را به صورت پيوسته و دنبال يكديگر به طور مثال در يك تكست باكس ببينم باتشكر

[AmirHarirbafan]

با این دستور



DECLARE @Ayeh VARCHAR(MAX)
SET @Ayeh = ''
SELECT @Ayeh = @Ayeh + ' ' + AyehText FROM Table1
WHERE SorehNo = 1
SELECT @Ayeh

[behboodi2000]

با سلام خدمت دوست گرامی و تشکر از پاسخ ولی نمی دانم این کد را کجا بنویسم در صورت امکان نمونه را مانل نمائید ممنون

[stabesh]

با سلام
اين كدي كه براتون نوشتن مال sql server هست نه اكسس :متعجب:
براي اكسس من از تابع زير استفاده ميكنم يك ماژول تعريف كنيد اينو توش بنويسيد


' the function concatenate any fields from select Query(pstrSQL)and return string
' the Select Query include one fields
Function StringConcat(pstrSQL As String)
On Error GoTo Err_StringConcat
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim strConcat As String 'build return string
Set db = CurrentDb
Set rst = db.OpenRecordset(pstrSQL, dbOpenDynaset)
'concatenate Fields in strConcat
With rst
If Not .EOF Then
.MoveFirst
Do While Not .EOF
strConcat = strConcat & .Fields(0) & ","
.MoveNext
Loop
End If
.Close
End With
Set rst = Nothing
Set db = Nothing

'return strConcat
StringConcat = strConcat

Exit_StringConcat:
Exit Function

Err_StringConcat:
'MsgBox Err.Description
Resume Exit_StringConcat
End Function


متغير pstSQL بايد حاوي دستور select باشد كه فقط يك فيلد را انتخاب ميكند و مي تواند تمام ركودها را به هم متصل كند مثل


Select LastName From NameTable

[behboodi2000]

با سلام متاسفانه متوجه موضوع نشدم اگر امکان دارد روی نمونه توضیح فرمائید با تشکر

[stabesh]

بفرماييد اينم نمونه خودتون

[behboodi2000]

با سلام واقعا مناز اينكه دوستاني مانند شما دارم افتخار مي كنم از پاسخ شما متشكرم . موفق و پيروز باشيد

[Rasool-GH]

سلام
اگر نياز باشه كه فيلدهاي يك ركورد رو به هم بچسبونيم و در يك تكس باكس ببينيم چه بايد كرد ؟

[mehdi_fiz]

سلام دوست عزیز
شما از کد زیر استفاده کنید
text1=filed1&" "&filed2&" "& filed3
موفق باشید