login

[univercity]

Si ok. tambien te entendí, pero teniendo el el nombre de usuario en la pagina de entrada, ya puedes armar una llamada a la BD para extraer el Codigo_persona...

' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("./bdwine/tuBD.mdb"))

Sql = "Select * From empresas where usuario='"& Usuario &"'"
Rst.Open Sql,cnn,3,3

Lo_que_buscas = rst("codigo_persona")
Response.Write Lo_que_Buscas

Slds.