Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/O Code)
 Login Section: Need a bit of help on code
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

padawan
Junior Member

200 Posts

Posted - 21 March 2003 :  10:58:18  Show Profile
Gang,

...'need a bit of push to get this one through, pls.

I'm trying to put my login section all in one line.

Here's how it looks right now.



Here's the inc_header code snippet I'm having trouble modifying...


if (strAuthType = "db") then
Response.Write " <table border=""0"" cellpadding=""1"" cellspacing=""0""><td align=""left"" width=""100%""><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """ color=""#FFCC99""><img SRC=""" & strImageURL & "icon_member.gif""><b>USERNAME: <input type=""text"" class=""newLogin"" name=""Name"" size=""15"" maxLength=""25"" value=""""> <img SRC=""" & strImageURL & "icon_lock2.gif"">PASSWORD: <input type=""password"" class=""newLogin"" name=""Password"" size=""15"" maxLength=""25"" value=""""></b></font></td></tr>" & vbNewLine & _
" </td></tr></table>" & vbNewLine & _
" <td>" & vbNewLine
if strGfxButtons = "1" then
Response.Write " <input src=""" & strImageUrl & "button_login.gif"" type=""image"" border=""0"" value=""Login"" id=""submit1"" name=""Login"">" & vbNewLine
else
Response.Write " <input type=""submit"" value=""Login"" id=""submit1"" name=""submit1"">" & vbNewLine
end if
Response.Write " <br><font face=""" & strDefaultFontFace & """ size=""2""><a href=""policy.asp"" tabindex=""-1""><b>Register</b></a></font>" & vbNewLine

if (lcase(strEmail) = "1") then
Response.Write " <br><font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><a href=""password.asp""" & dWStatus("Choose a new password if you have forgotten your current one...") & " tabindex=""-1"">Forgot "
if strAuthType = "nt" then Response.Write("Admin ")
Response.Write "Password?</a></font>" & vbNewLine
Response.Write " </td>" & vbNewLine
else
if (strAuthType = "nt") then
Response.Write " <td><font face=""" & strDefaultFontFace & """ size=""1"" color=""" & strHiLiteFontColor & """>Please <a href=""policy.asp"" tabindex=""-1"">register</a> to post in these Forums</font></td>" & vbNewLine
end if
end if


Here's my inc_header in text

All input/help is greatly appreciated.

padawan


"...be mindful of the SnitzForce..."
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.17 seconds. Powered By: Snitz Forums 2000 Version 3.4.07