18 messaggi dal 27 maggio 2013
L'errore che segnala è:

Microsoft VBScript runtime error '800a0005'

Invalid procedure call or argument

/../copiaDb.asp, line 7
311 messaggi dal 08 gennaio 2011
Ho fatto una prova sun uno spazio web Aruba ed è andato tutto ok.

Ho usato una pagina aspx modello code-behind denominata WebForm1.aspx.

Dopo aver compilato il progetto in VisualStudio ho copiato nella cartella bin di Aruba la dll frutto della compilazione che nel mio caso si chiamava WebApplication3.dll, la pagina aspx di cui sopra nella root, nella cartella mdb-database, due file mdb, denominati DbVuoto.mdb e DbPieno.mdb.

La pagina WebForm1.aspx è dotata di un Button che quando clickato chiama una sub che compie il lavoro.
Questo il codice VB lato server :

Public Class WebForm1
Inherits System.Web.UI.Page
Dim Percorso As String = ""
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Percorso = Server.MapPath("Webform1.aspx").Replace("Webform1.aspx", "")
End Sub
Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
CopiaDB()
End Sub
Private Sub CopiaDB()
Rename(Percorso + "mdb-database\Dbpieno.mdb", Percorso + "mdb-database\DbSalvatoAnno2014.mdb")
FileCopy(Percorso + "mdb-database\DbVuoto.mdb", Percorso + "mdb-database\Dbpieno.mdb")
End Sub
End Class


Al primo click l'operazione viene compiuta. Click successivi danno errore perché il file DbSalvatoAnno2014.mdb è già presente.

Per evitare ciò si può controllare prima l'esistenza del file.

Ciao.
Modificato da Mario Formosa il 14 agosto 2014 11.41 -
18 messaggi dal 27 maggio 2013
Ci sono riuscita utilizzando il seguente codice

<%

nomenuovo = server.MapPath("/mdb-database/calcio14.mdb")

nomevecchio = server.MapPath("/mdb-database/calcio13.mdb")



Set conn = CreateObject("Scripting.FileSystemObject")

if not conn.FileExists(nomenuovo) then


conn.CopyFile nomevecchio , nomenuovo
response.write"Non esiste"
else
response.write"Esiste"
end if


set conn=nothing



%>

Ho semplicemente invertito l'ordine dei due database.


Grazie mille!

Besy
311 messaggi dal 08 gennaio 2011
Sono contento per il fatto che hai risolto.

Ciao.

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.