Array
(
)

Projeto ASP. NET - Problema com a tela de login

Gandalf.nho
   - 28 mai 2008

Estou desenvolvendo meu primeiro projeto ASP .NET usando o BDS 2006. Mas surgiu um problema que não sei como resolver. A aplicação usa um banco de dados Firebird 2.0 e o login é feito usando-se os usuários cadastrados do próprio Firebird. Quando eu testo a aplicação na máquina onde o sistema está sendo desenvolvido, funciona sem problemas, mas se movo os arquivos para outro diretório na mesma máquina ou se acesso a aplicação de outra máquina (independente de onde estão os arquivos), ao clicar no botão para logar, os campos Usuário e Senha ficam em branco e não acontece nada, nem sequer um erro ocorre. Alguém tem idéia do que pode ser? Já estou atrasada com esse sistema e não dá para entregar sem resolver isso.

Coloquei o caminho do banco no arquivo Web.config (usando um Alias):
#Código

<add key="ConnectionString" value="Database=CADART;DataSource=localhost;Port=3050;Dialect=3;Charset=WIN1252;Pooling=True;Server Type=0" />


Código da página de login:

#Código
procedure twfLogin.Page_Load(sender: System.Object; e: System.EventArgs);
begin
// TODO: Put user code to initialize the page here
If Not IsPostBack Then
Begin
If Session[´Usuario´] <> Nil Then Session.Remove(´Usuario´);
If Session[´Senha´] <> Nil Then Session.Remove(´Senha´);
FormsAuthentication.SignOut;
lblErro.Visible := False;
End;
end;

procedure twfLogin.btnLogin_Click(sender: System.Object; e: System.EventArgs);
var
vStrBld : FbConnectionStringBuilder;
vConexao : FbConnection;
begin
vStrBld := FbConnectionStringBuilder.Create(ConfigurationSettings.AppSettings.Get(´ConnectionString´));
vStrBld.UserID := Usuario.Text;
vStrBld.Password := Senha.Text;
vConexao := FbConnection.Create(vStrBld.ToString);
try
begin
vConexao.Open;
vConexao.Close;
Session.Add(´Usuario´, vStrBld.UserID);
Session.Add(´Senha´, vStrBld.Password);
FormsAuthentication.RedirectFromLoginPage(vStrBld.UserID, True);
end
except
lblErro.Visible := True;
end;
end;


E no OnLoad das demais páginas esse código:
#Código
If Session[´Usuario´] = Nil Then
Response.Redirect(´Login.aspx?ReturnUrl=´ + Request.RawUrl);