October 9th, 2003, 02:23 PM
|
|
Contributing User
|
|
Join Date: Jun 2003
Posts: 245
Time spent in forums: 11 m 27 sec
Reputation Power: 6
|
|
|
Bug in MS Access Code
I had a Microsoft Access 2000 form. When I clicked on the button
with the code below it gives me an error
"compile error: user-defined type not defined"
It highlighted the error on the code
Dim Dbs As Database
=============================
Code:
Option Compare Database
Option Explicit
Private Sub Command1_Click()
Dim Dbs As Database
Set Dbs = CurrentDb
Dim Tenant_Number_Temp As String
Dim Unit_Number_Temp As String
Dim Last_Name_Temp As String
Dim First_Name_Temp As String
Dim counter As Long
Tenant_Number_Temp = "T-100-11-2-1999"
Unit_Number_Temp = "1000"
Last_Name_Temp = "Sacramento"
First_Name_Temp = "Jayson and John"
counter = 0
Do While counter < 10
counter = counter + 1
Text_10.SetFocus
Text_10.Text = counter
Dbs.Execute " INSERT INTO Customer " _
& "(Tenant_Number, Unit_Number, Last_Name, Fist_Name) VALUES" _
& "('" & Tenant_Number_Temp & "','" & Unit_Number_Temp & "','" & Last_Name_Temp & "','" & First_Name_Temp & "');"
Loop
MsgBox "The loop made " & counter & " repetitions."
End Sub
|
Dev Shed Forums Sponsor:
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
