<%@LANGUAGE="VBSCRIPT"%>
<%
Dim poo
Dim poo_numRows
Set poo = Server.CreateObject("ADODB.Recordset")
poo.ActiveConnection = MM_harion_STRING
poo.Source = "SELECT inicial FROM iniiii"
poo.CursorType = 0
poo.CursorLocation = 2
poo.LockType = 1
poo.Open()
poo_numRows = 0
%>
Metatron Comunicação Visual !!!
<%
poo.Close()
Set poo = Nothing
%>
