Jass Saini
asked on
Can you join Memo fields on a Continous form
Can you join Memo fields on a continous form??
You can join memo fields in a query which is the Source for continuous forms.
ASKER
How?
what do you mean by joining memo fields?
ASKER
Yes for all the records in the query results
do you mean like this
select [memo1] & " " & [memo2]
from tablex
select [memo1] & " " & [memo2]
from tablex
ASKER
Sorry Rey,
Maybe I am not clear enough...I have the continous form which if I have the memo field in the detail section..it will need a input in each record...I am trying to do the memo field in the header so it capture the memo for all the records and not each individual one...hope that is clear as to what I want.
Maybe I am not clear enough...I have the continous form which if I have the memo field in the detail section..it will need a input in each record...I am trying to do the memo field in the header so it capture the memo for all the records and not each individual one...hope that is clear as to what I want.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Hello Gustav,
How would the memo be stored??
How would the memo be stored??
The parts of the concatenated memo are stored in the individual records.
The concatenated (joined) memo is for display only.
/gustav
The concatenated (joined) memo is for display only.
/gustav
ASKER
Ok...I will try it and also where am I suppose to place this event
In the OnCurrent event.
If you are nitty-gritty, also in the AfterUpdate and Delete events.
/gustav
If you are nitty-gritty, also in the AfterUpdate and Delete events.
/gustav
ASKER
That's wierd..it locks up the program
No, the movenext is missing, sorry:
While Not rst.EOF
If strMemo <> "" Then
strMemo = strMemo & vbNewLine
End If
strMemo = strMemo & rst!YourMemoField.Value
rst.MoveNext
Wend
/gustav
While Not rst.EOF
If strMemo <> "" Then
strMemo = strMemo & vbNewLine
End If
strMemo = strMemo & rst!YourMemoField.Value
rst.MoveNext
Wend
/gustav
ASKER
Hello,
I tried this...but it is populating only the first record..In my query I have seventeen records.
Here is what I am using...I want to be able to use one memo box...enter in my comment and it populate the rest of the records.
I tried this...but it is populating only the first record..In my query I have seventeen records.
Here is what I am using...I want to be able to use one memo box...enter in my comment and it populate the rest of the records.
Private Sub Remarks1_AfterUpdate()
Dim strMsg As String, strQry As String, strRemark As String
If vbYes = MsgBox(strMsg, vbYesNo, "IMPORTANT!! Confirmation") Then
strMsg = "Please enter the remark"
strRemark = InputBox(strMsg, "Remark")
If Len(strRemark) > 0 Then
strQry = "Update Final_Table_AllotQ set UpdatedDate = now(), UpdatedBy = """ & htboLoginName & """, Remarks = Remarks & '--" & strRemark & "'"
QuickQry strQry, False
Me.Requery
End If
Else
MsgBox "Action cancelled."
End If
End Sub
That's the other way around.
I think you need to rephrase what you are trying to do.
/gustav
I think you need to rephrase what you are trying to do.
/gustav
ASKER
Thanks