Consulta SQL na tela

[pedrovisk 1]

Olá!

 

Como faço para visualizar a consulta SQL, utilizando Response.Write, do código abaixo:

 

RS_Usuario.Open "SELECT IDCliente, Login, Senha, EMail_Cobranca, Nome_Cobranca, CNPJ_Cobranca, CPF_Cobranca, RG_Cobranca, Dt_Nascimento_Cobranca, Razaosocial_Cobranca, Logradouro_Cobranca, Numero_Cobranca, Complemento_Cobranca, Bairro_Cobranca, Cidade_Cobranca, Estado_Cobranca, CEP_Cobranca, Pais_Cobranca, DDD_Cobranca, Telefone_Cobranca, QTD_Acesso, Ultimo_Acesso, Dt_Cadastro, Observacoes FROM dbo.Cliente WHERE (Login ='" & Session("Login") & "')", abredb	'Se o usuário não existir é feito um novo cadastro	If RS_Usuario.EOF Then				'Novo registro	   		RS_Usuario.Addnew		RS_Usuario("Login") = Session("Login")		RS_Usuario("Senha") = Session("Chave")	End If		'Dados Usuário Cobrança		RS_Usuario("EMail_Cobranca") 		 = Session("EMail_Contato")		RS_Usuario("Nome_Cobranca") 		 = Session("Nome_Contato")		RS_Usuario("CPF_Cobranca") 			 = Session("CPF_Contato")		RS_Usuario("Dt_Nascimento_Cobranca") = Session("Data_Nascimento")'		RS_Usuario("RG_Cobranca") 			 = Session("RG_Contato")		RS_Usuario("Razaosocial_Cobranca") 	 = Session("Razao_Social")		RS_Usuario("CNPJ_Cobranca") 		 = Session("CNPJ")		RS_Usuario("Logradouro_Cobranca") 	 = Session("Logradouro_Fisico")		RS_Usuario("Numero_Cobranca") 		 = Session("Numero_Fisico")		RS_Usuario("Complemento_Cobranca") 	 = Session("Complemento_Fisico")		RS_Usuario("Bairro_Cobranca") 		 = Session("Bairro_Fisico")		RS_Usuario("Cidade_Cobranca") 		 = Session("Cidade_Fisico")		RS_Usuario("Estado_Cobranca") 		 = Session("Estado_Fisico")		RS_Usuario("Pais_Cobranca") 		 = Cria_Combo_Paises(Request("pais_cobranca"),"codifica")		RS_Usuario("DDD_Cobranca")			 = Session("DDD_Fisico")		RS_Usuario("Telefone_Cobranca")		 = Session("Telefone_Fisico")		RS_Usuario("Observacoes") 			 = Session("Observacoes")	RS_Usuario.Update

[supino 0]

poe o conteudo dda busca dentro de uma variavel e depois manda imprimir.ex:ddd= "select * from tabela where id=" & session("id")response.write dddresponse.end()