🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #92432

[VB.NET + Firebird Embeded] Jak to polaczyc ? :)

#92432
From: Maciak
Date: Wed, 26 Oct 2005 16:25
109 lines
3412 bytes
Witam wszystkich :)

W tmacie VB jestem bardzo poczatkujacy. Dotychczas pisalem programy w Delphi 
7, niestety nadszedl czas kupna legalnego oprogramowania ;) Oryginalne 
Delphi zdecydowanie nie jest na kieszen studenta, zdecydowalem sie wiec 
przesiasc na VB 2003.

Chcialem napisac prosty program laczacy sie z baza danych. Z sentymentu do 
Delphi wybralem Firebirda, a konkretniej wersje Embeded.

Sciagnalem z firebird.sourceforge.net pliki 
"Firebird-1.5.2.4731_embed_win32" oraz "FirebirdNETProvider-1.7a-NET1.1". 
NET Providera zainstalowalem, zas zawartosc archiwum Embeded'a wgralem do 
katalogu zawierajacego moj program.

Na poczatku chcialem przetestowac polaczenie. Stworzylem nowa solucje, 
nastepnie dodalem obsluge NET Providera poprzez Project -> Add Reference.. , 
w zakladce .NET wybralem Firebird .Net Data Provider.

Do obslugi zdarzenia klikniecie na przycisk napisalem nastepujacy kod:

Private Sub testuj_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles testuj.Click





        Dim cs As New FirebirdSql.Data.Firebird.FbConnectionStringBuilder



        cs.DataSource = "localhost"

        cs.UserID = "SYSDBA"

        cs.Password = "masterkey"

        cs.Database = "C:\Visual Studio Projects\Nauka\bin\maciakos.fdb"

        cs.Pooling = True

        cs.ConnectionLifeTime = 30

        cs.ServerType = 1





        aaa = cs.ToString()





        Dim connection As New FirebirdSql.Data.Firebird.FbConnection(aaa)



        connection.Open()



        connection.Close()





    End Sub





Wczesniej oczywiscie znajduje sie deklaracja aaa jako zmiennej typu string. 
baza danych "maciakos.fdb" istnieje.



Po uruchomieniu i kliknieciu na przycisk program wykrzacza sie :/ W 
kompilatorze zostaje na zielono poscwietlona linia "connection.Open()" i 
pojawia sie komunikat:



An unhandled exception of type 'FirebirdSql.Data.Firebird.FbException' 
occurred in firebirdsql.data.firebird.dll



Additional information: internal gds software consistency check (cannot find 
tip page (165))





Co ja robie zle? Gdzie popelnilem blad? Bardzo prosze o pomoc :)

Pozdrawiam
Maciak

ps. Przepraszam za rozwleklego posta, ale chcialem wszystko dokladnie opisac
ps.2. Jakby ktos znal tutoriale vb.net + firebird to bardzo prosze o linki 
:) Co prawda w dokumentacji NET Providera sa przyklady, ale chyba pisane w 
Visual C++...
 
Technical Details
Message-ID: <djoanj$k4m$1@nemesis.news.tpi.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: "Maciak" <maciak@o2.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: [VB.NET + Firebird Embeded] Jak to polaczyc ? :)
Date: Wed, 26 Oct 2005 18:25:40 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 111
Message-ID: <djoanj$k4m$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: buy11.neoplus.adsl.tpnet.pl
X-Trace: nemesis.news.tpi.pl 1130343987 20630 83.29.196.11 (26 Oct 2005 16:26:27 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Wed, 26 Oct 2005 16:26:27 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2527
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2527
X-RFC2646: Format=Flowed; Original
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit