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/Code)
 Search the Web for 3.4 - 3.4.02
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

@tomic
Senior Member

USA
1790 Posts

Posted - 25 August 2002 :  21:19:57  Show Profile  Visit @tomic's Homepage  Send @tomic an ICQ Message
All I did was convert it to Response.Write but
here it is to save you all the trouble:


Demo available at: http://www.skepticfriends.org/forum2/

User Name: demo
Password: demo




to use this just save it as inc_websearch.asp,
sign up at google.com, edit this file with the
inormation Google gives you when you sign up and
include this file wherever you desire.


<%
Response.Write "<table width=""150"" border=""0"" cellspacing=""0"" cellpadding=""0"" bgcolor=" & strHeadCellColor & ">" & VbCrlf & _
			   "   <tr>" & VbCrlf & _ 
               "      <td align=""left"" valign=""top"">" & VbCrlf & _
			   "      <table BORDER=""0"" bordercolor=""#000099"" CELLSPACING=""0"" CELLPADDING=""1"" width=""100%"">" & VbCrlf & _
			   "         <tr>" & VbCrlf & _
			   "			<td width=""100%"" valign=""top"">" & VbCrlf & _
			   "			<table border=""0"" cellpadding=""0"" cellspacing=""0"" width=""100%"">" & VbCrlf & _
			   "			   <tr>" & VbCrlf & _
			   "				  <td>" & VbCrlf & _
			   "<table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""2"">" & VbCrlf & _
			   "<tr>" & VbCrlf & _
			   "<td align=""center"" bgcolor=" & strHeadCellColor & " nowrap valign=""top""><font face="" & strDefaultFontFace & "" size="" & strHeaderFontSize & "" color="" & strHeadFontColor & "">Search the Web</font></td>" & VbCrlf & _
			   "</tr>" & VbCrlf & _
			   "			</table>" & VbCrlf & _
			   "			</td>" & VbCrlf & _
			   "		 </tr>" & VbCrlf & _
			   "	     <tr>" & VbCrlf & _
			   "     <td valign=""top"" bgcolor=" & strForumCellColor & " width=""100%"">" & VbCrlf & _
			   "     <table bgcolor=" & strForumCellColor & " border=""0"" cellpadding=""4"" cellspacing=""0"" width=""100%"">" & VbCrlf & _
			   "<tr>" & VbCrlf & _
			   "<td align=""center"">" & VbCrlf & _		
		       "		    <font color="" & strDefaultFontColor & "" face="" & strDefaultFontFace & "" size="" & strFooterFontSize & "">" & VbCrlf & _
			   "            <center>" & VbCrlf & _
	           "            <FORM method=GET action=""http://www.google.com/custom"">" & VbCrlf & _
			   "            <TABLE bgcolor=""#FFFFFF"" cellspacing=""0"" border=""0"">" & VbCrlf & _
			   "				<tr valign=""top"">" & VbCrlf & _
			   "					<td align=""center"" bgcolor=""whitesmoke"">" & VbCrlf & _
			   "				    <A HREF=""http://www.google.com/search"">" & VbCrlf & _
			   "				    <IMG SRC=""http://www.google.com/logos/Logo_40wht.gif"" border=""0"" ALT=""Google"" align=""middle""></A><br>" & VbCrlf & _
			   "					<INPUT TYPE=""text"" name=""q"" size=""20"" maxlength=""255"" value=""""><br>" & VbCrlf & _
			   "					<INPUT type=""submit"" name=""sa"" VALUE=""Google Search"">" & VbCrlf & _
			   "					<INPUT type=""hidden"" name=""cof"" VALUE=""T:#000000;LW:118;ALC:#FF0000;L:http://www.skepticfriends.org/forum/eyelogo.jpg;LC:#0000FF;LH:90;BGC:#FFFFFF;AH:center;VLC:#0000CC;S:http://www.skepticfriends.org;AWFID:878a99eabb890384;"">" & VbCrlf & _
			   "					<font color="" & strDefaultFontColor & "" face="" & strDefaultFontFace & "" size="" & strFooterFontSize & ""><input type=""hidden"" name=""domains"" value=""skepticfriends.org""><br><input type=""radio"" name=""sitesearch"" value="""" checked> WWW <input type=""radio"" name=""sitesearch"" value=""skepticfriends.org""> SFN</font>" & VbCrlf & _
			   "					</td></tr></TABLE>" & VbCrlf & _
			   "					</FORM>" & VbCrlf & _
			   "					</center>" & VbCrlf & _
			   "					</font>" & VbCrlf & _
               "					</td>" & VbCrlf & _
               "				</tr>" & VbCrlf & _
               "			</table>" & VbCrlf & _
               "			</td>" & VbCrlf & _
               "		</tr>" & VbCrlf & _
			   "	</table>" & VbCrlf & _
			   "	</td>" & VbCrlf & _
			   "</tr>" & VbCrlf & _
			   "</table>" & VbCrlf & _
			   "</td>" & VbCrlf & _
			   "</tr>" & VbCrlf & _
			   "</table>"
	%>


@tomic

SportsBettingAcumen.com

Edited by - @tomic on 11 September 2002 22:02:26

Etymon
Advanced Member

United States
2385 Posts

Posted - 11 September 2002 :  21:35:32  Show Profile  Visit Etymon's Homepage

Thanks @tomic!


Cheers,

Etymon
Go to Top of Page

@tomic
Senior Member

USA
1790 Posts

Posted - 11 September 2002 :  22:01:35  Show Profile  Visit @tomic's Homepage  Send @tomic an ICQ Message
Doh! I left me image header code in there. It's gone now.

@tomic

SportsBettingAcumen.com
Go to Top of Page

lofty
Junior Member

USA
158 Posts

Posted - 12 September 2002 :  11:51:49  Show Profile  Visit lofty's Homepage
Can I ask a dumb question? Why do you use vbCrLf, when the rest of snitz 3.4.02 uses vbNewLine?

Adam Lofstedt
Go to Top of Page

@tomic
Senior Member

USA
1790 Posts

Posted - 12 September 2002 :  12:03:21  Show Profile  Visit @tomic's Homepage  Send @tomic an ICQ Message
because I was using vbCrlf before I ever saw vbNewLine used. I'll probably go through and replace them all at some point for consistency and try to catch myself and use vbnewLine but I forget sometimes.

@tomic

SportsBettingAcumen.com
Go to Top of Page

shawdzee
New Member

USA
67 Posts

Posted - 14 September 2002 :  02:35:07  Show Profile
@tomic,

check this site out...

http://digitalwindmill.com/


be well, shawdzee
Go to Top of Page
  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.23 seconds. Powered By: Snitz Forums 2000 Version 3.4.07