🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.database.ado
Article #5655

Cannot access database!

#5655
From: JAMES JAVA
Date: Wed, 28 Mar 2001 12:08
48 lines
2050 bytes
The program is login screen and then press the login value to
database->params but cannot access. First, database->LoginPrompt = false
The program are following , pls help me!

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"

//--------------------------------------------------------------------------
-
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmLogin *frmLogin;
int passcount = 0;

//--------------------------------------------------------------------------
-
__fastcall TfrmLogin::TfrmLogin(TComponent* Owner)
        : TForm(Owner)
{

}
//--------------------------------------------------------------------------
-
void __fastcall TfrmLogin::OKClick(TObject *Sender)
{

    if(++passcount==3) {
    MessageBox(NULL, "Incorrect Login", "Warning", MB_OK);
    Close();
  }

  try {

    frmMain->Database1->Params->Values["User Name"]=Edit1->Text;
    frmMain->Database1->Params->Values["Password"]=Edit2->Text;
    frmMain->Database1->Connected = true;
    frmLogin->Hide();
    frmMain->ShowModal();
    Application->Terminate();
  } catch(...) {
    MessageBeep(MB_ICONHAND);
    ShowMessage("Input error, try again");
    Edit1->SetFocus();
    }
}
Technical Details
Message-ID: <3ac1d25e_2@dnews>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!news.tele.dk!199.60.229.5!newsfeed.direct.ca!look.ca!hammer.uoregon.edu!feed.textport.net!news.bnb-lp.com!dnews!202.64.185.241

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10698b,e70339fe1666c4d8,start
X-Google-Attributes: gid10698b,public
X-Google-ArrivalTime: 2001-03-28 04:10:18 PST
From: "JAMES JAVA" <redhat@hotmail.com>
Newsgroups: borland.public.cppbuilder.database.ado
Subject: Cannot access database!
Date: Wed, 28 Mar 2001 20:08:19 +0800
Lines: 50
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.00.2615.200
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200
NNTP-Posting-Host: 202.64.185.241
Message-ID: <3ac1d25e_2@dnews>
X-Trace: 28 Mar 2001 04:00:30 -0800, 202.64.185.241
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!news.tele.dk!199.60.229.5!newsfeed.direct.ca!look.ca!hammer.uoregon.edu!feed.textport.net!news.bnb-lp.com!dnews!202.64.185.241