<% Dim objFile,objFso Dim strFileName, strPath dim strPageContent strFileName = "Meta_Database-links.asp" strPath = Server.MapPath("/freehomepage/metadir") strPath =strPath & "/" & strFileName '' Response.Write strPath ''Response.Write Request.ServerVariables("PATH_INFO") Set objFso = Server.CreateObject("Scripting.FileSystemObject") if objFso.FileExists(strPath) Then Set objFile = objFso.OpenTextFile(strPath) strPageContent = objFile.ReadAll Response.Write strPageContent else ''Response.Write "Not Exist" end if %>

Home

More Links

Resources

Articles

<% Dim objFile1,objFso1 Dim strFileName1, strPath1 dim strPageContent1 strFileName1 = "_Database-links.asp" strPath1 = Server.MapPath("/freehomepage/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 %>


Computer (34)	Computer--Resources (56)

Computer-Links (48)	Computers-And-Software (46)

Database-links (1)	email-Marketing-Resources (22)

Hardware---Resources (13)	Internet Services (13)

Internet-&-Online (8)	Internet-Links (58)

Internet-Markting (66)	Miscellaneous (48)

Networking-Resources (5)	Online Marketing (8)

Other-Useful-Links (69)	Web-Hosting (29)

Web-Resources (56)	Website-Designing (33)

Cheap Computers And Cheap Laptops Information Center

Tutorials, advice, and tips on buying a better cheap computer or laptop, buying /building a better cheap computer, plus articles and a Computer Dictionary.

http://www.cheap-computers-and-cheap-laptops.com

Home