\r\n\r\n\r\nAbaixo,ocódigodeumapáginaquearmazenaumvalornumavariáveldesessãoe\r\nmostraototaldeusuáriosconectadoseototaldevisitantesnosite.\r\n\r\n\r\nApplicationeSession\r\n<%Session("variavelqualquer")="Estevalorfoiinseridonavariáveldesessãode\r\nnomevariavelqualquer"%>\r\n\r\n

NúmerodaSessão:<%=Session.SessionID%>

\r\n\r\n\r\n\r\nApostilaASP 20de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\n

Existemnomomento<%=Application("usuariosonline")%>usuários\r\nconectados.

\r\n

Totaldevisitantesnositedesde<%=Application("datainicial")%>:\r\n<%=Application("totaldeusuarios")%>

\r\n

Abaixo,astringquefoiinseridanavariavelvariavelqualquer

\r\n

<%=Session("variavelqualquer")%>

\r\n<%Session.Abandon%>\r\n\r\n\r\n\r\n\r\n\r\nOs comandos Lock e Unlock servem para garantir que somente um visitante estará\r\nalterandoasvariáveisporvez.OcomandoLockbloqueiaaacessodeoutrosvisitantesàs\r\nvariáveis, e o Unlock desbloqueia.\r\nO comando Session.SessionID retorna o valor do ID da sessão.\r\nOcomandoSession.TimeOutdeterminaqualotempomáximo,emminutos,deinatividade\r\ndo visitante até que a sessão possa ser considerada abandonada.\r\nOcomandoSession.Abandonterminaasessãoiniciadaexplicitamente(nãoénecessário\r\nesperarovencimentodoTimeOutparaconsiderarasessãoabandonada).\r\nA procedure Application_OnStart contém a rotina que será rodada quando o objeto\r\nApplication for iniciado.\r\nA procedure Application_OnEnd contém a rotina que será executada quando o objeto\r\nApplication for terminado (qdo. o servidor for desligado).\r\nAprocedureSession_OnStartcontémocódigoqueserárodadoquandoumasessãofor\r\niniciada.\r\nAprocedureSession_OnEndcontémocódigoqueserárodadoquandoumasessão for\r\nterminada(portimeoutoulogoffexplícito).\r\n\r\n\r\n\r\n\r\n\r\n\r\nProcedures\r\n\r\n\r\nAlgumasvezes,emprogramação,umamesmasequênciadecódigosprecisaserusado\r\nconstantemente. Ao invés de copiá-los toda vez que for preciso, pode-se usar as\r\nProcedures.Proceduressãocaixaspretas,ondevcentracomalgunsdados,acaixapreta\r\nprocessa,enocasodasFunctions,retornaoutrosvalores,deacordocomumalgorítimo.\r\nExistemdoistiposdeProcedures,asSubseasFunctions.Observeos\r\n\r\n\r\nexemplosabaixo:\r\n\r\n\r\n\r\n<%\r\nFunctionsoma(valor1,valor2)\r\nIfvalor1=""thenvalor1=0\r\nIfvalor2=""thenvalor2=0\r\nsoma=valor1+valor2\r\nEndFunction\r\n'acima,afunçãodenominadasomafoiapresentada\r\n'abaixo,umachamadaàfunçãofoifeita.Entãoafunçãoexecutaarotinaeretorna\r\numdeterminadovalor,nocaso5.\r\n\r\n\r\nresponse.writesoma(2,3)\r\n%>\r\n\r\n\r\n\r\nApostilaASP 21de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\n\r\n\r\n\r\n\r\nJáumaSubsimplesmenteexecutaumaação,nãoretornandovaloralgum.\r\n\r\n\r\n\r\n<%\r\nSubvisualizar_nome(nome)\r\nresponse.write"Onomedositeé:"&nome\r\nEndSub\r\n'acima,aproceduredotipoSubfoidenominadavisualizar_nome\r\n\r\n\r\nresponse.write"QualéositesobreASPqueofereceTutoriais,NewsgroupseLinks\r\naseusvisitantes?"\r\nCallvisualizar_nome("ASPBRASIL")\r\nresponse.write"
Home
"\r\n'acima,ocomandoCallfazachamadaàSubvisualizar_nome.Comopode-se\r\nperceber,umaSubnãoretornanenhumvalor,esimexecutaumaação.\r\n\r\n\r\n%>\r\n\r\n\r\n\r\n\r\n\r\n\r\n\r\nIf...Then...Else;SelectCase\r\n\r\n\r\nExistem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede\r\nacordocomessevalor,executarumadeterminadarotina:\r\n\r\n\r\n\r\n\r\nIf...Then...Else\r\n\r\n\r\nOcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão\r\ndeacordocomumcritériodeseleção.Observeoexemploabaixo:\r\n\r\n\r\n\r\n<%\r\nvariavel_qualquer=hour(now)\r\nIfvariavel_qualquer<19then\r\nresponse.write"BomDia"\r\nElse\r\nresponse.write"BoaNoite"\r\nEndif\r\n'ocomandoIF...then...Elsecomparouovalordavariavelvariavel_qualquercomum\r\ndeterminadovalorestipulado(nocaso,19).Seovalorformenorque19,então\r\nescrevanatela"BomDia".Casocontrário(Else),"BoaNoite"\r\n%>\r\n\r\n\r\n\r\n\r\n\r\n\r\nSelectCase\r\n\r\n\r\n\r\n\r\nApostilaASP 22de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\nOcomandoSelectCasepermiteummaiorcontrolesobreosvaloresdeumadeterminada\r\nvariavel.ObserveoExemploAbaixo:\r\n\r\n\r\n\r\n<%\r\nvariavel_qualquer=hour(now)\r\nSelectCasevariavel_qualquer\r\ncase0,1,2,3,4,5,6,7,8,9,10,11,12\r\nresponse.write"BomDia"\r\ncase13,14,15,16,17,18,19\r\nresponse.write"BoaTarde"\r\ncase20,21,22,23,24\r\nresponse.write"BoaNoite"\r\nCaseelse\r\nresponse.write"Esterelógioestámaluco"\r\nEndSelect\r\n%>\r\nobservequeocomandoSelectCasedeveserfechadocomocomandoEndSelect.\r\n\r\n\r\n\r\nIf...Then...Else;SelectCase\r\n\r\n\r\nExistem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede\r\nacordocomessevalor,executarumadeterminadarotina:\r\n\r\n\r\n\r\n\r\nIf...Then...Else\r\n\r\n\r\nOcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão\r\ndeacordocomumcritériodeseleção.Observeoexemploabaixo:"} 009 VBScript-e-ASP-Active-Server-Pages - ALGORITMOS - 5    
009_VBScript-e-ASP-Active-Server-Pages
43 pág.

