Gravando Dados De Uma Sessão No Banco

[ri_nepo]

Olá Pessoal,

O que estou precisando é criar um código onde eu posso armazenar no banco de dados ou em algum arquivo txt ou xml toda vez que uma sessão inicial com horario

ex:

iniciou agora ai mostra o sessionid 22222 30/09/2005 11:00

quando a sessão cair e entrar outra ai grava novamente

222223 30/09/2005 11:30

alguém poderia dar uma dica ?

abraços

Ricardo

[ri_nepo]

Eu consegui gravar a sessionid e a hora em um arquivo xml , so não sei como fazer para ele gravar novamente caso o id seja diferente

veja como fiz

<%

'Instancia o objeto XMLDOM.

Set xmldoc = Server.CreateObject("MSXML2.DOMDocument.4.0")

'Nome e caminho completo de onde será salvo o arquivo

nome = "c:diretorio\sessao.xml"

'Carrega o arquivo se ele existir

arquivo = xmldoc.Load(nome)

'TRUE = arquivo existe - FALSE = arquivo não existe

'Se o arquivo existe então acaba o processo e destrói o objeto

if arquivo = True Then

Response.write "Arquivo existente !"

Set xmldoc = nothing

Response.end

end if

'O método createElement adiciona os elementos

Set root = xmldoc.createElement("Sessao")

xmldoc.appendChild (root)

'O método createProcessingInstruction possui 2 argumentos: o TARGET = "xml" e DATA = "version='1.0' encoding='ISO-8859-1'"

Set inst = xmldoc.createProcessingInstruction("xml", "version='1.0' encoding='ISO-8859-1'")

xmldoc.insertBefore inst, root

Set com = xmldoc.createComment("Teste de Sessao")

xmldoc.insertBefore com, root

Set pai = xmldoc.createElement("Session_ID")

pai.Text = session.sessionid

xmldoc.documentElement.appendChild (pai)

Set filho = xmldoc.createElement("Horario")

pai.appendChild (filho)

filho.Text = now

'Salva o arquivo no caminho especificado

xmldoc.save (nome)

Response.write "Arquivo salvo !"

'Destruíndo os objetos

Set xmldoc = Nothing

Set root = Nothing

Set inst = Nothing

Set com = Nothing

Set onode = Nothing

Set inode = Nothing

Set child = Nothing

%>

Quem puder ajudar eu agradeço

Abraços

Ricardo

[ri_nepo]

opa , algúem nunca viu este exemplo na net ?

[Marcos-rj]

Antes de gravar az um select no banco de dados para verificar se a id existe, se não existir ele grava os dados no banco!