<%@ Language=VBScript %> Speak siSwati like a Swazi

Speak siSwati like a Swazi. Learn a new word here every time you visit:

<% set YHConn=Server.CreateObject("ADODB.Connection") YHConn.Open ConnectS Randomize RandNum = int(rnd(51)*51) if RandNum = 0 then RandNum = 1 if RandNum > 51 then RandNum = 51 MyQueryWord = "select * from Word where WordID = " & RandNum set YHWordRS= Server.CreateObject("ADODB.RecordSet") YHWordRS.Open MyQueryWord , YHConn, 3, 3 do while not YHWordRS.EOF %>

<%=YHWordRS("English")%> : <%=YHWordRS("Swazi")%>

<% YHWordRS.movenext loop YHWordRS.close set YHWordRS=Nothing YHConn.close SET YHConn=nothing %>

http://youngheroes.org.sz

There are over 70, 000 Swazi children who have lost their parents to AIDS.  Visit us to find out how you can help.