By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
434,779 Members | 1,309 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 434,779 IT Pros & Developers. It's quick & easy.

<<HELP>> Problem with recalling a record and displaying it on the form!

P: n/a
I am trying to retrive one field from the "company info" table that
contains several fields but I want the "company name" field. There is
only one record in this table. When I entered the code below (which I
copied out of a book). I get the following error. The hickup comes in
the "dim db as database" line. However if I comment this out. It
doesn't like the next line either.

I appreciate any help you can give me. Also is this a problem between
ADO and DAO?

Error I receive is:

Microsoft Visual Basic
! Compile Error:
User-defined type not defined

Private Sub Form_Load()

Dim db as database
Dim rst as recordset
Dim strsql as string
Dim coname as string

Set db = currentdb
strsql = "select [company name] from [company info]"
set rst=db.openrecordset(strsql)
rst.movelast
rst.movefirst
coname=rst!("company name")
me.txtcompanyname = coname
rst.close
Set rst = nothing
Set db = nothing

End Sub

Thanks for all your help in advance!

Chuck
Nov 12 '05 #1
Share this Question
Share on Google+
2 Replies


P: n/a

"Chuck" <w0***@yahoo.com> wrote in message
news:64**************************@posting.google.c om...
I am trying to retrive one field from the "company info" table that
contains several fields but I want the "company name" field. There is
only one record in this table. When I entered the code below (which I
copied out of a book). I get the following error. The hickup comes in
the "dim db as database" line. However if I comment this out. It
doesn't like the next line either.

I appreciate any help you can give me. Also is this a problem between
ADO and DAO?
Almost certainly. This code is DAO. You very likely don't have a reference
to DAO set. Go to Tools->References to set it. Personally, I don't like to
mix DAO and ADO code in the same project, I would also uncheck the reference
to ADO.

Randy
Error I receive is:

Microsoft Visual Basic
! Compile Error:
User-defined type not defined

Private Sub Form_Load()

Dim db as database
Dim rst as recordset
Dim strsql as string
Dim coname as string

Set db = currentdb
strsql = "select [company name] from [company info]"
set rst=db.openrecordset(strsql)
rst.movelast
rst.movefirst
coname=rst!("company name")
me.txtcompanyname = coname
rst.close
Set rst = nothing
Set db = nothing

End Sub

Thanks for all your help in advance!

Chuck

Nov 12 '05 #2

P: n/a
"Randy Harris" <ra***@SpamFree.com> wrote in message news:<YP*******************@newssvr16.news.prodigy .com>...
"Chuck" <w0***@yahoo.com> wrote in message
news:64**************************@posting.google.c om...
I am trying to retrive one field from the "company info" table that
contains several fields but I want the "company name" field. There is
only one record in this table. When I entered the code below (which I
copied out of a book). I get the following error. The hickup comes in
the "dim db as database" line. However if I comment this out. It
doesn't like the next line either.

I appreciate any help you can give me. Also is this a problem between
ADO and DAO?


Almost certainly. This code is DAO. You very likely don't have a reference
to DAO set. Go to Tools->References to set it. Personally, I don't like to
mix DAO and ADO code in the same project, I would also uncheck the reference
to ADO.

Randy
Error I receive is:

Microsoft Visual Basic
! Compile Error:
User-defined type not defined

Private Sub Form_Load()

Dim db as database
Dim rst as recordset
Dim strsql as string
Dim coname as string

Set db = currentdb
strsql = "select [company name] from [company info]"
set rst=db.openrecordset(strsql)
rst.movelast
rst.movefirst
coname=rst!("company name")
me.txtcompanyname = coname
rst.close
Set rst = nothing
Set db = nothing

End Sub

Thanks for all your help in advance!

Chuck


Thanks Randy,

This seems to have cleared up alot. I guess from the DAO version you
can't use the "me." reference for the open form?

Thanks Again,
Chuck
Nov 12 '05 #3

This discussion thread is closed

Replies have been disabled for this discussion.