<%@ Page Language="vb" AutoEventWireup="false" Codebehind="ThemeHumor.aspx.vb" Inherits="ChattyWays.ThemeHumor"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
  <head>
    <title>ThemeHumor</title>
    <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
    <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
    <meta name=vs_defaultClientScript content="JavaScript">
    <meta name=vs_targetSchema content="http://schemas.microsoft.com/intellisense/ie5">
  </head>
  <body MS_POSITIONING="GridLayout" onload="doStartTimeOut();">

    <form id="Form1" method="post" runat="server">
<IMG id=imgHumor name=imgHumor style="Z-INDEX: 101; LEFT: 79px; POSITION: absolute; TOP: 47px" src="1.jpg"  leftmargin=0 rightmargin=0 topmargin=0 bottommargin=0>

    </form>
<script language="javascript">
	var nImage = 0;
	var nLastImage = 15
	function doStartTimeOut(){
			try {
				window.setInterval("doChangeImage()", 5000);
				
			}
			catch (error) {
				alert("doStartTimeOut() in ChatMessages.aspx caused the following error: " + error.description)
			}
		}
	function doChangeImage(){
			try { 
				nImage += 1;
				if (nImage  > nLastImage) {
					nImage = 1;	
				}
				var strImage = nImage.toString() + ".jpg";			
				Form1.imgHumor.src = strImage;
								
			}
			catch (error) {
				alert("doStartTimeOut() in ChatMessages.aspx caused the following error: " + error.description)
			}
		}

</script>

  </body>
</html>
