Breakthrough

There's a problem on calling the function on returning data record and it burden me; it almost crack me down!
I find the solution tonight and extremely happy. Wish the working progress can be improved a lot lot more.
Cheers the last day for 2007!

Private Sub Command11_Click()
On Error GoTo Err_Command11_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "temp_db"

stLinkCriteria = "[b]=" & "'" & Me![Text8] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command11_Click:
Exit Sub

Err_Command11_Click:
MsgBox Err.Description
Resume Exit_Command11_Click

End Sub

All right reserved