<!DOCTYPE html>
<html>
<body>
<%
Dim xt
xt = 5
if xt = 5 then
response.write("ta igual a 5")
Else
Response.Redirect("http://www.google.com")
End If
%>
</BODY>
</HTML>
http://www.tizag.com/aspTutorial/aspSelect.php
http://www.w3schools.com/asp/showasp.asp?filename=demo_readtextfile
http://www.w3schools.com/asp/asp_ref_textstream.asp
<!DOCTYPE html>
<html>
<body>
<p>texto lido:</p>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("texto.txt"), 1)
Response.Write(f.ReadAll)
f.Close
Set f=Nothing
Set fs=Nothing
%>
</body>
</html>
<html>
<body>
<%
Dim xt
xt = 5
if xt = 5 then
response.write("ta igual a 5")
Else
Response.Redirect("http://www.google.com")
End If
%>
</BODY>
</HTML>
http://www.tizag.com/aspTutorial/aspSelect.php
http://www.w3schools.com/asp/showasp.asp?filename=demo_readtextfile
http://www.w3schools.com/asp/asp_ref_textstream.asp
<!DOCTYPE html>
<html>
<body>
<p>texto lido:</p>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("texto.txt"), 1)
Response.Write(f.ReadAll)
f.Close
Set f=Nothing
Set fs=Nothing
%>
</body>
</html>
Nenhum comentário:
Postar um comentário