REVISTAS ONLINE |
<%
contatomostra=rs("curContatomostra")
if(not isnull(rs("curContato"))) and rs("curContato")<>0 then
Set rsc = Server.CreateObject("ADODB.Recordset")
rsc.Open "SELECT * FROM tbllogin where login_id = " & rs("curContato") & " ", Bco
contatonome=rsc("prof_nome")
contatoemail=rsc("prof_email")
contatofone=rsc("prof_ddd1")&" "&rsc("prof_fone1")
contatocel=rsc("prof_ddd2")&" "&rsc("prof_fone2")
rsc.close
set rsc = nothing
%>
<%
if(instr(contatomostra,", ")>0) then
infocontato=split(contatomostra,", ")
else
if(contatomostra="1") then
infocontato=array("1","1","1")
else
infocontato=array("","","")
end if
end if
if(infocontato(0)="1") then
%>
<%
end if
if(infocontato(1)="1") then
%>
<%
end if
if(infocontato(2)="1") then
%>
<%
end if
end if
contato2mostra=rs("curContato2mostra")
if(not isnull(rs("curContato2"))) and rs("curContato2")<>0 then
Set rsc = Server.CreateObject("ADODB.Recordset")
rsc.Open "SELECT * FROM tbllogin where login_id = " & rs("curContato2") & " ", Bco
contato2nome=rsc("prof_nome")
contato2email=rsc("prof_email")
contato2fone=rsc("prof_ddd1")&" "&rsc("prof_fone1")
contato2cel=rsc("prof_ddd2")&" "&rsc("prof_fone2")
rsc.close
set rsc = nothing
%>
<%
if(instr(contato2mostra,", ")>0) then
infocontato2=split(contato2mostra,", ")
else
if(contato2mostra="1") then
infocontato2=array("1","1","1")
else
infocontato2=array("","","")
end if
end if
if(infocontato2(0)="1") then
%>
<%
end if
if(infocontato2(1)="1") then
%>
<%
end if
if(infocontato2(2)="1") then
%>
<%
end if
end if
if ( (not isnull(rs("curCallCenterMostra"))) and rs("curCallCenterMostra")=true) then
%>
<%
end if
%>
<% if rs("curObjetivo") <> "" and not isnull(rs("curObjetivo")) then %>
<% end if %>
<% if rs("curPrograma") <> "" and not isnull(rs("curPrograma")) then %>
<% end if %>
<% if rs("curListaMateriais") <> "" and not isnull(rs("curListaMateriais")) then %>
<% end if %>
<% if rs("curCurriculo") <> "" and not isnull(rs("curCurriculo")) then %>
<% end if %>
<% if rs("curBibliografia") <> "" and not isnull(rs("curBibliografia")) then %>
<% end if %>
<% if rs("curObs") <> "" and not isnull(rs("curObs")) then %>
<% end if %>
|
|
|
55 11 3819-6110 / 3819-6116 / 3819-6350