009_VBScript-e-ASP-Active-Server-Pages

Disciplina:ALGORITMOS6.527 materiais91.278 seguidores
Pré-visualização8 páginas
REQUEST_METHOD Métodousadoparatransmissãodasvariáveisdeumapáginaparaoutra(GETouPOST)
SERVER_NAME Nomedoservidordehospedagem,comousadonoURL(podeseroIPouDNS)
URL endereçoURLrequisitado(semaquery_string)
Vejaosexemplosaseguir:
<HTML><HEAD><TITLE>ServerVariables</TITLE></HEAD>
<BODY><p>oIPusadopelasuaconexãoé:
<%=request.servervariables("REMOTE_ADDR")%></p></BODY>
</HTML>

Cookies

Cookiessãopequenosarquivosnoformatotxt,gravadosnoscomputadoresdosusuários,
contendoinformaçõesquepodemserrecuperadasposteriormente.

sintaxe:

gravaçãodeinformaçõesnocookie:

response.cookies("nomedocookie")("nomedoparametro")="valordoparâmetro"
recuperaçãodeinformaçõesdocookie:variável=
request.cookies("nomedocookie")("nomedoparametro")
determinaçãodadatadeexpiraçãodocookie:
Response.Cookies("nomedocookies").Expires=datanoformatomm/dd/aa
obs:casonãosejadeterminadaumadatadeexpiração,ocookieseráapagadoassimque
obrowserforfechado.
Vejaosexemplosaseguir:
<%
response.cookies("aspbrasilteste")("data")=now
response.cookies("aspbrasilteste")("nome")="João"
'aslinhasacimacriaramocookieaspbrasile2parâmetros,dataenome.
response.cookies("aspbrasilteste").expires="6/25/99"
'alinhaacimadeterminaumadatadeexpiraçãodocookie
%>
<HTML><HEAD><TITLE>Criandoumcookie</TITLE>
</HEAD>
<BODY>
<%
response.write"Ocookiesaspbrasiltestefoicriadoem:"&
request("aspbrasilteste")("data")
response.write"Quemcrioufoi:"&request("aspbrasilteste")("nome")
%>
</BODY></HTML>

