!
"
#
$
"
%
%& % '
()* +
)% '
,
!
%6 ) .
7
#
=
#
0 10! 2 3
'
()* + .
"
/
()* + 0 5
7 8598:4
;;) .6
#
4
7 13339<%4
#
> #
' -
<%
Set Connect = Server.CreateObject("ADODB.Connection")
dB = "driver=MySQL ODBC 3.51 Driver;server=127.0.0.1;uid=localhost;pwd=;_
database=seubancodedados"
Connect.Open dB
nomeTabela = "suaTabela"
Set rsTemp = Server.CreateObject("ADODB.Recordset")
rsrsTemp.Open "SELECT * FROM " & nomeTabela, Connect
Response.write "Esta tabela, " & nomeTabela &
registros."
Response.write vbcrlf & "<br>" & vbcrlf
", contém " & rsTemp & "
Do While Not rs.EOF
Response.write rsTemp(0) & "<br>"
rsTemp.MoveNext
Loop
rsTemp.close
%>
?
$
,
'"
$
$
!
'
'"
@"
)* +
?
#
$
A
A
#A
!
7
!
!
!
?
'"
?
?
$
;%
1F 3 3
-G6
7 G7
9
%
4
'
;%
'
05
DE ()* +
@ ;%
4!
.
$
# '
()* + %
'
/
!
%
"
'
4!
01
@C
B
7 !
!
.
.
#A
'"
)* + " 6
!
#
?
!
4!
.
?
.
;
$
.
;
!
!
4!
$
$
!
> #
4 %
!
%
!
#
6
? 7H )
1
@
;