<%@ Language="VBScript"%> Add Image <% If Request.ServerVariables("REQUEST_METHOD") = "POST" Then Set objCon = Server.CreateObject ("ADODB.Connection") 'Here I start to add the information into the database fields objCon.Open DbCon mSQL = "INSERT INTO gallery(" mSQL = mSQL & "image," mSQL = mSQL & "imglarge)" mSQL = mSQL & "Values(" mSQL = mSQL & "'" & Request.Form("image") & "', " mSQL = mSQL & "'" & Request.Form("limage") & "')" 'It executes the SQL ObjCon.Execute (mSQL) ObjCon.Close Set ObjCon = Nothing Response.Write ("Your Record has been saved to the Database

Back") Else %>

Add Images to your Gallery

Name of the small image Remeber to set the right path
Name of the Larger image

You still have to upload the Images to your Host!

<% Response.write "

"& infcop & "" End If %>