[RB Smissaert]

Just tried this out by adapting the example that is in the SQL help file and it all works fine:

Sub App_Start

	Form1.Show
	
	con.New1
	reader.New1
	
	con.Open("Data Source = " & AppPath & "\BlobTest.db3") 'Opens the database.
	cmd.New1("CREATE TABLE IF NOT EXISTS pictures([NAME] TEXT, [IMAGE] BLOB)",con.Value)
	cmd.ExecuteNonQuery
      
	'Save the image in the database (change the image name to an existing image file).
	cmd.AddParameter("value1")
	cmd.AddParameter("value2")
	cmd.SetParameter("value1", "Image66.gif")
	cmd.SetParameter("value2", cmd.FileToBLOB(AppPath & "\Image66.gif"))

	cmd.CommandText = "INSERT INTO pictures values(@value1, @value2)"
	cmd.ExecuteNonQuery
	
	'Load the image from the database.
	cmd.CommandText = "SELECT image FROM pictures"
	reader.Value = cmd.ExecuteReader
	reader.ReadNextRow
	Form1.Image = reader.GetImage(0)

End Sub

RBS