
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">

<HTML>

<HEAD>

<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">

<META NAME="Generator" CONTENT="MS Exchange Server version 6.0.6389.0">

<TITLE>Cannot open table in code</TITLE>

</HEAD>

<BODY>

<!-- Converted from text/rtf format -->


<P><FONT SIZE=2 FACE="Arial">The following code will not open the table . Message is type mismatch. Looks like code I have used before. Probably missing something simple.</FONT></P>


<P><FONT SIZE=2 FACE="Arial">Function Add_or_Read_Record()</FONT>

</P>


<P><FONT SIZE=2 FACE="Arial">Dim myds As Recordset, MyDB As Database</FONT>


<BR><FONT SIZE=2 FACE="Arial">Set MyDB = CurrentDb</FONT>


<BR><FONT SIZE=2 FACE="Arial">Set myds = MyDB.OpenRecordset("tbl Last Date in tbl_monthly_inputs", dbOpenTable)</FONT>

</P>


<P><FONT SIZE=2 FACE="Arial">End Function</FONT>

</P>


<P><FONT SIZE=1 FACE="Times New Roman">No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced.</FONT><BR>


</P>

<BR>


</BODY>

</HTML>