
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../../../Connections/iaminawe_data.asp" -->
<%'check to see if signup button is pressed
	If (Request("signup") <>"") Then
	
	End If
%>

<%
' *** Edit Operations: declare variables

Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd

Dim MM_editConnection
Dim MM_editTable
Dim MM_editRedirectUrl
Dim MM_editColumn
Dim MM_recordId

Dim MM_fieldsStr
Dim MM_columnsStr
Dim MM_fields
Dim MM_columns
Dim MM_typeArray
Dim MM_formVal
Dim MM_delim
Dim MM_altVal
Dim MM_emptyVal
Dim MM_i

MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
  MM_editAction = MM_editAction & "?" & Request.QueryString
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = ""
%>
<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "form2") Then

  MM_editConnection = MM_iaminawe_data_STRING
  MM_editTable = "Contacts"
  MM_editRedirectUrl = "index.asp?signup=affirmative"
  MM_fieldsStr  = "textFrom|value"
  MM_columnsStr = "Email|',none,''"

  ' create the MM_fields and MM_columns arrays
  MM_fields = Split(MM_fieldsStr, "|")
  MM_columns = Split(MM_columnsStr, "|")
  
  ' set the form values
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)))
  Next

  ' append the query string to the redirect URL
  If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
    If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
      MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
    Else
      MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
    End If
  End If

End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If (CStr(Request("MM_insert")) <> "") Then

  ' create the sql insert statement
  MM_tableValues = ""
  MM_dbValues = ""
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_formVal = MM_fields(MM_i+1)
    MM_typeArray = Split(MM_columns(MM_i+1),",")
    MM_delim = MM_typeArray(0)
    If (MM_delim = "none") Then MM_delim = ""
    MM_altVal = MM_typeArray(1)
    If (MM_altVal = "none") Then MM_altVal = ""
    MM_emptyVal = MM_typeArray(2)
    If (MM_emptyVal = "none") Then MM_emptyVal = ""
    If (MM_formVal = "") Then
      MM_formVal = MM_emptyVal
    Else
      If (MM_altVal <> "") Then
        MM_formVal = MM_altVal
      ElseIf (MM_delim = "'") Then  ' escape quotes
        MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'"
      Else
        MM_formVal = MM_delim + MM_formVal + MM_delim
      End If
    End If
    If (MM_i <> LBound(MM_fields)) Then
      MM_tableValues = MM_tableValues & ","
      MM_dbValues = MM_dbValues & ","
    End If
    MM_tableValues = MM_tableValues & MM_columns(MM_i)
    MM_dbValues = MM_dbValues & MM_formVal
  Next
  MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"

  If (Not MM_abortEdit) Then
    ' execute the insert
    Set MM_editCmd = Server.CreateObject("ADODB.Command")
    MM_editCmd.ActiveConnection = MM_editConnection
    MM_editCmd.CommandText = MM_editQuery
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close

    If (MM_editRedirectUrl <> "") Then
      Response.Redirect(MM_editRedirectUrl)
    End If
  End If

End If
%>
<%
Dim RS_CurrentEvents
Dim RS_CurrentEvents_numRows

Set RS_CurrentEvents = Server.CreateObject("ADODB.Recordset")
RS_CurrentEvents.ActiveConnection = MM_iaminawe_data_STRING
RS_CurrentEvents.Source = "SELECT * FROM News ORDER BY itemid DESC"
RS_CurrentEvents.CursorType = 0
RS_CurrentEvents.CursorLocation = 2
RS_CurrentEvents.LockType = 1
RS_CurrentEvents.Open()

RS_CurrentEvents_numRows = 0
%>
<%
Dim RS_Webwork
Dim RS_Webwork_numRows

Set RS_Webwork = Server.CreateObject("ADODB.Recordset")
RS_Webwork.ActiveConnection = MM_iaminawe_data_STRING
RS_Webwork.Source = "SELECT * FROM Work"
RS_Webwork.CursorType = 0
RS_Webwork.CursorLocation = 2
RS_Webwork.LockType = 1
RS_Webwork.Open()

RS_Webwork_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = 5
Repeat1__index = 0
RS_CurrentEvents_numRows = RS_CurrentEvents_numRows + Repeat1__numRows
%>
<%
'  *** Recordset Stats, Move To Record, and Go To Record: declare stats variables

Dim RS_CurrentEvents_total
Dim RS_CurrentEvents_first
Dim RS_CurrentEvents_last

' set the record count
RS_CurrentEvents_total = RS_CurrentEvents.RecordCount

' set the number of rows displayed on this page
If (RS_CurrentEvents_numRows < 0) Then
  RS_CurrentEvents_numRows = RS_CurrentEvents_total
Elseif (RS_CurrentEvents_numRows = 0) Then
  RS_CurrentEvents_numRows = 1
End If

' set the first and last displayed record
RS_CurrentEvents_first = 1
RS_CurrentEvents_last  = RS_CurrentEvents_first + RS_CurrentEvents_numRows - 1

' if we have the correct record count, check the other stats
If (RS_CurrentEvents_total <> -1) Then
  If (RS_CurrentEvents_first > RS_CurrentEvents_total) Then
    RS_CurrentEvents_first = RS_CurrentEvents_total
  End If
  If (RS_CurrentEvents_last > RS_CurrentEvents_total) Then
    RS_CurrentEvents_last = RS_CurrentEvents_total
  End If
  If (RS_CurrentEvents_numRows > RS_CurrentEvents_total) Then
    RS_CurrentEvents_numRows = RS_CurrentEvents_total
  End If
End If
%>
<%
' *** Recordset Stats: if we don't know the record count, manually count them

If (RS_CurrentEvents_total = -1) Then

  ' count the total records by iterating through the recordset
  RS_CurrentEvents_total=0
  While (Not RS_CurrentEvents.EOF)
    RS_CurrentEvents_total = RS_CurrentEvents_total + 1
    RS_CurrentEvents.MoveNext
  Wend

  ' reset the cursor to the beginning
  If (RS_CurrentEvents.CursorType > 0) Then
    RS_CurrentEvents.MoveFirst
  Else
    RS_CurrentEvents.Requery
  End If

  ' set the number of rows displayed on this page
  If (RS_CurrentEvents_numRows < 0 Or RS_CurrentEvents_numRows > RS_CurrentEvents_total) Then
    RS_CurrentEvents_numRows = RS_CurrentEvents_total
  End If

  ' set the first and last displayed record
  RS_CurrentEvents_first = 1
  RS_CurrentEvents_last = RS_CurrentEvents_first + RS_CurrentEvents_numRows - 1
  
  If (RS_CurrentEvents_first > RS_CurrentEvents_total) Then
    RS_CurrentEvents_first = RS_CurrentEvents_total
  End If
  If (RS_CurrentEvents_last > RS_CurrentEvents_total) Then
    RS_CurrentEvents_last = RS_CurrentEvents_total
  End If

End If
%>
<%
Dim MM_paramName 
%>
<%
' *** Move To Record and Go To Record: declare variables

Dim MM_rs
Dim MM_rsCount
Dim MM_size
Dim MM_uniqueCol
Dim MM_offset
Dim MM_atTotal
Dim MM_paramIsDefined

Dim MM_param
Dim MM_index

Set MM_rs    = RS_CurrentEvents
MM_rsCount   = RS_CurrentEvents_total
MM_size      = RS_CurrentEvents_numRows
MM_uniqueCol = ""
MM_paramName = ""
MM_offset = 0
MM_atTotal = false
MM_paramIsDefined = false
If (MM_paramName <> "") Then
  MM_paramIsDefined = (Request.QueryString(MM_paramName) <> "")
End If
%>
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("user"))
If MM_valUsername <> "" Then
  MM_fldUserAuthorization=""
  MM_redirectLoginSuccess="../../admin/index.asp"
  MM_redirectLoginFailed="index.asp"
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
  MM_rsUser.ActiveConnection = MM_iaminawe_data_STRING
  MM_rsUser.Source = "SELECT Username, Password"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM Logins WHERE Username='" & Replace(MM_valUsername,"'","''") &"' AND Password='" & Replace(Request.Form("password"),"'","''") & "'"
  MM_rsUser.CursorType = 0
  MM_rsUser.CursorLocation = 2
  MM_rsUser.LockType = 3
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And false Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect(MM_redirectLoginSuccess)
  End If
  MM_rsUser.Close
  Response.Redirect(MM_redirectLoginFailed)
End If
%>
<%
' *** Move To Record: handle 'index' or 'offset' parameter

if (Not MM_paramIsDefined And MM_rsCount <> 0) then

  ' use index parameter if defined, otherwise use offset parameter
  MM_param = Request.QueryString("index")
  If (MM_param = "") Then
    MM_param = Request.QueryString("offset")
  End If
  If (MM_param <> "") Then
    MM_offset = Int(MM_param)
  End If

  ' if we have a record count, check if we are past the end of the recordset
  If (MM_rsCount <> -1) Then
    If (MM_offset >= MM_rsCount Or MM_offset = -1) Then  ' past end or move last
      If ((MM_rsCount Mod MM_size) > 0) Then         ' last page not a full repeat region
        MM_offset = MM_rsCount - (MM_rsCount Mod MM_size)
      Else
        MM_offset = MM_rsCount - MM_size
      End If
    End If
  End If

  ' move the cursor to the selected record
  MM_index = 0
  While ((Not MM_rs.EOF) And (MM_index < MM_offset Or MM_offset = -1))
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend
  If (MM_rs.EOF) Then 
    MM_offset = MM_index  ' set MM_offset to the last possible record
  End If

End If
%>

<%
' *** Move To Record: if we dont know the record count, check the display range

If (MM_rsCount = -1) Then

  ' walk to the end of the display range for this page
  MM_index = MM_offset
  While (Not MM_rs.EOF And (MM_size < 0 Or MM_index < MM_offset + MM_size))
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend

  ' if we walked off the end of the recordset, set MM_rsCount and MM_size
  If (MM_rs.EOF) Then
    MM_rsCount = MM_index
    If (MM_size < 0 Or MM_size > MM_rsCount) Then
      MM_size = MM_rsCount
    End If
  End If

  ' if we walked off the end, set the offset based on page size
  If (MM_rs.EOF And Not MM_paramIsDefined) Then
    If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then
      If ((MM_rsCount Mod MM_size) > 0) Then
        MM_offset = MM_rsCount - (MM_rsCount Mod MM_size)
      Else
        MM_offset = MM_rsCount - MM_size
      End If
    End If
  End If

  ' reset the cursor to the beginning
  If (MM_rs.CursorType > 0) Then
    MM_rs.MoveFirst
  Else
    MM_rs.Requery
  End If

  ' move the cursor to the selected record
  MM_index = 0
  While (Not MM_rs.EOF And MM_index < MM_offset)
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend
End If
%>
<%
' *** Move To Record: update recordset stats

' set the first and last displayed record
RS_CurrentEvents_first = MM_offset + 1
RS_CurrentEvents_last  = MM_offset + MM_size

If (MM_rsCount <> -1) Then
  If (RS_CurrentEvents_first > MM_rsCount) Then
    RS_CurrentEvents_first = MM_rsCount
  End If
  If (RS_CurrentEvents_last > MM_rsCount) Then
    RS_CurrentEvents_last = MM_rsCount
  End If
End If

' set the boolean used by hide region to check if we are on the last record
MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount)
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
  MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item))
  End If
Next

' add the Form variables to the MM_keepForm string
For Each MM_item In Request.Form
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item))
  End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
If (MM_keepBoth <> "") Then 
  MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
End If
If (MM_keepURL <> "")  Then
  MM_keepURL  = Right(MM_keepURL, Len(MM_keepURL) - 1)
End If
If (MM_keepForm <> "") Then
  MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
End If

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
  If (firstItem <> "") Then
    MM_joinChar = "&"
  Else
    MM_joinChar = ""
  End If
End Function
%>
<%
' *** Move To Record: set the strings for the first, last, next, and previous links

Dim MM_keepMove
Dim MM_moveParam
Dim MM_moveFirst
Dim MM_moveLast
Dim MM_moveNext
Dim MM_movePrev

Dim MM_urlStr
Dim MM_paramList
Dim MM_paramIndex
Dim MM_nextParam

MM_keepMove = MM_keepBoth
MM_moveParam = "index"

' if the page has a repeated region, remove 'offset' from the maintained parameters
If (MM_size > 1) Then
  MM_moveParam = "offset"
  If (MM_keepMove <> "") Then
    MM_paramList = Split(MM_keepMove, "&")
    MM_keepMove = ""
    For MM_paramIndex = 0 To UBound(MM_paramList)
      MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),"=") - 1)
      If (StrComp(MM_nextParam,MM_moveParam,1) <> 0) Then
        MM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex)
      End If
    Next
    If (MM_keepMove <> "") Then
      MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1)
    End If
  End If
End If

' set the strings for the move to links
If (MM_keepMove <> "") Then 
  MM_keepMove = MM_keepMove & "&"
End If

MM_urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "="

MM_moveFirst = MM_urlStr & "0"
MM_moveLast  = MM_urlStr & "-1"
MM_moveNext  = MM_urlStr & CStr(MM_offset + MM_size)
If (MM_offset - MM_size < 0) Then
  MM_movePrev = MM_urlStr & "0"
Else
  MM_movePrev = MM_urlStr & CStr(MM_offset - MM_size)
End If
%>
<html>
<head>
<title>iaminawe imagineering version number three</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<!-- Fireworks MX Dreamweaver MX target.  Created Fri May 30 16:17:48 GMT+0200 (South Africa Standard Time) 2003-->
<script language="JavaScript">
<!--
<!--
function MM_disbuttaStatusMsg(msgStr) { //v1.0
  status=msgStr;
  document.MM_returnValue = true;
}

function MachakFull(Ie,other){
//Copyright © 1999 m.milicevic machakjoe@netscape.net jjooee@tip.nl
x=screen.availWidth;
y=screen.availHeight;
target = parseFloat(navigator.appVersion.substring(navigator.appVersion.indexOf('.')-1,navigator.appVersion.length));
if((navigator.appVersion.indexOf("Mac")!=-1) &&(navigator.userAgent.indexOf("MSIE")!=-1) &&(parseInt(navigator.appVersion)==4))
window.open(other,"sub",'scrollbars=yes');
if (target >= 4){
	if (navigator.appName=="Netscape"){
    var MachakFull=window.open(other,"MachakFull",'scrollbars=yes','width='+x+',height='+y+',top=0,left=0');
	MachakFull.moveTo(0,0);
	MachakFull.resizeTo(x,y);}
if (navigator.appName=="Microsoft Internet Explorer")
	window.open(Ie,"MachakFull","fullscreen=yes");
	}
	else window.open(other,"sub",'scrollbars=yes');
	}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}


//-->


function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}


function MM_preloadImages() { //v3.0
 var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
   var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
   if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

//-->

MM_reloadPage(true);

function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
  MM_openBrWindow(selObj,newwin,features)
}
//-->
</script>
<link href="css/iaminawestyle.css" rel="stylesheet" type="text/css">
<SCRIPT LANGUAGE="JavaScript">
<!-- // MenuBuilder 3.0

function load1(form) {
     var url = form.Llist_1.options[form.Llist_1.selectedIndex].value;
     if (url != '') open(url);
     return false;
}
// -->
</SCRIPT>
<link href="css/iaminawestyle.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" onLoad="MM_preloadImages('images/index/indexnew_r2_c2_f2.jpg','images/index/indexnew_r4_c2_f2.jpg')">
<!-- Start of StatCounter Code -->
<script type="text/javascript" language="javascript">
var sc_project=367236; 
var sc_partition=1; 
var sc_security=""; 
</script>

<script type="text/javascript" language="javascript" src="http://www.statcounter.com/counter/counter.js"></script>
<noscript><a href="http://www.statcounter.com/" target="_blank"><img  src="http://c2.statcounter.com/counter.php?sc_project=367236&amp;java=0&amp;security=" alt="counter" border="0"></a> </noscript>
<!-- End of StatCounter Code -->
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
<!-- fwtable fwsrc="frontpage.png" fwbase="indexnew.jpg" fwstyle="Dreamweaver" fwdocid = "742308039" fwnested="0" -->
  <tr>
   <td><img src="images/index/spacer.gif" width="333" height="1" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="37" height="1" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="142" height="1" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="64" height="1" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="24" height="1" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="1" border="0" alt=""></td>
  </tr>

  <tr>
   <td colspan="5"><img name="indexnew_r1_c1" src="images/index/indexnew_r1_c1.jpg" width="600" height="122" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="122" border="0" alt=""></td>
  </tr>
  <tr>
   <td rowspan="2" colspan="2"><img name="indexnew_r2_c1" src="images/index/indexnew_r2_c1.jpg" width="370" height="397" border="0" alt=""></td>
   <td colspan="2" valign="top"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="206" height="257">
        <param name="movie" value="takeoverpopupbox.swf">
        <param name="quality" value="high">
        <embed src="takeoverpopupbox.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="206" height="257"></embed></object></td>
   <td rowspan="4"><img name="indexnew_r2_c5" src="images/index/indexnew_r2_c5.jpg" width="24" height="447" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="257" border="0" alt=""></td>
  </tr>
  <tr>
   <td colspan="2"><img name="indexnew_r3_c3" src="images/index/indexnew_r3_c3.jpg" width="206" height="140" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="140" border="0" alt=""></td>
  </tr>
  <tr>
   <td rowspan="2"><img name="indexnew_r4_c1" src="images/index/indexnew_r4_c1.jpg" width="333" height="50" border="0" alt=""></td>
   <td colspan="2"><img name="indexnew_r4_c2" src="images/index/indexnew_r4_c2.jpg" width="179" height="26" border="0" alt=""></td>
   <td rowspan="2"><img name="indexnew_r4_c4" src="images/index/indexnew_r4_c4.jpg" width="64" height="50" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="26" border="0" alt=""></td>
  </tr>
  <tr>
   <td colspan="2"><img name="indexnew_r5_c2" src="images/index/indexnew_r5_c2.jpg" width="179" height="24" border="0" alt=""></td>
   <td><img src="images/index/spacer.gif" width="1" height="24" border="0" alt=""></td>
  </tr>
</table>

<table width="325" border="0" align="center" cellpadding="2">
  <tr> 
    <td width="1">&nbsp;</td>
    <td width="620"><div align="right"> </div></td>
    <td width="10"></td>
  </tr>
  <tr> 
    <td height="89">&nbsp;</td>
    <td valign="top">
<table width="100%" height="100%" border="0" cellpadding="5" cellspacing="0">
        <tr> 
          <td width="50%" valign="top"> <table width="300" height="34%" border="0" cellpadding="5" cellspacing="1">
              <tr> 
                <td height="26" class="formcolour"><strong>NEWS</strong></td>
              </tr>
              <% 
While ((Repeat1__numRows <> 0) AND (NOT RS_CurrentEvents.EOF)) 
%>
              <tr> 
                <td height="16" bgcolor="#999966" class="datefont"><div align="right" class="datefont"><%=(RS_CurrentEvents.Fields.Item("pubdate").Value)%> </div></td>
              </tr>
              <tr> 
                <td height="10" bgcolor="c4bd94" class="formcolour"><%=(RS_CurrentEvents.Fields.Item("Title").Value)%></td>
              </tr>
              <tr> 
                <td height="10" bgcolor="c4bd94" class="indextext"><%=(RS_CurrentEvents.Fields.Item("description").Value)%> </td>
              </tr>
              <% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  RS_CurrentEvents.MoveNext()
Wend
%>
              <tr> 
                <td rowspan="4" valign="top" bgcolor="c4bd94" class="smalltextbold"> 
                </td>
              </tr>
              <tr> </tr>
              <tr> </tr>
              <tr> </tr>
              <tr> 
                <td height="37" bgcolor="908a55" class="smalltextbold"><div align="center"><font color="#FFFFFF">&nbsp;Articles 
                    <%=(RS_CurrentEvents_first)%> to <%=(RS_CurrentEvents_last)%> of <%=(RS_CurrentEvents_total)%></font> </div></td>
              </tr>
              <tr> 
                <td rowspan="4" valign="top" bgcolor="c4bd94" class="smalltextbold"> 
                  <div align="center"> 
                    <table width="100%" border="0" cellpadding="0" cellspacing="0">
                      <tr> 
                        <td width="31%" height="26" align="center"> <div align="left"> 
                            <% If MM_offset <> 0 Then %>
                            <a href="<%=MM_movePrev%>">+--previous</a> 
                            <% End If ' end MM_offset <> 0 %>
                          </div></td>
                        <td width="23%" align="center" class="smalltextbold"> 
                          <div align="right"> 
                            <% If Not MM_atTotal Then %>
                            <a href="<%=MM_moveNext%>">next--+</a> 
                            <% End If ' end Not MM_atTotal %>
                          </div></td>
                      </tr>
                    </table>
                  </div></td>
              </tr>
              <tr> </tr>
              <tr> </tr>
              <tr> </tr>
              <tr> 
                <td height="10" bgcolor="#7d733E">&nbsp;</td>
              </tr>
            </table> 
          </td>
          <td width="50%" valign="top"><table width="360" height="184%" border="0" cellpadding="5">
              <tr> 
                <td height="10" colspan="2" class="formcolour"><strong>RECENT 
                  WORK</strong></td>
              </tr>
              <tr>
                <td height="60" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.tmas.co.za" target="_blank"><img src="images/frontpagethumbs/tmas.jpg" alt="Visit Corne and Twakkie" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">The Most Amazing Show </font><br>
