Database-verdi i MsgBox

[Nickless]

Hei.

 

Plages med å skrive en database-verdi i en tekstboks, noen som vet hvordan man gjør det?

Prøver å få det til med følgende kode:

 

Dim login = Me.UsersTableAdapter1.Login(User.Text, Pass.Text)

 

If login Is Nothing Then

MsgBox("Username or Password is incorrect!", MsgBoxStyle.Critical, "Login Error")

Else

Dim Userinformation = Me.UsersTableAdapter1.GetUserInfo(User.Text, Pass.Text)

 

MsgBox("Welcome " + Userinformation.First_NameColumn.ToString, MsgBoxStyle.Information, "Access Granted")

 

 

Databasen er en Microsoft Access-fil.

 

 

EDIT: Fant ut av hvordan det skal gjøres.

Endret 1. november 2010 av Nickless