Web Wiz - Green Windows Web Hosting

  New Posts New Posts RSS Feed - New mod ,,,,
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

New mod ,,,,

 Post Reply Post Reply
Author
zadax View Drop Down
Mod Builder Group
Mod Builder Group


Joined: 19 January 2003
Location: Israel
Status: Offline
Points: 433
Post Options Post Options   Thanks (0) Thanks(0)   Quote zadax Quote  Post ReplyReply Direct Link To This Post Topic: New mod ,,,,
    Posted: 22 June 2003 at 6:49am

i try to Include this File to the Defualt.asp page But i get eror

this is the Page that i want to include

<%Response.Buffer = True%>

<!--#include file="variables.asp"-->
<%open_recordset rs_getQuote,"select * from quote"

open_recordset rs,"select * from idate"
idate1 = month(now()) & "/" & day(now()) & "/" & year(now())


'if month(now()) < 10 then
   'imonth = "0"& month(now())
'else
 'imonth =  month(now())
'end if
'idate1 = day(now()) & "/" & imonth & "/" & year(now())

idate2 = formatdatetime(rs("iday"),2)
rs.close

Randomize Timer
intRnd = (Int(RND * rs_getQuote.RecordCount))

if iquote_of_the_day = "1" then
 if idate1 <> idate2 then
     sql_update = "update config set config_value="&intRnd&" where config_variable = 'number_quote_of_the_day' "
     conn.Execute(sql_update) 
     sql_update = "update idate set iday='"&now()&"'"
     conn.Execute(sql_update) 
     rs_getQuote.Move intRnd
 else 
  rs_getQuote.Move inumber_quote_of_the_day
 end if
else
 if session("id") = intRnd then
    do while session("id") = intRnd
       intRnd = (Int(RND * rs_getQuote.RecordCount))
    loop
 end if
 rs_getQuote.Move intRnd
 session("id") = intRnd
end if
%>
<link rel="stylesheet" href="freekot/quote.css" type="text/css">
<table  cellpadding="0" cellspacing="0" border="0" align=center>
 <tr>
  <td bgcolor="black">
   <table  width="<%=iwidth%>" height="<%=iheight%>" cellpadding="3" cellspacing="1" border="0" height=100% width=100%>
       <tr>
           <td height=20 bgcolor="<%=background2%>"  class="titlebold">
          <font style="color:<%=textcolor2%>">Quote of the Day</font>
        </td>
       </tr>
       <tr>
           <td valign=top bgcolor="<%=background1%>" class="text">
          <font style="color:<%=textcolor1%>"><div style="text-align:justify;"><%=rs_getQuote("quote")%></div></font>
        </td>
       </tr>
       <tr>
           <td height=20 bgcolor="<%=background2%>"  class="text" align=right>
          <i><font style="color:<%=textcolor2%>"><%=rs_getQuote("author")%></font></i>&nbsp;
        </td>
       </tr>
   </table>
  </td>
 </tr>
</table>  
<%
rs_getQuote.Close
Set rs_getQuote = Nothing
%>

i add the Include code :

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

and i get Eror :

Variable is undefined: 'conn'

/zadax/zadax.asp, line 5

 

ITS DRIVING ME CRAZY !!

if i go to the Zadax.asp it work Good but whan i try to include it i get the undefined: 'conn'  ! somone have idea ?



Edited by zadax
Back to Top
TYSON View Drop Down
Groupie
Groupie


Joined: 18 August 2002
Location: Australia
Status: Offline
Points: 142
Post Options Post Options   Thanks (0) Thanks(0)   Quote TYSON Quote  Post ReplyReply Direct Link To This Post Posted: 22 June 2003 at 7:55am

Try adding this at the top of your code

Dim Conn

Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.08
Copyright ©2001-2026 Web Wiz Ltd.


Become a Fan on Facebook Follow us on X Connect with us on LinkedIn Web Wiz Blogs
About Web Wiz | Contact Web Wiz | Terms & Conditions | Cookies | Privacy Notice

Web Wiz is the trading name of Web Wiz Ltd. Company registration No. 05977755. Registered in England and Wales.
Registered office: Web Wiz Ltd, Unit 18, The Glenmore Centre, Fancy Road, Poole, Dorset, BH12 4FB, UK.

Prices exclude VAT at 20% unless otherwise stated. VAT No. GB988999105 - $, € prices shown as a guideline only.

Copyright ©2001-2026 Web Wiz Ltd. All rights reserved.