resize online image to fit web browser (1 Viewer)

hi

i have web browser in form and it is connect to fields .
the problem is that not all the images in same size so i want to fix the web browser,and resize image size automatically to fit web browser size

this is my try :

Sub Test()
Form_sheet1.Show
Form_sheet1.WebBrowser57.Navigate "about:blank"
Form_sheet1.WebBrowser57.Document.Write "<img style=""width:100%;"" src ='" & .Fields("photo") & "'alt=" & .Fields("photo") & " height=320px width=225px ><div>"
End Sub


sheet:sheet1
field: photo
web browser : WebBrowser57


any help ??

see form2

View attachment moviedate.accdb