ObjetosApplicationeSession

ApostilaASP 19de43

ApostilaseTutotriais:http://Apostilas.Fok.com.br

O objeto Application foi criado para armazenar propriedades (valores) ligados a um
conjuntodeusuários.Nocaso,osvisitantesdosite,deummodogeral.Comoexemplo,
podemoscitaronúmerototaldevisitantesnositeapartirdeumadeterminadadata,ouo
númerodevisitantesonlinenosite.
O objeto Session foi criado para armazenar propriedades (valores) ligados a cada
visitante, individualmente. Como exemplo, podemoscitar o carrinho de comprasde um
site de comércio online.
UmaSessionécriadaquandoovisitanteentranosite(cadavisitantetemumasessione
cadasessionrecebeumID),eédestruídaquandoovisitantesaidosite(sejaporlogoff
explícito ouporTimeOut). JáumaApplicationé iniciadaaohaver oprimeiro pedidode
acessoaoobjetoApplication,eéencerradoquandooservidorfordesligado.
Todoocódigoquesedesejaexecutaraocriaroudestruirumasession,bemcomouma
Application devem estar contidos no arquivo global.asa, um arquivo texto no formato
abaixodemonstrado,quedevesercolocadonodiretórioraizdosite.
AsvariáveisdoobjetoApplicationedoobjetoSessionsãoarmazenadasnoservidor,mas
énecessárioqueobrowseraceitecookies,poisumcookiecomoIDdasessãoécriado
nocomputadordovisitante,paraidentificá-lo.

Vejaoexemploabaixo:

Listagemdoarquivoglobal.asa

<SCRIPTLANGUAGE=VBSCRIPTRUNAT=SERVER>
SubApplication_OnStart
Application("totaldeusuarios")=0
Application("datainicial")=now
Application("usuariosonline")=0
EndSub
SubApplication_OnEnd
EndSub
SubSession_OnStart
Session.TimeOut=20
Application.Lock
Application("totaldeusuarios")=Application("totaldeusuarios")+1
Application("usuariosonline")=Application("usuariosonline")+1
Application.Unlock
EndSub
SubSession_OnEnd
Application.Lock
Application("usuariosonline")=Application("usuariosonline")-1
Application.Unlock
EndSub
</SCRIPT>

Abaixo,ocódigodeumapáginaquearmazenaumvalornumavariáveldesessãoe
mostraototaldeusuáriosconectadoseototaldevisitantesnosite.

<html><head><title>ApplicationeSession</title></head>
<%Session("variavelqualquer")="Estevalorfoiinseridonavariáveldesessãode
nomevariavelqualquer"%>
<body>
<p>NúmerodaSessão:<%=Session.SessionID%></p>

ApostilaASP 20de43

ApostilaseTutotriais:http://Apostilas.Fok.com.br

<p>Existemnomomento<%=Application("usuariosonline")%>usuários
conectados.</p>
<p>Totaldevisitantesnositedesde<%=Application("datainicial")%>:
<%=Application("totaldeusuarios")%></p>
<p>Abaixo,astringquefoiinseridanavariavelvariavelqualquer</p>
<p><%=Session("variavelqualquer")%></p>
<%Session.Abandon%>
</body></html>

