Zambian Internet Directory

<% Dim Connect, rstemp, sqlString, connstr Set Connect = Server.CreateObject("ADODB.Connection") connstr = "Driver={Mysql}; Server=sql1a.your-server.co.za; Database=namibi_db1; UID=namibi_u1_r; PWD=qtzffgdT;" Connect.Open(connstr) sqlString = "SELECT * FROM Zambia WHERE Id = '1' ORDER BY Category ASC" Set rstemp = Connect.Execute(sqlString) if rstemp.eof then response.write "no data for
" response.write sqlString Connect.close set Connect=nothing response.end end if %> Zambian Internet Directory - Products Page

Welcome to Zaminternet.com

<%=FormatDateTime(Date,1) %> <%=FormatDateTime(now,3) %>

<% dim filename filename = "hit_count.txt" Set fs=Server.CreateObject("Scripting.FileSystemObject") 'open the file Set f=fs.OpenTextFile(Server.MapPath(filename), 1) content = f.ReadAll If content = "" Then content = 0 End If 'close the file f.Close 'empty the objects Set f=Nothing Set fs=Nothing %> Hit Count: <% Response.Write(content)%>

Online Users:<% Response.Write(Application("online_users"))%>

<% dim strconn strconn = "Driver={Mysql}; Server=sql1a.your-server.co.za; Database=namibi_db1; UID=namibi_u1_r; PWD=qtzffgdT;" Set objConn = Server.CreateObject ("ADODB.Connection") objConn.open strconn Set Rec = objConn.execute("Select count(*) from Zambia") %>Current Listings:<%= Rec(0) %>

Username:

Password:

Trade Listing
Trade Listing are essential the fundamental details of your business, thus allowing potential client to contact you.

Banner Advert
Banner Adverts are custom designed images that appear
when a potential customer browses a specific category or
searches for either you or the industry you are located in.

Cover Block
Cover Block are custom images that are displayed on the
front page of our site. Thus placing you in a exposing you
business to a potential customer, as swiftly are possible.

Full Page Ad
Full Page Ads are custom designed to your specification, thus enabling you to provide a potential customer with additional information about the company.

Websites
Should you wish to further expose yourself to a wider market, you can take the Website package. This package covers:

Domain Registeration ie. your-company.com, etc
Hosting
Design

& Search Engine Registeration

Excellent

Very Good

Good

Average

Poor