combo box no longer auto-populates after exporting to a new db

[tobydobo]

I just created a new module/form seperately from my current db. Everything works perfectly, but now I want to import into my existing db. I have imported the form and associated table and no matter what I do my combo box no longer functions. In the fields where the data populates, I have a "#Name?" in the text box. I have tried recreating the combo box....same thing. I have tried exporting TO the current db FROM my test db....same thing. No matter what I do my combo box no longer functions within my current db.....only in my seperate db. Any thoughts?

[alansidman]

Is the SQL statement in the record source (properties) correct for the combo box. What happens when you open the underlying query? Does it have the correct data in it?

[tobydobo]

I think I have narrowed it down to the fact that my development db was an mdb file and my working db is a accdb file. But I tried coverting it to accdb file before importing it into my working db, but the issues persist. I can even recreate the form from scratch within my working db and the combo box works UNTIL I add the following vbscript for my command button on the form:

Private Sub Command20_Click()
Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)

Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.To_Address
.CC = Me.CC_Address
.Subject = Me.Mess_Subject
.HTMLBody = Me.Text65
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add (Me.Mail_Attachment_Path)
End If
'.DeleteAfterSubmit = True 'This would let Outlook send th note without storing it in your sent bin
.Send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description
Resume Error_out
Error_out:



...as soon as I add that script I get the #Name? on the fields and the button does not work. I get the error :

"the expression On Click you entered as the even property setting produced the following error: user-defined type not defined"

[alansidman]

What does the combo box if anything have to do with the code you have shown?

Alan