--- title: "kopiera data i en databas" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/5962-kopiera-data-i-en-databas" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "mikael_a" published: "2000-06-30T07:01:00.000Z" updated: "2000-07-01T07:18:00.000Z" replies: 13 views: 270 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/5962-kopiera-data-i-en-databas" --- # kopiera data i en databas ## #1 — mikael_a, 2000-06-30T07:01Z Hej, jag har en databas i access, som innehåller en massa infomation om kommande filmer. jag sorterar dem där efter vecka. men hur gör jag för att flytta aktuella poster till en ny databas? vecka 27 alla filmer innan vecka 27 skall flyttas till en ny databas som tex heter arkiv. gör det att göra automatiskt? eller måste admin tex trycka på en länk där det sedan frågas efter vilken vecka som skall flyttas? hoppas ni förstår vad jag menar, annars får jag försöka förklara lite mer. Permalänk: https://www.webforum.nu/p/5962 ## #2 — Vide, 2000-06-30T07:14Z Det skall väl gå... jag inte personligen gjort detta... men på nått sätt borde det gå att lösa automatiskt... Först skapar du ett forumlär där du fyller i veckor som skall flyttas... Sedan hämtar du dom veckorna ifrån den första databasen, lägger in det i ett disconnected recordset, och slutligen loopar in koden i den andra databasen... Denna idéologi borde fungera... dock har jag aldrig testat det... Lycka till! :) Permalänk: https://www.webforum.nu/p/244052 ## #3 — mikael_a, 2000-06-30T07:21Z ehmmm ok, det låter nog bra :) synd bara att man inte pratar flytande asp. skulle du kunna (om tid finnes) ge mig ett script som exempel? Permalänk: https://www.webforum.nu/p/244053 ## #4 — Vide, 2000-06-30T07:44Z OK, här är ett litet exempel: ``` '***** kopplar upp sig mot dom båda databaserna *****' Set Databas = Server.CreateObject("ADODB.Connection") MdbFilePath = Server.MapPath("/scripts/databas.mdb") Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";" Set Databas2 = Server.CreateObject("ADODB.Connection") MdbFilePath2 = Server.MapPath("/scripts/databas2.mdb") Databas2.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath2 & ";" '***** tar emot data ifrån formuläret *****' week1 = Request.Form("week1") week2 = Request.Form("week2") '***** Hämtar veckorna mellan week1 och week2 *****' SQL1 = "Select * from table where week > " & week1 & " AND week < " & week2 Set RS = databas1.Execute(SQL1) '***** Loopar igenom posterna *****' Do until RS.EOF kol1 = RS("kol1") kol2 = RS("kol1") kol3 = RS("kol1") '***** Lägger in värden i tabellen table i databas2.mdb *****' SQL2 = "Insert Into table " SQL2 = SQL2 & " (kolumn1, kolumn2, kolumn3)" SQL2 = SQL2 & " VALUES('" & kol1 & "', '" & kol2 & "', '" & kol3 & "')" databas2.Execute(SQL2) RS.MoveNext Loop ``` Permalänk: https://www.webforum.nu/p/244054 ## #5 — Danmagnus, 2000-06-30T09:45Z Sluta nu. kopiera hela skiten direkt med SQL:o .. SELECT \* INTO nytabell FROM tabell. Permalänk: https://www.webforum.nu/p/244055 ## #6 — fredrik, 2000-06-30T12:15Z ...om du inte vill att ngn i administrationen ska behöva klicka på en knapp för att det ska uppdateras kan du ju alltid köra filen på en bestämd tid mha händelsehanteraren i Windows. detta förutsätter dock att du har en egen server. Permalänk: https://www.webforum.nu/p/244056 ## #7 — @nders, 2000-06-30T12:33Z > detta förutsätter dock att du har en egen server. nja. du kan ju schedulera att explorern öppnas till en viss sida som gör jobbet åt dig. Permalänk: https://www.webforum.nu/p/244057 ## #8 — Danmagnus, 2000-06-30T14:23Z vadå , det går att göra helt automatiskt utan någon händelsehanterare eller annat tjafs. Att ni alltid ska krångla. gör scriptet me datum, typ (ska vara högst upp på sidan) IF WEEKNUMBERDATE\>"v27" THEN SQL:f-l-y-t-t-a--h-e-l-a--s-k-i-t-e-n END IF alltså även om nån kanske inte loggar in exakt v 27 så spelar det ingen roll eftersom allt flyttas till korrekt plats innan sidan visas. så användaren märker inget även om 1 enda loggar 87 år. Allting flyttas direkt till rätt plats när nån loggar på. Permalänk: https://www.webforum.nu/p/244058 ## #9 — mikael_a, 2000-06-30T15:15Z låter bra, vill du skicka ett exempel hur du menar? Permalänk: https://www.webforum.nu/p/244059 ## #10 — Danmagnus, 2000-06-30T21:05Z Det är förjobbigt. men kolla på mitt självraderande diskussionsforum.. denna är gammal som gatan, så det lte taskigt skriven =) .. som du ser he hee hhaa aha.. det var när man var nybörjare. ``` set postertest=databas.execute("SELECT ID FROM fragor") DO WHILE NOT postertest.eof bakdate=now-30 idfraga=postertest.fields("ID") set posterdate=databas.execute("SELECT datum FROM svar WHERE fragaID=" & idfraga & " ORDER BY datum DESC") IF posterdate.eof=false THEN svardate=posterdate.fields("datum") set posterdate=nothing IF svardate