Os comandos Lock e Unlock servem para garantir que somente um visitante estará
alterandoasvariáveisporvez.OcomandoLockbloqueiaaacessodeoutrosvisitantesàs
variáveis, e o Unlock desbloqueia.
O comando Session.SessionID retorna o valor do ID da sessão.
OcomandoSession.TimeOutdeterminaqualotempomáximo,emminutos,deinatividade
do visitante até que a sessão possa ser considerada abandonada.
OcomandoSession.Abandonterminaasessãoiniciadaexplicitamente(nãoénecessário
esperarovencimentodoTimeOutparaconsiderarasessãoabandonada).
A procedure Application_OnStart contém a rotina que será rodada quando o objeto
Application for iniciado.
A procedure Application_OnEnd contém a rotina que será executada quando o objeto
Application for terminado (qdo. o servidor for desligado).
AprocedureSession_OnStartcontémocódigoqueserárodadoquandoumasessãofor
iniciada.
AprocedureSession_OnEndcontémocódigoqueserárodadoquandoumasessão for
terminada(portimeoutoulogoffexplícito).

Procedures

Algumasvezes,emprogramação,umamesmasequênciadecódigosprecisaserusado
constantemente. Ao invés de copiá-los toda vez que for preciso, pode-se usar as
Procedures.Proceduressãocaixaspretas,ondevcentracomalgunsdados,acaixapreta
processa,enocasodasFunctions,retornaoutrosvalores,deacordocomumalgorítimo.
ExistemdoistiposdeProcedures,asSubseasFunctions.Observeos

exemplosabaixo:

<html><body>
<%
Functionsoma(valor1,valor2)
Ifvalor1=""thenvalor1=0
Ifvalor2=""thenvalor2=0
soma=valor1+valor2
EndFunction
'acima,afunçãodenominadasomafoiapresentada
'abaixo,umachamadaàfunçãofoifeita.Entãoafunçãoexecutaarotinaeretorna
umdeterminadovalor,nocaso5.

response.writesoma(2,3)
%></body></html>

ApostilaASP 21de43

ApostilaseTutotriais:http://Apostilas.Fok.com.br

JáumaSubsimplesmenteexecutaumaação,nãoretornandovaloralgum.

<html><body>
<%
Subvisualizar_nome(nome)
response.write"Onomedositeé:"&nome
EndSub
'acima,aproceduredotipoSubfoidenominadavisualizar_nome

response.write"QualéositesobreASPqueofereceTutoriais,NewsgroupseLinks
aseusvisitantes?"
Callvisualizar_nome("ASPBRASIL")
response.write"<div><ahref=www.aspbrasil.com.br>Home</a></div>"
'acima,ocomandoCallfazachamadaàSubvisualizar_nome.Comopode-se
perceber,umaSubnãoretornanenhumvalor,esimexecutaumaação.

%>
</body></html>

If...Then...Else;SelectCase

Existem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede
acordocomessevalor,executarumadeterminadarotina:

If...Then...Else

OcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão
deacordocomumcritériodeseleção.Observeoexemploabaixo:

<html><body>
<%
variavel_qualquer=hour(now)
Ifvariavel_qualquer<19then
response.write"BomDia"
Else
response.write"BoaNoite"
Endif
'ocomandoIF...then...Elsecomparouovalordavariavelvariavel_qualquercomum
determinadovalorestipulado(nocaso,19).Seovalorformenorque19,então
escrevanatela"BomDia".Casocontrário(Else),"BoaNoite"
%></body></html>

SelectCase

ApostilaASP 22de43

ApostilaseTutotriais:http://Apostilas.Fok.com.br

OcomandoSelectCasepermiteummaiorcontrolesobreosvaloresdeumadeterminada
variavel.ObserveoExemploAbaixo:

