Sub RecordToScreen()
Dim item As Long
Set RS = New ADODB.Recordset
Statement = "SELECT * FROM tblAsset WHRER AssetID = " & txtAssetID.Text & " picProduct.Picture = LoadPicture(app.path & PictureFileName)"
RS.Open Statement, ConnDB, adOpenForwardOnly, adLockReadOnly, adCmdText
RS.Close:
Set RS = Nothing
End Sub
-------------------------------------------------------------
:'(
Dbug
Run-time error '-2147217900(80040e14)':
Syntax error in FROM clause.
I'm thank beforehand:icon_redface: