gurus, I need to merge date and greeting

[samosa]

Dear Gurus!
I have two separate codes that do two different things.
I, the top part of the code below greets a user once he/she logs into the our corporate site. This works great.
The below code displays current date.
It works great also.
The problem that I am having is that date is below user like this:
Aug 23, 2002
Welcome, User
I need them to be on the same line like this:
Aug 23, 2002 Welcome, User

Can someone help me merge these codes?
Thanks in advance;

Function GetContent(node)
Dim strContent
Dim objKnowledge

Dim text_user
Dim ilf
Dim len_user

Set objKnowledge = CreateObject("CDO.KnowledgeDocument&quot
if objKnowledge Is Nothing Then
strContent="Client is NOT installed."
else
text_user=factory.variables.item("logon_user&quot
ilf=Instr(text_user,"\&quot
len_user=len(text_user)
GetContent = &quot;<font size=3>Welcome, <b>&quot; & mid(text_user,ilf+1,len_user) & &quot;</b></font>&quot;
end if

End Function

*****************************************

Function getContent(xml)

Dim strContent

strContent = &quot;<DIV style=&quot;&quot;font-size: 120%&quot;&quot;>&quot;
strContent = strContent & FormatDateTime(Now(), 1)
strContent = strContent & &quot;</DIV>&quot;
strContent = strContent & &quot;<HR>&quot;

getContent = strContent

End Function

 

[samosa]

got this figured out.
thanks folks
s