uploading access database to webserver

I am new to ASP and I have been told to write a script that will automatically upload an access database stored in server in our building to the webserver located in another building. This script should run automatically once every week.

Please help me out by suggesting how can i do it.

Posted On: Friday 26th of October 2012 05:14:03 AM Total Views:  820
View Complete with Replies

Related Messages:

Multiple image uploader - problem uploading a single image   (444 Views)
Basically what I've got is a problem when I'm trying to upload an image in an 'edit' page via the cms.I have 6 images that are uploaded fine via a 'add product' page, then when I go to my edit page and for example change 1 of those images of the 6 and upload that, I get problems, but all is fine if when im in the 'edit' page I change another piece of data and submit.I have included below the 2 pages that are used when 'editing' a selection.IF NOT rsuserU.EOF THENartTitle = rsuserU( "art_Title" )artCategory = rsuserU( "art_Category" )artBriefDesc = rsuserU( "art_BDescription" )artPrice = rsuserU( "art_Price" )artPicFull = rsuserU( "art_ThumbFull" )artFace = rsuserU( "art_ThumbFace" )artHood = rsuserU( "art_ThumbHood" )artExtra1 = rsuserU( "image_Extra1" )artExtra2 = rsuserU( "image_Extra2" )artExtra3 = rsuserU( "image_Extra3" )artCaseDesc = rsuserU( "case_Text" )artDialDesc = rsuserU( "dial_Text" )artMovementDesc = rsuserU( "movement_Text" )artMakerDesc = rsuserU( "maker_Text" )artDatDesc = rsuserU( "dat_Text" )artHeightDesc = rsuserU( "height_Text" )artStatus = rsuserU( "art_Status" )artMoonDisplay = rsuserU( "art_MoonDisplay" )artDisplay = rsuserU( "art_Display" )END IFrsuserU.CloseFUNCTION SELECTED( firstVal, secondVal ) IF cSTR( firstVal ) = cSTR( secondVal ) THEN SELECTED = " SELECTED " END IFEND FUNCTION%> Edit or Update Clock Information: Title: Category: Longcase Mahogany Longcase Oak Longcase Walnut Longcase Marquetry Longcase Lacquer Longcase Miscellaneous Other clocks and instruments Barometers Restoration Longcase Mahogany Archive Longcase Oak Archive Longcase Walnut Archive Longcase Marquetry Archive Longcase Lacquer Archive Longcase Miscellaneous Archive Other clocks and instruments Archive Barometers Archive Brief Description: Price: Please note! When changing an image, you have to change or re-load all 6 Current Full Length Clock Picture:   New Full Length Clock Picture: Current Clock Face Picture:   New Clock Face Picture: Current Clock Hood Picture:   New Clock Hood Picture: Current Extra Picture 1:   New Extra Picture 1: Current Extra Picture 2:   New Extra Picture 2: Current Extra Picture 3:   New Extra Picture 3: Please note! When changing an image, you have to change or re-load all 6 Case Description: Dial Description: Movement Description: Maker Description: Date Description: Height Description: Status: IN STOCK SOLD Moon Image Display: YES NO Display: YES NO Back This is then submitted here:if instr(Trim(Request.ServerVariables("HTTP_REFERER")),"addproduct_art.asp") or instr(Trim(Request.ServerVariables("HTTP_REFERER")),"updateproduct_art.asp") then Set Upload = Server.CreateObject("Persits.Upload") theCount ="..")&"\images\uploaded") dim arr(6), i i = 1 For Each File in Upload.Files arr(i) = File.FileName i = i + 1 Next 'Count = Upload.SaveVirtual("../upload") ' Get the form variables addProduct = TRIM (Upload.Form("addProduct")) updateProduct = TRIM (Upload.Form("updateProduct")) deleteProduct = TRIM (Upload.Form("deleteProduct")) 'response.write("delete=" & deleteProduct) delID = TRIM (Upload.Form("delID")) catID = TRIM (Upload.Form("catID")) artTitle = TRIM (Upload.Form("artTitle")) artCategory = TRIM (Upload.Form("artCategory")) artBriefDesc = TRIM (Upload.Form("artBriefDesc")) artPrice = TRIM (Upload.Form("artPrice")) artPicFull = TRIM (arr(1)) artFace = TRIM (arr(2)) artHood = TRIM (arr(3)) artExtra1 = TRIM (arr(4)) artExtra2 = TRIM (arr(5)) artExtra3 = TRIM (arr(6)) artCaseDesc = TRIM (Upload.Form("artCaseDesc")) artDialDesc = TRIM (Upload.Form("artDialDesc")) artMovementDesc = TRIM (Upload.Form("artMovementDesc")) artMakerDesc = TRIM (Upload.Form("artMakerDesc")) artDatDesc = TRIM (Upload.Form("artDatDesc")) artHeightDesc = TRIM (Upload.Form("artHeightDesc")) artStatus = TRIM (Upload.Form("artStatus")) artMoonDisplay = TRIM (Upload.Form("artMoonDisplay")) artDisplay = TRIM (Upload.Form("artDisplay")) origImage = TRIM(upload.Form("origImage")) origFImage = TRIM(upload.Form("origFImage")) origHImage = TRIM(upload.Form("origHImage")) origExtra1 = TRIM(upload.Form("origExtra1")) origExtra2 = TRIM(upload.Form("origExtra2")) origExtra3 = TRIM(upload.Form("origExtra3")) set upload = nothing 'Assign Default Values IF artTitle = "" THEN artTitle = " " END IF IF artCategory = "" THEN artCategory = " " END IF IF artBriefDesc = "" THEN artBriefDesc = " " END IF IF artPrice = "" THEN artPrice = " " END IF IF artCaseDesc = "" THEN artCaseDesc = " " END IF IF artDialDesc = "" THEN artDialDesc = " " END IF IF artMovementDesc = "" THEN artMovementDesc = " " END IF IF artMakerDesc = "" THEN artMakerDesc = " " END IF IF artDatDesc = "" THEN artDatDesc = " " END IF IF artHeightDesc = "" THEN artHeightDesc = " " END IF IF artStatus = "" THEN artStatus = " " END IF IF artMoonDisplay = "" THEN artMoonDisplay = " " END IF IF artDisplay = "" THEN artDisplay = " " END IF ' Add new product if artPicFull = "" then Pimage = origImage else Pimage = artPicFull end if if artFace = "" then Fimage = origFImage else Fimage = artFace end if if artHood = "" then Himage = origHImage else Himage = artHood end if if artExtra1 = "" then Extra1 = origExtra1 else Extra1 = artExtra1 end if if artExtra2 = "" then Extra2 = origExtra2 else Extra2 = artExtra2 end if if artExtra3 = "" then Extra3 = origExtra3 else Extra3 = artExtra3 end if if addProduct "" then strsqlM = "INSERT INTO eventDisplay " &_ "( art_Title, art_Category, art_BDescription, art_Price, art_ThumbFull, art_ThumbFace, art_ThumbHood, image_Extra1, image_Extra2, image_Extra3, case_Text, dial_Text, movement_Text, maker_Text, dat_Text, height_Text, art_Status, art_MoonDisplay, art_Display ) VALUES (" &_ " '" & fixQuotes (artTitle ) & "', " &_ " '" & fixQuotes (artCategory ) & "', " &_ " '" & fixQuotes (artBriefDesc ) & "', " &_ " '" & fixQuotes (artPrice ) & "', " &_ " '" & fixQuotes (artPicFull ) & "', " &_ " '" & fixQuotes (artFace ) & "', " &_ " '" & fixQuotes (artHood ) & "', " &_ " '" & fixQuotes (artExtra1 ) & "', " &_ " '" & fixQuotes (artExtra2 ) & "', " &_ " '" & fixQuotes (artExtra3 ) & "', " &_ " '" & fixQuotes (artCaseDesc ) & "', " &_ " '" & fixQuotes (artDialDesc ) & "', " &_ " '" & fixQuotes (artMovementDesc ) & "', " &_ " '" & fixQuotes (artMakerDesc ) & "', " &_ " '" & fixQuotes (artDatDesc ) & "', " &_ " '" & fixQuotes (artHeightDesc ) & "', " &_ " '" & fixQuotes (artStatus ) & "', " &_ " " & fixQuotes (artMoonDisplay ) & ", " &_ " " & fixQuotes (artDisplay ) & " )" ' strsql, conn On Error Resume NextConnM.Execute strsqlMIf Err 0 Then Response.Write "Error in query " & strsqlM Response.EndEnd If end if %> Clock Title: Category: Brief Description: Price: Picture of full length:   Picture of the face:   Picture of the hood:   Extra Image 1:   Extra Image 2:   Extra Image 3:   Case Description:   Dial Description:   Movement Description:   Maker Description:   Date Description:   Height Description:   Status: Moon Display:   Display:   Was added to the database
aspupload question when uploading file to a database   (435 Views)
I am building an update query to update a databaseand load the document to a table.the update statement to update the file looks likethe followingupdate due_evals set pl_updated_by = '919999', pl_updated_date = '10/20/2005', rating = case due_evals_id when 248688 then 'Competent' when 255120 then 'Improvement Needed' END, payloc_comp_date = case due_evals_id when 248688 then '10/20/2005' when 255120 then '10/21/2005' END where due_evals_id in (248688,255120))"I want to add something like the following image_blob = case due_evals_id when 248688 then '' when 255120 then '' END .My question is I will perform the following set file = upload.files('file1') Set file = upload.files('file2')When I get to the update statement or if it was an insert statement all it wantsis a per aspupload manual.aspupload manual information"UPDATE MYIMAGES SET img=, name='newname.ext' WHERE id=3"How will it knows which one is for whichI appreciate the help
uploading multiple files   (515 Views)
I have been trying now, quite unsuccessfully to upload more than one files into our database using aspSmartUpload.The way we have it spec'ed out is one code can have up to 6 files attached it.When inserting records into the database, one code say 3333 can be associated with up to 6 files uploaded to the database.So far, when I try to store more than one files, only one gets inserted.Here are my 2 files:Any help, as usual, is greatly appreciated.CODEpage1: Select Site Code Choose One: ------------------------------------------------ 1072301 1072302 1072303 1072304 1072305 1072306 1072307 1072308 Upload PDF Upload PDF Upload PDF Upload PDF page2:Once again,
Auto sizing of images when uploading   (362 Views)
How do i autosize an image when uploading i
Form Multipart-Form/data fileuploading   (413 Views)
I wanted to know , if without using a third-party component, does ASP provide any intrinsic objects, with which I can parse the FORM elements posted with enctype="multipart-form/data" method="post". Note: both and
Error in an uploading script   (427 Views)
I got a problem in the uploading script. Actually the uploading works very well but there's one slight problem that i couldnt debug it... whenever i upload a file into my server site it prompts out a small error window stating there's a runtime error has occurred and askin me do i wish to debug. But i couldnt find the line or which line i have to debug. I tried to use testpad to find the error but seems the error is beyond the line of the document. So if anyone could knoe point out whuts da mistake i makeWell this is the page where i make the upload part.
Requesting data from a file field whilst uploading from it   (835 Views)
Right, this should be quick and easy in theory: I'm using a pure upload to upload documents and update a database at the same time. If the user chooses not to upload a file (ie leaves the file field blank), I want to either keep the database the same, or insert some other text if the field for that record is currently blank. It appears that you can't just request the file field ("PictureLocationField", see code below) using "Uploader.Form" when you're uploading from it, as it always returns as blank. Is there a way that I can vary my output depending on whether the user inserts text in this field or notIf type_of_submit = "Amend" Then objRS("ID Number") = IDNumber objRS("Part Name") = PartName objRS("Custodian") = Custodian objRS("Date Last Modified") = UpdateModified objRS("Date Added") = UpdateAdded objRS("Country") = Country objRS("Part Application") = PartApplication If PictureLocationField = "" then If PictureServerPath = "" then objRS("Picture Server Path") = "Images/noimage.jpg" objRS("Picture File") = "noimage.jpg" else objRS("Picture Server Path") = PictureServerPath objRS("Picture File") = PictureFile end If else objRS("Picture Server Path") = UpdatePictureServerPath objRS("Picture File") = UpdatePictureFile end If end If objRS.Update
File uploading   (854 Views)
How to handle file attachments using scripting.filesystemobject I want to build an interface like the file attachments in email services except that i am not using it in a mailing environment or for mails
howto: uploading files - what to do if the filenames are identical?   (760 Views)
Hi I am using Persits' ASPUpload component. While it works fine, I am wondering what to do if two or more files being uploaded share the same file name. When I saw their documentation, it reads something like this...Forcing Unique File Names By default, AspUpload will overwrite existing files in the upload directory. If this is undeable, the component can be configured to generate unique names for the files being uploaded to prevent overwriting existing files in the upload directory. This is done by setting UploadManager's OverwriteFiles property to False before calling Save: Upload.OverwriteFiles = False This property is True by default. To prevent name collisions, AspUpload will append the original file name with an integer number in parentheses. For example, if the file MyFile.txt already exists in the upload directory, and another file with the same name is being uploaded, AspUpload will save the new file under the name MyFile(1).txt. If we upload more copies of MyFile.txt, they will be saved under the names MyFile(2).txt, MyFile(3).txt, etc.But when I store the fileNames in the database, I am storing something like "C:\Upload\MyFile.Jpg".This thanks to the component's Path property.But when saving, if the component changes the filename, i.e, adds a number in paranthesis, how'd I update the database to reflect the value I hope you got my doubt..Can you help me out of this Thank you...RR
problem with uploading   (767 Views)
, Some general question, can encoding affect the way the website uploads stuff because i've changed my encoding from windows 1255 to utf 8 (and alot of other CSS changes + added doctype, but i dont belive that what can cause it) and my uploading page just stopped working, after pressing upload nothing happens, altho on the old files it still works, there's no change at all in the ASP code itself. old page: (ignore the messed up style if u get it, its because i changed the css file and was too lazy to put it back :P ) new page: thanks for the help , just that line: Code: well ill just make the upload proccess go into a different page (yeah, funny after all the hard work i did to reduce the amount of pages, now im gonna need to put them back )
Asp file uploading with   (757 Views)
Hi all, I have been working away all day at a method to upload files to a server. The files will typically be in the range 100-200MB. The method which I have found is good is using, and splitting the incoming data into chunks, with the incoming data coming from a "multipart/formdata" form. Code: totalsize) then chunksize = totalsize end if bytesleft = totalsize set objADO = server.createobject("") objADO.type = 1 counter = 0 do while bytesleft > 0 if (bytesleft < chunksize) then chunksize = bytesleft end if objADO.Write Request.BinaryRead(ChunkSize) objADO.Position = objADO.Size objADO.savetofile "C:\Inetpub\wwwroot\test2\content\response" & counter & ".txt" bytesleft = bytesleft - chunksize counter = counter + 1 loop objADO.close set objFSO = nothing %> Now this works. It splits the incoming data into 128KB chunks, and writes each chunk to a separate file. This keeps down memory usage on the server. Every free upload script I have tried seems to keep the whole file in memory, and the box crashes! But I need, obviously, to be able to save all the data in one file. And does not support an append feature. Is there anyone out there that can help me Cheers for any replies, Bob. p.s. components such as ASPupload aren't an option -- tight budget.
uploading file   (913 Views)
! We want to allow the visitor in our web site sending picture file. Where can i find the applet that offer this service
Question about uploading tables   (752 Views)
My Boss has asked me to find a way to take access tables and upload them to SQL Server via a web interface created by me. Is that possible Does anyone have any leads Thank You!
Error uploading pic aspSmartUpload   (748 Views)
just like in my website user: test Pass: test I have a duplicate website here : lovemods use the same login, edit profile, change picture try and upoad and it shows an error same with ADD PICTURE in small menu top right of site! why is this and how can i fix it J
Help uploading test asp page with sql server 2000 onto webserver   (820 Views)
Hi I've been trying to create a test site - The site uses ASP with VBscript and talks to SQL Server 2000. I was able to complete and test it on my locally on my computer using Microsofts IIS 5.1. The website communicated fine with the database on the webserver/network server However, when I tried to save the site from my local computer to the wwwroot folder in the servers IIS hoping to make the internal site available to here the resulting error comes up when we try to open a page with a recordset connected to the database: - Our Error: - Microsoft OLE DB Provider for ODBC Drivers (0x80040E4D) [Microsoft][ODBC SQL Server Driver][SQL Server]Login failed for user 'AUMBSDDSS\IUSR_AUMBCOMP'. /mysite/htm/test2.asp, line 8 The page calls on an include file Code: From my understanding this was a login error so what I tried to do was change the connection:- Code:
ASP problem with uploading files   (890 Views)
I got a problem when I uploaded a file with the input tag of type file "
Shadow Uploader - preventing user from uploading non image files   (740 Views)
(regarding this thread: Originally Posted by Shadow Wizard this will not save non-image files. as for extension, I fear I didn't understand what you mean - you try to save the file with different extension I disagree. I was able to upload an Excel Spreadsheet with no trouble at all.
web uploading pbm   (813 Views)
hi, i have a some pbm, i developed website, in that i have one two asp pages one page to collect the data's and other is the confirmation page In the local host it runs very well but i uploaded the webpage the datas i collect could not be stored in the access database error: http 405 resource not allowed my project consist 1 index page pages folder (all the static pages, asp pages and access database) images folder i specified path as path1= Server.MapPath ("db1.mdb") can anybody help me out in this
Image uploading help   (716 Views)
hi, need some help in this issue i have used this code earlier and it works fine its giving an error for the first time here is what i do i get some data and images from html page and then upload the images in sql server the format in table is image so i store the image directly in the table and the corresponding data so what i used to do earlier is have a loader.asp file included into my asp page here is the code for the confirm.asp page Code: and here is the code for the loader.asp page which i have included in the confirm.asp page Code: 0 Then Dim binData binData = Request.BinaryRead(Request.TotalBytes) getData binData End If End Sub Public Function getFileData(name) If dict.Exists(name) Then getFileData = dict(name).Item("Value") Else getFileData = "" End If End Function Public Function getValue(name) Dim gv If dict.Exists(name) Then gv = CStr(dict(name).Item("Value")) gv = Left(gv,Len(gv)-2) getValue = gv Else getValue = "" End If End Function Public Function saveToFile(name, path) If dict.Exists(name) Then Dim temp temp = dict(name).Item("Value") Dim fso Set fso = Server.CreateObject("Scripting.FileSystemObject") Dim file Set file = fso.CreateTextFile(path) For tPoint = 1 to LenB(temp) file.Write Chr(AscB(MidB(temp,tPoint,1))) Next file.Close saveToFile = True Else saveToFile = False End If End Function Public Function getFileName(name) If dict.Exists(name) Then Dim temp, tempPos temp = dict(name).Item("FileName") tempPos = 1 + InStrRev(temp, "\") getFileName = Mid(temp, tempPos) Else getFileName = "" End If End Function Public Function getFilePath(name) If dict.Exists(name) Then Dim temp, tempPos temp = dict(name).Item("FileName") tempPos = InStrRev(temp, "\") getFilePath = Mid(temp, 1, tempPos) Else getFilePath = "" End If End Function Public Function getFilePathComplete(name) If dict.Exists(name) Then getFilePathComplete = dict(name).Item("FileName") Else getFilePathComplete = "" End If End Function Public Function getFileSize(name) If dict.Exists(name) Then getFileSize = LenB(dict(name).Item("Value")) Else getFileSize = 0 End If End Function Public Function getFileSizeTranslated(name) If dict.Exists(name) Then temp = LenB(dict(name).Item("Value")) If temp 0 inStrByte = InStrB(currentPos, rawData, separator) mValue = inStrByte - currentPos If mValue > 1 Then value = MidB(rawData, currentPos, mValue) Dim begPos, endPos, midValue, nValue Dim intDict Set intDict = Server.CreateObject("Scripting.Dictionary") begPos = 1 + InStrB(1, value, ChrB(34)) endPos = InStrB(begPos + 1, value, ChrB(34)) nValue = endPos Dim nameN nameN = MidB(value, begPos, endPos - begPos) Dim nameValue, isValid isValid = True If InStrB(1, value, stringToByte("Content-Type")) > 1 Then begPos = 1 + InStrB(endPos + 1, value, ChrB(34)) endPos = InStrB(begPos + 1, value, ChrB(34)) If endPos = 0 Then endPos = begPos + 1 isValid = False End If midValue = MidB(value, begPos, endPos - begPos) intDict.Add "FileName", trim(byteToString(midValue)) begPos = 14 + InStrB(endPos + 1, value, stringToByte("Content-Type:")) endPos = InStrB(begPos, value, ChrB(13)) midValue = MidB(value, begPos, endPos - begPos) intDict.Add "ContentType", trim(byteToString(midValue)) begPos = endPos + 4 endPos = LenB(value) nameValue = MidB(value, begPos, ((endPos - begPos) - 1)) Else nameValue = trim(byteToString(MidB(value, nValue + 5))) End If If isValid = True Then intDict.Add "Value", nameValue intDict.Add "Name", nameN dict.Add byteToString(nameN), intDict End If End If currentPos = lenSeparator + inStrByte Wend End Sub End Class Private Function stringToByte(toConv) Dim tempChar For i = 1 to Len(toConv) tempChar = Mid(toConv, i, 1) stringToByte = stringToByte & chrB(AscB(tempChar)) Next End Function Private Function byteToString(toConv) For i = 1 to LenB(toConv) byteToString = byteToString & Chr(AscB(MidB(toConv,i,1))) Next End Function %> its throwing an error in loader.asp page like this Microsoft VBScript runtime error '800a0005' Invalid procedure call or argument: 'MidB' /store/mainwebsite/Loader.asp, line 134 and line 134 is this one separator = MidB(rawData, 1, InstrB(1, rawData, ChrB(13)) - 1) can someone tell me whats it related with i am uploading 3 images at one time
Help! Problem uploading image into database   (955 Views)
I have created a website where users can place advertisements and upload complementing photos. I have elected to place the advertiser's contact details and advertisement in 1 table in an Access database and the corresponding photo and Account ID in a second linked table. Once the photo is inserted as a BLOB, the advertiser is forwarded to the payments page. The upload page has a form with a file field and a hidden field with the Account ID which as been passed on the previous page by a session variable. The website is hosted on a remote server by my web host. My problem is that the image and the Account ID are not inserted into the database even though the processing page successfully redirects to the payments page. I am new to web programming so I am unsure where my problem lies. The code of the processing page is as follows: