<% 
	option explicit 
	Response.Buffer = true
	if session("company_id") <> "" then
%>
		<meta http-equiv=Content-Type content="text/html; charset=windows-1252">
		<script language='vbscript'>
		sub DataCheck()
			if myform.partner_name.value = empty then
				msgbox "Please enter a partner name",64
				exit sub
			end if
		    if InStr(1, myform.partner_email.value, "@") <= 0 Then
				msgbox "Email is not correct",64
				exit sub
			end if
			if len(trim(myform.partner_logo.value)) > 0 then
				dim fext
				fext = lcase(right(myform.partner_logo.value,3))
				if fext = "jpg" or fext = "gif" or fext = "png" then
					'images format correct
				else
					msgbox "Partner logo only support JPG, GIF, PNG format" 
					exit sub
				end if
			end if
			myform.submit
		end sub
		</script>
		<link rel="stylesheet" type="text/css" href="../../default.css" />
		<body topmargin='0'>
		<form method="post" action="insert_partner.asp" name='myform' enctype="multipart/form-data">
		<table border="0" width="100%" cellspacing="0" cellpadding="2">
			<tr>
				<td colspan="2" height='30' valign='middle' class="label">
					<font style='color:#b50000'>
					<b>
					NEW PARTNER
					</font>
				</td>
			</tr>
			<tr>
				<td align="right"><font face="Verdana" class="label">PARTNER NAME : </font></td>
				<td><input name="partner_name" size='40' style="font-family: Arial; font-size: 8pt; font-weight: bold"></td>
			</tr>
			<tr>
				<td align="right"><font face="Verdana" class="label">PARTNER WEB URL : </font></td>
				<td><input name="partner_url" size='40' style="font-family: Arial; font-size: 8pt; font-weight: bold"></td>
			</tr>
			<tr>
				<td align="right"><font face="Verdana" class="label">PARTNER EMAIL : </font></td>
				<td><input name="partner_email" size='40' style="font-family: Arial; font-size: 8pt; font-weight: bold"></td>
			</tr>
			<tr>
				<td align='right'><font face="Verdana" class="label">PARTNER LOGO : </font></td>
				<td><input type='file' name="partner_logo" size='27' style="font-family: Arial; font-size: 8pt; font-weight: bold"></td>
			</tr>
			<tr>
				<td colspan='2' height='10'></td>
			</tr>
			<tr>
				<td align='right' valign='middle' colspan='2'>
					<input type="submit" value="SAVE" style="font-size: 7pt; font-family: verdana; font face:bold; width: 60px; height:20">
					<input type="reset" value="RESET" style="font-size: 7pt; font-family: verdana; font face:bold; width: 60px; height:20">
				</td>
			</tr>
		</table>
		</form>
		</body>
<%	
	else
		Response.Redirect "../../index.asp"
	end if
%>