CONTACT
 Contact Information

Address : Kucuk Halkali Cad. No: 26 Bagcilar / Istanbul / TURKEY
Tel : +90 212 446 34 54 (pbx)
Fax : +90 212 446 34 53
E-Mail : info@karahangrup.com.tr
Map : Click to see our company sketch
 
<% dim content dim objCDONTS dim apellido,nombre,empresa,telefono,fax,celular dim direccion,estado,pais,comentarios if request.form("nombre")>"" then if len(email)=0 then email="info@creativemarketings.com" end if email=request.form("email") nombre=request.form("nombre") empresa=request.form("empresa") telefono=request.form("telefono") fax=request.form("fax") direccion=request.form("direccion") comentarios=request.form("comentarios") 'creacion del correo content = content&"" content = content & "" content = content & "CREATIVE MARKETINGS/title>" content = content & "</head>" content = content & "<body bgcolor=""FFFFFF"">" content = content &"<table width=500 border=0>" content = content &"<tr valign=top>" content = content &"<td width=175 bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>isim</font></strong></div></td>" content = content &" <td width=309><div align=justify><font size=1 face=verdana>,"&nombre&"</font></div></td>" content = content &" </tr>" content = content &"<tr valign=top>" content = content &"<td width=175 bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Email</font></strong></div></td>" content = content &" <td width=309><div align=justify><font size=1 face=verdana>"&email&"</font></div></td>" content = content &" </tr>" content = content &" <tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Firma</font></strong></div></td>" content = content &"<td><div align=justify><font size=1 face=verdana>"&empresa&"</font></div></td>" content = content &"</tr>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Firma</font></strong></div></td>" content = content &"</tr>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify></div></td>" content = content &"</tr>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Telefon</font></strong></div></td>" content = content &"<td><div align=justify><font size=1 face=verdana>"&telefono&"</font></div></td>" content = content &"</tr>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Fax</font></strong></div></td>" content = content &"<td><div align=justify><font size=1 face=verdana>"&fax&"</font></div></td>" content = content &"</tr>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><strong><font color=#003399 size=1 face=verdana>Telefon</font></strong></div></td>" content = content &"<tr valign=top>" content = content &"<td bgcolor=#CCCCCC><div align=justify><font color=#003399 size=1 face=verdana><strong>Mesaj</strong></font></div></td>" content = content &"<td><div align=justify><font size=1 face=verdana>"&comentarios&"</font></div></td>" content = content &"</tr></table>" content = content & "</body></html>" 'fin correo On Error Resume Next Set objCDONTS = CreateObject("CDO.Message") objCDONTS.From ="bilgi@karahangrup.com.tr" objCDONTS.To = "bilgi@karahangrup.com.tr" objCDONTS.Subject = "Talep Formu" objCDONTS.HTMLBody = content objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.karahangrup.com.tr" objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = "1" objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "bilgi@karahangrup.com.tr" objCDONTS.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "050990328" objCDONTS.Configuration.Fields.Update objCDONTS.Send If err Then ' hata mesajını alalım Mail Gönderilmemişse.. Response.Write err.Description & "<br>Your message not sent.." Else ' Mail Gönderilmiş ise Response.Write("<script>alert('Thanks for your interest..');location.href='mesaj.html';</script>" ) End If end if %> <img src="images/icon2.gif" width="9" height="13"> <span class="style1">Contact Form </span> <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center"> <form method="post" name="form1" id="form1"> <%if request.form("nombre")>"" then%> <tr> <td colspan="4" valign="top"><center> </center></td> </tr> <%end if%> <tr> <td width="22%" align="left" class="footer"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Name:</b></font></td> <td width="78%" colspan="2" align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <input name="nombre" style="height:23; width:252" type="text" class="textinputHovered" size="20" /> </b></font></td> </tr> <tr> <td align="left" class="footer"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Email:<br /> </b></font></td> <td colspan="2" align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <input name="email" style="height:23; width:252" type="text" class="textinputHovered" size="20" /> </b></font></td> </tr> <tr> <td width="22%" align="left" class="footer"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Company name: <br /> </b></font></td> <td colspan="2" align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <input name="empresa" style="height:23; width:252" type="text" class="textinputHovered" size="20" /> </b></font></td> </tr> <tr> <td align="left" class="footer"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Subject: <br /> </b></font></td> <td align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <input name="fax" style="height:23; width:252" type="text" class="textinputHovered" size="20" /> </b></font></td> </tr> <tr> <td align="left" class="footer"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Phone</font></strong></td> <td align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <input name="telefono" style="height:23; width:252" type="text" class="textinputHovered" size="30" /> </b></font></td> </tr> <tr> <td height="31" align="center" valign="top" class="footer"><div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Message<br /> </b></font></div></td> <td align="center" valign="top"><div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b> <textarea style="height:133; width:352" name="comentarios" cols="20" rows="5" wrap="virtual" class="textareaHovered"></textarea> </b></font></div></td> </tr> <tr> <td valign="top" align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><br /> </font></td> <td valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="Submit" type="submit" class="buttonSubmit" value=":: Send ::" /> </font></td> </tr> </form> </table></td> </tr> <tr> <td class="head_1">  <p> </p> <p><br> <br> </p></td> </tr> </table></td> </tr> </table></td> </tr> </table> <!--#include file="bottom.asp" --> </body> </html>