Free Trial - Trend Micro AntiVirus plus AntiSpyware 2008
Save up to $228 instantly on the HP Pavilion Elite m9300z Customizable Desktop!
30% Off Plus Free Shipping on Orders over $50 at VistaPrint.com!
Get Paltalk for 7 days without giving your credit card!
Up To 50% OFF WhiteSmoke Software Products!
Dmegs Directory Free Web Directory - Add Your Link
<%
''''''''''''''''''''''' Dynamic Scripting Section - Do not touch the script code '''''''''''''''''''''''''''''''''''''''
domainname = Request.ServerVariables("HTTP_HOST")
If Request.QueryString("c") <> "" Then
Category = "&CID=" & Request.QueryString("c")
End If
PostData = "&UID=3285&DID=2842" & "&ScriptName=" & Request.ServerVariables("SCRIPT_NAME") & Category
strQuery = Request.querystring
Function GetMetaData(Query, Data, title)
Set hObj = Nothing
On Error Resume Next
Set hObj = CreateObject("WinHttp.WinHttpRequest.5.1")
ComponentString = "" & vbCrLf
On Error Resume Next
If hObj Is Nothing Then
Set hObj = CreateObject("WinHttp.WinHttpRequest.5")
ComponentString = "" & vbCrLf
End If
hObj.Open "GET", "http://www.linksjunk.com/get_links/get_links.php?"& Query & Data & "&title=" & title, False
hObj.Send
GetMetaData = hObj.responseText
Set hObj = Nothing
End Function
Function GetData(Query, Data , ByRef strResp)
Set hObj = Nothing
On Error Resume Next
Set hObj = CreateObject("WinHttp.WinHttpRequest.5.1")
ComponentString = "" & vbCrLf
On Error Resume Next
If hObj Is Nothing Then
Set hObj = CreateObject("WinHttp.WinHttpRequest.5")
ComponentString = "" & vbCrLf
End If
hObj.Open "GET", "http://www.linksjunk.com/get_links/get_links.php?"& Query & Data, False
hObj.Send
If hObj.Status <> 200 Then
strResp = "Error: Status=" & hObj.Status & " Text=" & hObj.ResponseText
GetData = False
Else
strResp = ComponentString & hObj.responseText
GetData = True
End If
Set hObj = Nothing
End Function
''''''''''''''''''''''' Dynamic Scripting Section - Completed '''''''''''''''''''''''''''''''''''''''
%>
Free web directory Business Directory - a great family friendly directory offering full web services.
Link Market - Free Link Exchange, Link Swap and Link Trade Directory
Have you ever tried to exchange links, swap links, or trade links? Was it hard? Use link market instead; - it is easy to use, free and very smart. It will save you hours of work.
Free Articles Submission