% Dim strConexao strConexao = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("ikeda.mdb") Set Conexao = Server.CreateObject ("ADODB.Connection") Conexao.Open strConexao %> <% Dim rs Set rs = Server.CreateObject("ADODB.Recordset") Set rs.ActiveConnection = Conexao %>
|
Fotografo para book de eventos Casamento desfile passarela Moda Fotos urbanas festas fotografia profissional |