Forespørgelser

Hej

Jeg har tidligere brugt denne under kriterier

[forms]![index]![tekst19]

men det virker ikke mere i access 2007, er der noget jeg kan gøre for at få det til at virker igen.

Jeg har også prøvet denne

Public Function dnk_fhpHentFra() As String
' -----------------------------------------------------------------------------------
' Purpose    :
' Parameters :
' Returns    : String
' Created    : 15-12-2010
' Modified  :
' Remarks    :
' -----------------------------------------------------------------------------------
On Error GoTo Error_dnk_fhpHentFra
  Dim result As String
  Dim rst As New ADODB.Recordset

  strSQL = "SELECT * FROM dnk_Fra"
  rst.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockOptimistic

  rst.MoveFirst
  While Not rst.EOF
    result = result & Nz(rst!Frakort, "") & vbCrLf
    rst.MoveNext
  Wend

  rst.Close
  Set rst = Nothing

Exit_dnk_fhpHentFra:
  dnk_fhpHentFra = result
  Exit Function

Error_dnk_fhpHentFra:
  result = ""
  Select Case Err.Number
    Case 3021
    Case 2501
    Case Is < 0
    Case Else
      MsgBox Err.Number & ": " & Err.Description, vbOKOnly + vbCritical, "Error in procedure 'dnk_fhpHentFra'"
  End Select
  Resume Exit_dnk_fhpHentFra

End Function

Hvor jeg i kriterier skriver dnk_fhpHentFra()

Det virker hvis jeg i kriterier skriver det jeg vil have til at står der med de andre funktioner

Nogen ideer ?