<html><body>
<%
variavel_qualquer=hour(now)
SelectCasevariavel_qualquer
case0,1,2,3,4,5,6,7,8,9,10,11,12
response.write"BomDia"
case13,14,15,16,17,18,19
response.write"BoaTarde"
case20,21,22,23,24
response.write"BoaNoite"
Caseelse
response.write"Esterelógioestámaluco"
EndSelect
%></body></html>
observequeocomandoSelectCasedeveserfechadocomocomandoEndSelect.

If...Then...Else;SelectCase

Existem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede
acordocomessevalor,executarumadeterminadarotina:

If...Then...Else

OcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão
deacordocomumcritériodeseleção.Observeoexemploabaixo:

 \r\n\r\n\r\nAbaixo,ocódigodeumapáginaquearmazenaumvalornumavariáveldesessãoe\r\nmostraototaldeusuáriosconectadoseototaldevisitantesnosite.\r\n\r\n\r\nApplicationeSession\r\n<%Session("variavelqualquer")="Estevalorfoiinseridonavariáveldesessãode\r\nnomevariavelqualquer"%>\r\n\r\n

NúmerodaSessão:<%=Session.SessionID%>

\r\n\r\n\r\n\r\nApostilaASP 20de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\n

Existemnomomento<%=Application("usuariosonline")%>usuários\r\nconectados.

\r\n

Totaldevisitantesnositedesde<%=Application("datainicial")%>:\r\n<%=Application("totaldeusuarios")%>

\r\n

Abaixo,astringquefoiinseridanavariavelvariavelqualquer

\r\n

<%=Session("variavelqualquer")%>

