PDA

Visualizza la versione completa : [VB .NET] Database, mi dite cosa ho sbagliato?


brainforce
19-10-2002, 02:53
Public Class frmRubrica
Inherits System.Windows.Forms.Form

Public conn, strConn, SQL, rs

+qui poi ce il codice che genera lui in automatico

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =c:\database.mdb"
conn = CreateObject("ADODB.Connection")
conn.Open(strConn)
SQL = "SELECT * FROM tabella"
rs = CreateObject("ADODB.Recordset")
rs.Open(SQL, conn)
MsgBox(rs)
rs.Close()
rs = Nothing
conn.Close()
conn = Nothing
End Sub
End Class

*****************
Praticamente quando clikko sul tasto button1 si apre la connessione al database, creo l'oggetto ado e rs seleziono la tabella (si chiama così la mia tabella) apro il record (rs.Open(SQL, conn)) e dovrebbe apparire un message box con il valore del campo, ma nisba.
Perche? Cos'è che sbaglio?

brainforce
19-10-2002, 02:56
Ah dimenticavo il DNS lo creato, o meglio già cera, o solo selezionato il mio database access clikkando su quello che cera in lista "User DNS Access database"

Mi dà sempre l'errore che non può convertire promp in string o simile.

santal
19-10-2002, 12:55
Guarda che tu con MsgBox(rs) cerchi di far apparire il recordset e non il nome del campo.

Per vedere il contenuto del campo:
MsgBox(rs.fields("NomeCampo"))

brainforce
19-10-2002, 13:59
Ah :gren:

brainforce
19-10-2002, 14:07
Non mi funziona, o provato anche in una text box ma mi dice

"Cast from type 'Field' to type 'String' is not valid

:master:

brainforce
20-10-2002, 10:08
:(

darkblOOd
21-10-2002, 12:48
Originariamente inviato da brainforce
Non mi funziona, o provato anche in una text box ma mi dice

"Cast from type 'Field' to type 'String' is not valid

:master:
:dhò:

MsgBox(rs.fields("NomeCampo").ToString)

quando ti segnala errori di cast, vuol dire che devi convertire la variabile

Loading