 |
|
<%
Dim objFile1,objFso1
Dim strFileName1, strPath1
dim strPageContent1
strFileName1 = "_#!*INCLUDEFILENAME*!#"
strPath1 = Server.MapPath("/singleclicksolutions/contentdir")
strPath1 =strPath1 & "/" & strFileName1
Set objFso1 = Server.CreateObject("Scripting.FileSystemObject")
if objFso1.FileExists(strPath1) Then
Set objFile1 = objFso1.OpenTextFile(strPath1)
strPageContent1 = objFile1.ReadAll
Response.Write strPageContent1
end if
%>
|
|
|
|
| 12345678901234567890123456789012 |
|
| 123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
1234567890123456789012345678901234567890
1234567890123456789012345678901234567890 |
|
| |
|
| | arshia | | adasdasdasd | | http://www.arshia.com | | | | cellhirelink | | cellhirelink | | http://www.cellhirelink1.com | | | | test2 | | test2 | | http://www.test2.com | | |
|
|
