<%PageName = Request.ServerVariables("URL") Set oConn = Server.CreateObject("ADODB.Connection") Set oRS = Server.CreateObject("ADODB.Recordset") oConn.Open xDb_Conn_Str oRS.Open "Select * FROM contact ",oConn d=(replace(pagename, ""&oRS("URLP")&"" ,"" )) %> IT Staff Online |
    To Outsource today Phone: (02) 9913 2065 or 0410 630 560. Alternatively E-mail us.
HOME | TESTIMONIALS | HOW OUTSOURCING WORKS | PRICING | WHO SHOULD OUTSOURCE | CONTACTS
 

<%Set conn = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") oRS.Close conn.Open xDb_Conn_Str sql= "select country from countryes where id <> 73 order by country" rs.Open Sql, conn, 1, 2 If Not RS.Eof Then Do While Not RS.EOF %> .asp" class="px5"><%=RS("Country")%> <% oRS.Open "Select COUNT(id) FROM Links where category='"&RS("Country")&"' and status='ok'",xDb_Conn_Str 'Response.Write "
" Response.Write "(" & oRS(0).Value & ")" & "
" oRS.Close%> <%rs.movenext Loop%> <% end if%>

<%While not RS.EOF%> <% RS.MoveNext Wend 'If RS.EOF Then Exit For 'Next 'RS.Close 'Conn.Close 'Set RS = Nothing 'Set Conn = Nothing %>
 

Welcome to our link exchange programme.

Before submitting a link you must add this code in your page.
Our robot will search for our code on the link you provide before your link can be added.

Copy and Paste in your page:

<strong>IT Staff Online</strong><br>Outsource all your web programming and web design staff needs.<br><a href="http://www.itstaffonline.com.au" target="_blank">http://www.itstaffonline.com.au</a>

This code will look like this:

IT Staff Online
Outsource all your web programming and web design staff needs.
http://www.itstaffonline.com.au

Once you have added our link on your site click here to Add your link to this directory

 
HOME | OUTSOURCING | RECOMMENDED BUSINESSES | ARTICLES | SITE MAP | ABOUT US | CONTACTS
©2005 Receptive Technologies Pty Ltd   Privacy Policy