\r\n<%Session.Abandon%>\r\n\r\n\r\n\r\n\r\n\r\nOs comandos Lock e Unlock servem para garantir que somente um visitante estará\r\nalterandoasvariáveisporvez.OcomandoLockbloqueiaaacessodeoutrosvisitantesàs\r\nvariáveis, e o Unlock desbloqueia.\r\nO comando Session.SessionID retorna o valor do ID da sessão.\r\nOcomandoSession.TimeOutdeterminaqualotempomáximo,emminutos,deinatividade\r\ndo visitante até que a sessão possa ser considerada abandonada.\r\nOcomandoSession.Abandonterminaasessãoiniciadaexplicitamente(nãoénecessário\r\nesperarovencimentodoTimeOutparaconsiderarasessãoabandonada).\r\nA procedure Application_OnStart contém a rotina que será rodada quando o objeto\r\nApplication for iniciado.\r\nA procedure Application_OnEnd contém a rotina que será executada quando o objeto\r\nApplication for terminado (qdo. o servidor for desligado).\r\nAprocedureSession_OnStartcontémocódigoqueserárodadoquandoumasessãofor\r\niniciada.\r\nAprocedureSession_OnEndcontémocódigoqueserárodadoquandoumasessão for\r\nterminada(portimeoutoulogoffexplícito).\r\n\r\n\r\n\r\n\r\n\r\n\r\nProcedures\r\n\r\n\r\nAlgumasvezes,emprogramação,umamesmasequênciadecódigosprecisaserusado\r\nconstantemente. Ao invés de copiá-los toda vez que for preciso, pode-se usar as\r\nProcedures.Proceduressãocaixaspretas,ondevcentracomalgunsdados,acaixapreta\r\nprocessa,enocasodasFunctions,retornaoutrosvalores,deacordocomumalgorítimo.\r\nExistemdoistiposdeProcedures,asSubseasFunctions.Observeos\r\n\r\n\r\nexemplosabaixo:\r\n\r\n\r\n\r\n<%\r\nFunctionsoma(valor1,valor2)\r\nIfvalor1=""thenvalor1=0\r\nIfvalor2=""thenvalor2=0\r\nsoma=valor1+valor2\r\nEndFunction\r\n'acima,afunçãodenominadasomafoiapresentada\r\n'abaixo,umachamadaàfunçãofoifeita.Entãoafunçãoexecutaarotinaeretorna\r\numdeterminadovalor,nocaso5.\r\n\r\n\r\nresponse.writesoma(2,3)\r\n%>\r\n\r\n\r\n\r\nApostilaASP 21de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\n\r\n\r\n\r\n\r\nJáumaSubsimplesmenteexecutaumaação,nãoretornandovaloralgum.\r\n\r\n\r\n\r\n<%\r\nSubvisualizar_nome(nome)\r\nresponse.write"Onomedositeé:"&nome\r\nEndSub\r\n'acima,aproceduredotipoSubfoidenominadavisualizar_nome\r\n\r\n\r\nresponse.write"QualéositesobreASPqueofereceTutoriais,NewsgroupseLinks\r\naseusvisitantes?"\r\nCallvisualizar_nome("ASPBRASIL")\r\nresponse.write"
Home
"\r\n'acima,ocomandoCallfazachamadaàSubvisualizar_nome.Comopode-se\r\nperceber,umaSubnãoretornanenhumvalor,esimexecutaumaação.\r\n\r\n\r\n%>\r\n\r\n\r\n\r\n\r\n\r\n\r\n\r\nIf...Then...Else;SelectCase\r\n\r\n\r\nExistem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede\r\nacordocomessevalor,executarumadeterminadarotina:\r\n\r\n\r\n\r\n\r\nIf...Then...Else\r\n\r\n\r\nOcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão\r\ndeacordocomumcritériodeseleção.Observeoexemploabaixo:\r\n\r\n\r\n\r\n<%\r\nvariavel_qualquer=hour(now)\r\nIfvariavel_qualquer<19then\r\nresponse.write"BomDia"\r\nElse\r\nresponse.write"BoaNoite"\r\nEndif\r\n'ocomandoIF...then...Elsecomparouovalordavariavelvariavel_qualquercomum\r\ndeterminadovalorestipulado(nocaso,19).Seovalorformenorque19,então\r\nescrevanatela"BomDia".Casocontrário(Else),"BoaNoite"\r\n%>\r\n\r\n\r\n\r\n\r\n\r\n\r\nSelectCase\r\n\r\n\r\n\r\n\r\nApostilaASP 22de43\r\n\r\nApostilaseTutotriais:http://Apostilas.Fok.com.br\r\n\r\nOcomandoSelectCasepermiteummaiorcontrolesobreosvaloresdeumadeterminada\r\nvariavel.ObserveoExemploAbaixo:\r\n\r\n\r\n\r\n<%\r\nvariavel_qualquer=hour(now)\r\nSelectCasevariavel_qualquer\r\ncase0,1,2,3,4,5,6,7,8,9,10,11,12\r\nresponse.write"BomDia"\r\ncase13,14,15,16,17,18,19\r\nresponse.write"BoaTarde"\r\ncase20,21,22,23,24\r\nresponse.write"BoaNoite"\r\nCaseelse\r\nresponse.write"Esterelógioestámaluco"\r\nEndSelect\r\n%>\r\nobservequeocomandoSelectCasedeveserfechadocomocomandoEndSelect.\r\n\r\n\r\n\r\nIf...Then...Else;SelectCase\r\n\r\n\r\nExistem2comandoscapazesdeidentificaroconteúdodeumadeterminadavariável,ede\r\nacordocomessevalor,executarumadeterminadarotina:\r\n\r\n\r\n\r\n\r\nIf...Then...Else\r\n\r\n\r\nOcomandoIf...Then...Elsepossibilitaverificarseumadeterminadavariávelestáounão\r\ndeacordocomumcritériodeseleção.Observeoexemploabaixo:","PreviewHtmlContent":null,"FilePreviewUrlBaseUrl":"https://files.passeidireto.com","Comments":[],"RatingValue":0,"RatingCount":0,"IsMetaDescriptionWithPage":true,"AuthorId":895642,"HasBeenReported":false,"FilePreview":{"Id":273539,"FileId":977057,"FolderUrl":"4867914e-b45f-4214-a221-54c2bf94ce42","PageCount":43,"Status":5},"IsIndexable":true,"PreviewType":0,"SubjectDetails":{"Materials":null,"UniversityFollowerCount":null,"UniversityMaterialCount":null,"Alias":"algoritmos","ThumbnailUrl":"https://content.passeidireto.com/Thumbnails/Subjects/algoritmos_20170904173010.png","SubjectMapId":30258458,"SubjectMapName":"Algoritmos","MaterialAggregatorType":1,"Id":726790,"Name":"ALGORITMOS","MaterialCount":6527,"FollowerCount":91278,"Followers":[{"Id":38168424,"Name":"Hilkira","ImageUrl":"https://graph.facebook.com/1612432015502208/picture?width=120&height=120","FacebookId":"1612432015502208","Active":true,"UniversityName":"UFAL","CourseName":"Ciência da Computação"},{"Id":38143060,"Name":"Eduardo","ImageUrl":"https://lh6.googleusercontent.com/-Dwdx7vlH9zw/AAAAAAAAAAI/AAAAAAAAABg/wkSQ2FCELgA/s96-c/photo.jpg?sz=120","FacebookId":"-38143060","Active":true,"UniversityName":"ESTÁCIO","CourseName":"Ciência da Computação"},{"Id":38166926,"Name":"Wevlly Kaline","ImageUrl":"https://graph.facebook.com/759193730937494/picture?width=120&height=120","FacebookId":"759193730937494","Active":true,"UniversityName":"IFBA","CourseName":"Tecnologia da Informação"},{"Id":38166825,"Name":"Milena","ImageUrl":"https://lh6.googleusercontent.com/-WenVw8G8BT8/AAAAAAAAAAI/AAAAAAAAA2E/oIH_nlNo2c0/s96-c/photo.jpg?sz=120","FacebookId":"-38166825","Active":true,"UniversityName":"UNIR","CourseName":"Ciência da Computação"},{"Id":38166177,"Name":"Danielson","ImageUrl":"https://lh6.googleusercontent.com/-vsCsH9C6SPk/AAAAAAAAAAI/AAAAAAAAANI/8IsHFOgk7n0/s96-c/photo.jpg?sz=120","FacebookId":"-38166177","Active":true,"UniversityName":"USP-LN","CourseName":"Licenciatura em Informática"}],"LastVisitDate":null,"NewAddedMaterialCount":0},"AuthorImageUrl":"https://graph.facebook.com/100001941047034/picture?width=120&height=120","FileBaseUrl":"https://www.passeidireto.com/arquivo/977057/009_vbscript-e-asp-active-server-pages","UserAgent":"Website","FileUrl":"4867914e-b45f-4214-a221-54c2bf94ce42","HasThumbnail":1,"Contents":{"Tbs":[],"PremiumContent":[]},"title":"009 VBScript-e-ASP-Active-Server-Pages - ALGORITMOS - 5","description":"Veja grátis o arquivo 009 VBScript-e-ASP-Active-Server-Pages enviado para a disciplina de ALGORITMOS Categoria: Anotações - 5 - 977057","userAgent":"Website","HasFlashSale":false,"endDateFlashSales":null,"pdCountData":{"studentCount":10074243}}; ReactDOM.render(React.createElement(ReactPD["File"], initProps), document.getElementById('page_center')); var headerInitProps = {"type":10,"isSearchPage":false,"sponsor":null,"UserAgent":"Website","FlashSaleType":1,"endDateFlashSales":null,"currentUrl":"/arquivo/977057/009_vbscript-e-asp-active-server-pages/5","SubjectTitle":"ALGORITMOS","SubjectAlias":"algoritmos","Contents":{"Tbs":[],"PremiumContent":[]}}; ReactDOM.render(React.createElement(ReactPD.Header, headerInitProps), document.getElementById('header')); var footerInitProps = {}; if(footerInitProps.simple != null){ ReactDOM.render(React.createElement(ReactPD.Footer, footerInitProps), document.getElementById('footer')); } } $(document).ready(init); var pdCountData = {"studentCount":10074243};