Pulling Quick Login to main ASP page

So I'm trying to pull the Quick Login to my main *.asp page, the only problem is I can not find the code to do so:\  I tried to the follow the link below and I'm receiving an error probably because I'm missing a few things any help would be much appreciated.

<%
'If the user has not logged in (guest user ID = 2) then show them a quick login form
 If lngLoggedInUserID = 2 AND blnWindowsAuthentication = False AND (blnMemberAPI = False OR blnMemberAPIDisableAccountControl = False) Then
    
    vbCrLf & "  <form method=""post"" name=""frmLogin"" id=""frmLogin"" action=""forum/login_user.asp" & strQsSID1 & """>" & strTxtQuickLogin & _
    vbCrLf & "   <input type=""text"" size=""10"" name=""name"" id=""name"" style=""font-size: 10px;"" tabindex=""1"" />" & _
    vbCrLf & "   <input type=""password"" size=""10"" name=""password"" id=""password"" style=""font-size: 10px;"" tabindex=""2"" />" & _
    vbCrLf & "   <input type=""hidden"" name=""NS"" id=""NS"" value=""1"" />" & _
    vbCrLf & "   <input type=""hidden"" name=""returnURL"" id=""returnURL"" value=""returnURL=forum/default.asp"" />" & _
    vbCrLf & "   <input type=""submit"" value=""" & strTxtGo & """ style=""font-size: 10px;"" tabindex=""3"" />" & _
    vbCrLf & "  </form>"
   
End If
 %>

StarDust you are awesome!  Thanks..   Obviously I am a network guy not a programmer : \

I do have one more issue I am pulling the top 8 topics to my front page and when I add the code above it seems to break the page?  The line that kills everything is the (include).

<!--#include file="forum/common.asp" -->

Here is a snippet of code I’m using to pull my topics.

<%
Dim rsLastestPosts
Dim strPosts
Dim adoCon
Dim strCon
Dim strSQL
Dim strRecentPosts 

'Create a connection odject
Set adoCon = Server.CreateObject("ADODB.Connection")

'Database connection info and driver
strCon = "Provider=;Data Source=;Database=forum;User ID=;Password=;"

'Set an active connection to the Connection object
adoCon.Open strCon

Set rsLastestPosts = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT TOP 8 topic_ID,subject from tblTopic WHERE Forum_ID NOT IN(9,10,14,19,31) ORDER BY Last_Thread_ID DESC"

rsLastestPosts.Open strSQL, strCon

Do until rsLastestPosts.eof or rsLastestPosts.bof
strRecentPosts = strRecentPosts + ("<a href=""http://www.lodogg.com/forum/forum_posts.asp?TID=" & rsLastestPosts("topic_ID") & "&PN=1&TPN=1"">" & rsLastestPosts("subject") & "</a><BR>")
rsLastestPosts.movenext
loop

rsLastestPosts.close

%>

<%= strRecentPosts %>

Is there a way I can resize the Quick Login borders?  The code above does not include any sizing and when I try to resize it with a CSS it begins the wrap the login boxes to the next row.

You can see me dilemma here.