<%@ Language=VBScript %> <% 'Script para envio de e-mail em formulário Dim vErro,vSucesso,vErr vErro = "" vSucesso = "obrigado.htm" vErr = "erro.htm" if Request.Form.Count + Request.QueryString.Count > 0 then Call Respform Call Resp end if '----------------------------------------------------------- Sub Respform() On Error Resume Next Dim msg,vData,vHora,vPara,vNomeform,vFrom,vAssunto,vCc,vDom vNomeForm = "Formulário de Informações" vPara = "suporte@itaipavagold.com.br" vFrom = "suporte@itaipavagold.com.br" vCc = "" vAssunto = "Informações" vData = Date() vData = day(vData) & "/" & month(vData) & "/" & year(vData) vHora = Time() vHora = hour(vHora) & "h" & minute(vHora) & "min" & second(vHora) & "s" msg = "Formulário " & vNomeForm msg = msg & " submetido em " & vData & " às " & vHora & VbCrLf & VbCrLf if Request.ServerVariables("REQUEST_METHOD") = "POST" then for each campo in Request.Form if campo <> "B1" and campo <> "B2" and campo <> "B3" and campo <> "B4" then msg = msg & string(60,"-") & vbcrlf msg = msg & campo & " : " & Request.Form(campo) & VbCrLf end if next else for each campo in Request.QueryString if campo <> "B1" and campo <> "B2" and campo <> "B3" and campo <> "B4" then msg = msg & string(60,"-") & vbcrlf msg = msg & campo & " : " & Request.QueryString(campo) & VbCrLf end if next end if msg = msg & string(60,"*") & vbcrlf EnviaEmail msg,vFrom,vPara,vCc,vAssunto If Err then vErro = Err.number & " : " vErro = Err.description Err.Clear End if End Sub '----------------------------------------------------------- Function EnviaEmail(ByVal p_body, Byval p_from, ByVal p_to, ByVal p_cc, Byval p_subject) On Error Resume Next Dim iMsg, Flds, iConf, status Const SERVIDOR_SMTP = "sharedrelay.dominal.com" status = true Set iMsg = Server.CreateObject("CDO.Message") Set iConf = Server.CreateObject("CDO.Configuration") Set Flds = iConf.Fields Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") = SERVIDOR_SMTP Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 Flds.Update With iMsg Set .Configuration = iConf .To = p_to .CC = p_cc .From = p_from .Sender = p_from .Subject = p_subject .TextBody = p_body .Send End With If Err.number <> 0 Then status = false End If If IsObject(iMsg) Then Set iMsg = Nothing If IsObject(Flds) Then Set Flds = Nothing If IsObject(iConf) Then Set iConf = Nothing EnviaEmail = status End Function '----------------------------------------------------------- Sub Resp() if vErro = "" then Response.Redirect(vSucesso) else Response.Redirect(vErr) end if End Sub %> Itaipava Gold - Principal

Os anúncios deste site ajudam trabalhadores carentes e idosos

 

               IMOBILIÁRIA  IGA IMÓVEIS (24)2222-1288/2222-4257

 

LOCAÇÃO:

 

NOGUEIRA – Condomínio, segurança, casa com varanda, sala em 02 ambientes, 03 quartos sendo 01 suíte (todos com armários), 01 banheiro social, cozinha, área de serviço, dep. empregado, mobiliada, terreno todo murado. R$900,00 + taxas (contrato normal). Iga 210. TEL (24)2222-1288/22224257.

 

NOGUEIRA – Condomínio, segurança, casa com varanda, sala em 02 ambts c/ lareira, lavabo, 04 quartos s/ 01 suíte, 01 banheiro social, cozinha, área de serviço, garagem, piscina, churrasqueira coberta, salão de jogos, terreno gramado e ajardinado. R$1.500,00 + taxas (Contrato normal). Iga 225.  TEL (24)2222-1288/2222-4257.

 

 

CASAS PARA VENDA:

 

CORRÊAS – OPORTUNIDADE PARA INVESTIMENTO!!!! Condomínio, segurança, área de lazer completa, casa com varanda, sala em 02 ambts., cozinha, c/ fundação pronta p/ ampliação da casa, terreno com 1000 m2 todo aproveitável. R$ 80.000. Iga 489.

TEL (24)2222-1288/2222-4257.

 

CORRÊAS – Fácil acesso, casa novíssima toda plana com varanda, sala em 02 ambts., 03 quartos, 01 banheiro social, cozinha, terreno com 900 m2 todo plano, murado e ajardinado. R$130.000. Iga 607. TEL (24)2222-1288/2222-4257.

 

NOGUEIRA – Ideal para moradia, casa c/ varandão, sala em 03 ambts c/ lareira, 03 qtos s/ 01 suíte com hidro (todos com armários), 02 banheiros sociais, cozinha, área de serviço, dep. de empregada, garagem, aptº para caseiro, terreno c/ 700 m2 ajardinados. R$220.000. Iga 655.

TEL (24)2222-1288/2222-4257.

 

ITAIPAVA - Varandão, sala em 02 ambts c/ lareira, sala de jantar, sala de tv, 04 qtos s/ 01 suíte (armários), 01 banheiro social, cozinha com armários, área de serviço, piscina, sauna, churrasqueira coberta, salão de jogos, casa de caseiro c/ 02 qts, terreno com 1.500 m2 todo gramado e ajardinado com pomar e horta. R$ 350.000.. Iga 644. TEL (24)2222-1288/2222-4257.

 

ITAIPAVA - Condomínio, segurança, casa com varandão em L, sala em 03 ambts. c/ lareira, 04 quartos s/ 01 suíte (todos com armários), 01 banheiro social, cozinha, área de serviço, salão para jogos c/ banheiro, piscina, sauna, churrasqueira coberta c/ fogão a lenha, casa de caseiro, terreno com 1.200m2 gramados ajardinados. R$420.000. Iga 635. TEL (24)2222-1288/2222-4257

 

ITAIPAVA – Condomínio nobre, segurança, fácil acesso c/ linda vista, casa novíssima, varandão, sala em 03 ambts, c/ lareira, 03 quarto s/ 02 suítes, escritório, 01 lavado, cozinha ampla, dep. p/ empregada, sauna, piscina,  churrasqueira coberta, garagem, terreno c/ 2.100 m2.  R$ 530.000.  Iga 533. TEL (24)2222-1288/2222-4257.   

 

 

TERRENOS:

 

NOGUEIRA – Excelente localização c/ vista para o campo de golfe c/ área total de 1.400 m2 c/ 22 m de frente, água, luz e ruas calçadas. Somente R$ 38.000. Iga 263.

TEL (24)2222-1288/2222-4257.

 

VALE FLORIDO – Local nobre com excelentes propriedades, fácil acesso, área total de 3.400 m2 todo aproveitável, água, luz, ruas pavimentadas. Oportunidade!! R$60.000. Iga 398. TEL (24)2222-1288/2222-4257.