<!--#include file="Conn.asp" -->
<!--#include file="Comm/Site_Class.asp" -->
<!--#include file="Comm/Function.asp" -->
<%
Dim strMenu,PageTitle
strMenu = ""

Set Qsite = New Site_Class

Qsite.SiteConfig()
Qsite.GotoErrPage()

PageTitle = Qsite.SiteName & " - 联系方式"

ConnectionDatabase_C()

Dim Rs,i
Dim CompanyName,Addr,Tel,Fax,QQ1,QQ2,Email,FzId

Set Rs = server.createobject("ADODB.Recordset")

FzId = 0

Rs.Open "select * from ContactTbl where FzId = "& FzId , Conn_C , 1 , 1
If Rs.Eof Then
	CompanyName = ""
	Addr = ""
	Tel = ""
	Fax = ""
	QQ1 = ""
	QQ2 = ""
	Email = ""
Else
	CompanyName = Rs("CompanyName")
	Addr = Rs("Addr")
	Tel = Rs("Tel")
	Fax = Rs("Fax")
	QQ1 = Rs("QQ1")
	QQ2 = Rs("QQ2")
	Email = Rs("Email")
End If
Rs.Close

Set Rs = Nothing
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=PageTitle%> - 胶州人才网</title>
 <meta name="keywords" content="关于胶州人才网站,胶州招聘网站,胶州人力资源,胶州人才市场,胶州找工作,胶州兼职,胶州培训,胶州职业顾问,胶州职业规划,胶州人事代理">
 <meta name="description" content="胶州新人才网是胶州地区内最具影响力的人才网站之一，为企业提供一站式的人才招聘服务，帮助个人求职者与企业搭建最佳互动平台，打造胶州地区权威求职招聘网站!！">
<!--#include file="top.asp" -->
    <table width="974" height="198" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr> 
        <td width="194" align="center" valign="top"><table width="194" height="185" border="0" cellpadding="0" cellspacing="0">
            <tr> 
              <td height="22" background="images/AboutUs_r5_c3.jpg"><img src="space.gif" height="1"></td>
            </tr>
            <tr>
              <td height="157" align="center" valign="top" background="images/AboutUs_r33_c2.jpg">



<!-- #include file="About_LeftMenu.asp" -->



</td>
            </tr>
            <tr>
              <td height="13" background="images/AboutUs_r35_c2.jpg"><img src="space.gif" height="1"></td>
            </tr>
          </table></td>
        <td width="774" valign="top" style="padding-left:8px;"> 
          <table width="764" height="28" border="0" cellpadding="0" cellspacing="0">
            <tr> 
              <td width="156" background="images/AboutUs_2000.jpg">&nbsp;</td>
              <td width="624" background="images/AboutUs_r3_c10.jpg">&nbsp;</td>
            </tr>
          </table>
          <table width="99%" height="6" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr height="10" >
              <td height="6" ></td>
            </tr>
          </table>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="2">
					<tr>
						<td width="60" height="30" align="center" bgcolor="#F9F9F9">公司</td>
						<td width="240" height="30" bgcolor="#F9F9F9"><%=CompanyName%></td>
						<td width="60" height="30" align="center" bgcolor="#F9F9F9">地址</td>
						<td width="240" height="30" bgcolor="#F9F9F9"><%=Addr%></td>
				  </tr>
					<tr>
						<td height="30" align="center" bgcolor="#F9F9F9">电话</td>
						<td height="30" bgcolor="#F9F9F9"><%=Tel%></td>
						<td height="30" align="center" bgcolor="#F9F9F9">传真</td>
						<td height="30" bgcolor="#F9F9F9"><%=Fax%></td>
				  </tr>
					<tr>
						<td height="30" align="center" valign="top" bgcolor="#F9F9F9" style="line-height:25px;">客服QQ</td>
						<td height="30" valign="top" bgcolor="#F9F9F9" style="line-height:25px;"><%
						If QQ1 <> "" Then
							If InStr(QQ1 , "|") > 0 Then
								QQ1 = Split(QQ1 , "|")
								For i = 0 To Ubound(QQ1)
									Response.Write(QQ1(i) & " <a target=blank href=tencent://message/?uin="& QQ1(i) &"&Site="& Qsite.SiteName &"&Menu=yes><img border=""0"" SRC=http://wpa.qq.com/pa?p=1:"& QQ1(i) &":5 alt=""客服QQ"& i + 1 &"""></a><br />")
								Next
							Else
								Response.Write(QQ1 & " <a target=blank href=tencent://message/?uin="& QQ1 &"&Site="& Qsite.SiteName &"&Menu=yes><img border=""0"" SRC=http://wpa.qq.com/pa?p=1:"& QQ1 &":5 alt=""客服QQ""></a>")
							End If
						End If
						%></td>
						<td height="30" align="center" valign="top" bgcolor="#F9F9F9" style="line-height:25px;">广告QQ</td>
						<td height="30" valign="top" bgcolor="#F9F9F9" style="line-height:25px;"><%
						If QQ2 <> "" Then
							If InStr(QQ2 , "|") > 0 Then
								QQ2 = Split(QQ2 , "|")
								For i = 0 To Ubound(QQ2)
									Response.Write(QQ2(i) & " <a target=blank href=tencent://message/?uin="& QQ2(i) &"&Site="& Qsite.SiteName &"&Menu=yes><img border=""0"" SRC=http://wpa.qq.com/pa?p=1:"& QQ2(i) &":5 alt=""广告QQ"& i + 1 &"""></a><br />")
								Next
							Else
								Response.Write(QQ2 & " <a target=blank href=tencent://message/?uin="& QQ2 &"&Site="& Qsite.SiteName &"&Menu=yes><img border=""0"" SRC=http://wpa.qq.com/pa?p=1:"& QQ2 &":5 alt=""广告QQ""></a>")
							End If
						End If
						%></td>
				  </tr>
					<tr>
						<td height="30" align="center" bgcolor="#F9F9F9">电子信箱</td>
						<td height="30" bgcolor="#F9F9F9"><%=Email%></td>
						<td height="30" align="center" bgcolor="#F9F9F9">&nbsp;</td>
						<td height="30" bgcolor="#F9F9F9">&nbsp;</td>
				  </tr>
					<tr>
						<td height="30" colspan="4" bgcolor="#F9F9F9">如果您对我们的服务有任何意见和建议，您可以来信或在线联系我们的客服。</td>
				  </tr>
				</table></td>
      </tr>
    </table>  
    <table width="990" height="8" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr height="8"> 
        <td height="8"></td>
      </tr>
    </table>
 <!--#include file="foot.asp" -->