Its Corne and Twakkies new most amazing website with cool new movies, comics and tunes. </strong></td>
              </tr>
              <tr>
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.zouq.co.za" target="_blank"><img src="images/frontpagethumbs/zouq.jpg" alt="Jazz down with Zouq" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Zouq</font><br> 
                  An interesting website and ID for this Fish Hoek based rock, roots,jazz and blues band.</strong></td>
              </tr>
              <tr>
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/clients/aquaopera/index.htm" target="_blank"><img src="images/frontpagethumbs/aquathumb.jpg" alt="View the operatic animation" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">The Aqua Opera </font><br> 
                  Animated visuals for a recent Opera held on a floating stage at theCape Town Waterfront.</strong></td>
              </tr>
              <tr>
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/clients/davidkramer" target="_blank"><img src="images/frontpagethumbs/DK1.jpg" alt="View the music video" width="149" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">David Kramer</font><br> 
                An animated Afrikaans music video featuring motion graphics and live footage. </strong></td>
              </tr>
              <tr> 
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/clients/appletiser" target="_blank"><img src="images/frontpagethumbs/appletiser.jpg" alt="View the video" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Appletiser</font><br>
                  Animation and Motion Graphics visual mix created for this travelling 
                  exhibition for Appletiser.</strong></td>
              </tr>
              <tr> 
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/clients/oshun/oshun_sr.htm" target="_blank"><img src="images/frontpagethumbs/roses.jpg" alt="Book Cover Designs" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Oshun 
                  Books </font><br>
                  Name, identity and book cover designs for this new womens publishing 
                  imprint. </strong></td>
              </tr>
              <tr>
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="../../clients/blackvanilla/fishermansbirthday.htm" target="_blank"><img src="images/frontpagethumbs/fishermans.jpg" alt="Fishermans Birthday Stills" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">The 
                  Fishermans Birthday</font><br>
                  This animation was created for projection behind this piece 
                  of childrens theatre.</strong></td>
              </tr>
              <tr> 
                <td height="1" valign="top" bgcolor="c4bd94" class="indextext"><a href="#" target="_blank" onClick="MM_openBrWindow('http://www.iaminawe.com/clients/impactconsulting/index.htm','imopact','width=555,height=405')"><img src="images/frontpagethumbs/impact_thumb.jpg" alt="Impact Consulting animation" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Impact 
                  Consulting </font><br>
                  This animation was used at the launch of this new company and 
                  will also be posted off their site.</strong></td>
              </tr>
              <tr> 
                <td width="150" height="1" valign="top" bgcolor="c4bd94" class="indextext"> 
                  <p> <a href="http://www.jocastarising.com" target="_blank"><img src="images/frontpagethumbs/jocasta.gif" alt="Visit www.jocastarising.com" width="150" height="50" border="0"></a> 
                  </p></td>
                <td width="192" valign="top" bgcolor="c4bd94" class="indextext"><p><strong><font color="#990000">Jocasta 
                    Rising</font><br>
                    ID, site, viral e-mail, print and animation for this theatre 
                    production</strong></p></td>
              </tr>
              <tr> 
                <td width="150" height="3" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.goldfishlive.com" target="_blank"><img src="images/frontpagethumbs/goldfish.gif" alt="Visit www.goldfishlive.com" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><p><strong><font color="#990000">Goldfish</font><br>
                    ID, website, CD-ROM Press kit and promo material for this 
                    talented duo. </strong></p></td>
              </tr>
              <tr> 
                <td width="150" height="8" valign="top" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/newday" target="_blank"><img src="images/frontpagethumbs/newday.gif" alt="Visit the New Day Site" width="150" height="50" border="0"></a></td>
                <td valign="top" bgcolor="c4bd94" class="indextext"><p><strong><font color="#990000">New 
                    Day </font><br>
                    ID, website, print and animation for this theatrical democracy 
                    celebration.</strong></p></td>
              </tr>
              <tr> 
                <td width="150" height="18" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/chaos" target="_blank"><img src="images/frontpagethumbs/chaos.gif" alt="Visit www.iaminawe.com/chaos" width="150" height="50" border="0"></a></td>
                <td height="18" valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Chaos 
                  in Motion</font><br>
                  Experimental motion graphics in the form of three one minute 
                  videos</strong></td>
              </tr>
              <tr> 
                <td height="37" bgcolor="c4bd94" class="indextext"><a href="http://www.africanlabyrinth.com" target="_blank"><img src="images/frontpagethumbs/aflabs.gif" alt="Visit www.africanlabyrinth.com" width="150" height="50" border="0"></a></td>
                <td height="37" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">African 
                  Labyrinth </font><br>
                  Website and animation to promote the labyrinth design of Anni 
                  Hennop</strong></td>
              </tr>
              <tr> 
                <td height="37" bgcolor="c4bd94" class="indextext"><a href="http://www.iaminawe.com/tshirts" target="_blank"><img src="images/frontpagethumbs/tshirt.gif" alt="Visit www.iaminawe.com/tshirts" width="150" height="50" border="0"></a></td>
                <td height="37" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Cityflauge 
                  T-shirts </font><br>
                  iaminawe created this limited edition set of original t-shirts</strong></td>
              </tr>
              <tr> 
                <td width="150" height="37" bgcolor="c4bd94" class="indextext"><a href="http://www.lawactive.co.za" target="_blank"><img src="images/frontpagethumbs/law.gif" alt="Visit www.lawactive.co.za" width="150" height="50" border="0"></a></td>
                <td height="37" valign="top" bgcolor="c4bd94" class="indextext"><strong><font color="#990000">Lawyers 
                  Access Web</font><br>
                  Corporate ID &amp; website design for this dynamic law firm.</strong></td>
              </tr>
              <tr> 
                <td height="10" colspan="2" class="formcolour"><strong>ABOUT</strong></td>
              </tr>
              <tr> 
                <td height="22" colspan="2" valign="top" bgcolor="c4bd94" class="indextext"><p><strong>So 
                    what is iaminawe? Who is iaminawe?<br>
                    T</strong>his probably is not going to answer all your questions 
                    but it does give you a peek behind the messy mind machine 
                    that is iaminawe.<br>
                    <a href="../../profile/about.htm">FIND OUT HERE</a><strong><br>
                    </strong></p></tr>
              <tr> 
                <td height="10" colspan="2" class="formcolour"><strong>CONTACT</strong></td>
              </tr>
              <tr> 
                <td height="90" colspan="2" bgcolor="c4bd94"><strong><span class="indextext">iaminawe 
                  imagineering<a href="mailto:%20info@iaminawe.com"></a></span></strong><a href="mailto:%20info@iaminawe.com"><br>
                  <br>
                  info@iaminawe.com</a><span class="indextext"><br>
                  +27 (21) 7826147<br>
                  +27 (72) 2429766<br>
                  Cape Town<br>
                  South Africa</span></td>
              </tr>
              <tr> 
                <td height="10" colspan="2" class="formcolour"><strong>SOLDIERS 
                  OF IAMINAWE</strong></td>
              </tr>
              <tr> 
                <td height="10" colspan="2" bgcolor="c4bd94"> <form ACTION="<%=MM_editAction%>" name="form2" METHOD="POST">
                    <span class="indextext">Are you ready for the re-evolution? 
                    Keep up to date with iaminawe and receive random inspiration 
                    via e-mail. <br>
                    <br>
                    This revolution just got pixelised.<br>
                    <br>
                    <% If (Request("signup")) = ("") Then 'script %>
                    <input name="textFrom" type="text" class="formcolour" value="enter-your-e-mail@once.now" size="35">
                    <input name="signup" type="submit" class="formbuttons" id="signup3" value="+ADD ME+">
                    <% End If ' end If (Request("signup")) = ("") script %>
                    </span> 
                    <input type="hidden" name="MM_insert" value="form2">
                    <% If (Request.QueryString("signup")) = ("affirmative") Then 'script %>
                    <span class="smallheadlines"> THANKS FOR SIGNING UP<br>
                    </span><span class="indextext">PREPARE FOR CONSCRIPTION</span> 
                    <% End If ' end If (Request.QueryString("signup")) = (affirmative) script %>
                    <br>
                  </form></td>
              </tr>
              <tr> 
                <td height="10" colspan="2" class="formcolour"><strong>CLIENT 
                  LOGIN</strong></td>
              </tr>
              <tr> 
                <td height="10" colspan="2" bgcolor="c4bd94"> <form ACTION="<%=MM_LoginAction%>" METHOD="POST" name="clinetlogin" id="clinetlogin">
                    <span class="indextext"> 
                    <input name="user" type="text" class="formcolour" id="user" value="user" size="17">
                    </span> <span class="indextext"> 
                    <input name="password" type="password" class="formcolour" id="password" value="password" size="17">
                    </span> 
                    <input name="LOGIN" type="submit" class="formbuttons" id="LOGIN" value="+LOG IN+">
                  </form></td>
              </tr>
              <tr> 
                <td height="46" colspan="2" bgcolor="908a55"> <div align="center"> 
                  </div></td>
              </tr>
              <tr valign="bottom"> 
                <td colspan="2" bgcolor="#7d733E"> <div align="right"> </div></td>
              </tr>
            </table></td>
        </tr>
      </table>
    </td>
    <td>&nbsp;</td>
  </tr>
  <tr> 
    <td>&nbsp;</td>
    <td><div align="center"> </div></td>
    <td>&nbsp;</td>
  </tr>
</table>
<div align="center"> </div>
</body>
</html>
<%
RS_CurrentEvents.Close()
Set RS_CurrentEvents = Nothing
%>
<%
RS_Webwork.Close()
Set RS_Webwork = Nothing
%>