--- title: "ang. flytta data från tabell till annan tabell" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/123461-ang-flytta-data-från-tabell-till-annan-tabell/page2" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "cyeclone" published: "2005-03-01T12:52:36.000Z" updated: "2005-04-04T08:23:57.000Z" replies: 34 views: 1086 page: 2 pages: 2 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/123461-ang-flytta-data-från-tabell-till-annan-tabell" --- # ang. flytta data från tabell till annan tabell _Sida 2 av 2._ ## #21 — devotion, 2005-03-03T19:10Z :) Det vet inte jag... Jag litar på @nders... Kanske finns bättre sätt att göra! mvh Permalänk: https://www.webforum.nu/p/1565322 ## #22 — cyeclone, 2005-03-03T21:19Z @nders, jag är inte riktig hajj på det där med IDENTITY. Skulle vara snällt om någon kunnde göra ett exepel eller hjälpa mig lite. min nuvarande kod, behöver hjälp med att hämta sen sista postens "OrderID" i tabellen "Best" och sedan göra den till variabel eller session. ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(" "&databas&" ") Set RecSet = Server.CreateObject("ADODB.Recordset") lol = "Select * FROM Best" RecSet.Open lol, Connect, 1, 3 RecSet.addnew Recset("KID") = Session("KID") RecSet("Datum") = Time() RecSet.Update RecSet.Close %> <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(" "&databas&" ") Set RecSet = Server.CreateObject("ADODB.Recordset") connect.execute "insert into bestallning(PID, ProduktNamn, Pris, Antal, KID, OrderID) " & _ "select k.PID, k.ProduktNamn, k.Pris, k.Antal, k.KID, " & session("OrderID") & " from kundvagn k" & _ " where k.KID = " & session("KID"),,128 connect.execute "delete from kundvagn " & _ " where KID = " & session("KID"),,128 session("kundmess") = "Din beställning är nu skickad." Response.Redirect "index.asp?page=kundvagn" %> ``` Permalänk: https://www.webforum.nu/p/1565367 ## #23 — devotion, 2005-03-03T21:30Z :) Men.... Är det inte det du frågar om Så här har jag gjort: ``` <% Dim strSQL, orderDate, userId, customer, lngID customer = Replace(Request.querystring("customer"), "'", "''") orderDate = Date Set objConn = Server.CreateObject("ADODB.Connection") objConn.ConnectionString = "DSN=IntranetSydostel" objConn.Open strSQL="INSERT INTO tblOrder (orderName, orderDate, userId) VALUES ('" & customer & "', #" & orderDate & "#, " & session("userId") & ")" objConn.execute(strSQL),,128 strSQL = "SELECT @@IDENTITY" set objRS = objConn.execute(strSQL) lngID = objRS(0) strSQL="INSERT INTO tblOrderArticle(eNumber, articleName, quantity, orderId)SELECT eNumber, articleName, quantity, " & lngID & " FROM tblCart WHERE userId = " & session("userId") &"" objConn.execute(strSQL),,128 strSQL="DELETE FROM tblCart WHERE userId = " & session("userId") & "" objConn.execute(strSQL),,128 objRS.Close Set objRS = Nothing objConn.Close Set objConn = Nothing %> ``` mvh Permalänk: https://www.webforum.nu/p/1565373 ## #24 — cyeclone, 2005-03-03T21:40Z devotion du har iaf inte fått detta bakom bakfoten som mig :) Tackar för ditt exempel! Nu hoppas jag att det inte ska vara några mer problem innan hela webshopen fungerar :D Ha det bra alla! mvh rickard EDIT: ``` strSQL = "SELECT @@IDENTITY" set objRS = objConn.execute(strSQL) lngID = objRS(0) ``` Hur får denna kod fram att jag vill ha kolumnen "OrderID"´s nyaste post? bara undrar :P Permalänk: https://www.webforum.nu/p/1565374 ## #25 — devotion, 2005-03-03T21:45Z :) Det vet jag inte... @nders sa det... ;) Det fungerar i a f Finns det någon som vet mer får ni gaärna förklara! Mvh Permalänk: https://www.webforum.nu/p/1565376 ## #26 — cyeclone, 2005-03-03T21:56Z mjo, jag har inte testat än :) men jag hittar ingen förklarning på hur den skall fatta att jag menar "OrderID" så devotion du håller alltså på med en webshop ? :D kommit en bit eller? mvh, rickard Permalänk: https://www.webforum.nu/p/1565378 ## #27 — Jesper T, 2005-03-03T21:57Z > Hur får denna kod fram att jag vill ha kolumnen "OrderID"´s nyaste post? Det får du om du kör den direkt efter din insert till tabellen. Om orderID är primary index villsäga. Permalänk: https://www.webforum.nu/p/1565380 ## #28 — devotion, 2005-03-03T22:00Z :) En typ av webshop kan man säga. Mycket likheter finns... En närmare beskrivning i denna tråd Jesper T hade svaret! mvh Permalänk: https://www.webforum.nu/p/1565381 ## #29 — zeb, 2005-04-04T07:09Z Använder den här tråden... Kan man samtidigt som man lägger in datan från den andra tabellen, lägga in något från exempelvis en session eller querystring i samma fråga? Permalänk: https://www.webforum.nu/p/1583997 ## #30 — @nders, 2005-04-04T07:15Z Jo, det borde gå fint. Hur ser din fråga ut? Permalänk: https://www.webforum.nu/p/1584002 ## #31 — zeb, 2005-04-04T07:55Z Så här: ``` "INSERT INTO tblOrder (order_usrID,order_ordernr,order_prodID,orderProdName,orderProdPrice,orderProdSinglePrice,orderProdItems) SELECT cart_usrID,cart_sessionID,cart_prodID,cartProdName,cartProdPrice,cartProdSinglePrice,cartProdItems FROM tblCart where cart_sessionID = " & session.SessionID ``` vill lägga in order_usrID från en querystring istället för att kopiera den ifrån den andra tabellen. Permalänk: https://www.webforum.nu/p/1584012 ## #32 — @nders, 2005-04-04T07:58Z ``` iUserID = replace(Request.Querystring("userid"), "'", "''") strSQL = "INSERT INTO tblOrder (order_usrID, order_ordernr, order_prodID, orderProdName, orderProdPrice, orderProdSinglePrice, orderProdItems) " & _ "SELECT " & iUserID & ", cart_sessionID, cart_prodID, cartProdName, cartProdP rice, cartProdSinglePrice, cartProdItems FROM tblCart where cart_sessionID = " & session.SessionID ``` Permalänk: https://www.webforum.nu/p/1584014 ## #33 — zeb, 2005-04-04T07:59Z Vielen dank! Permalänk: https://www.webforum.nu/p/1584015 ## #34 — @nders, 2005-04-04T08:00Z Radbrytningarna här i forumet blir konstiga, så de får du pilla till. mvh Permalänk: https://www.webforum.nu/p/1584016 ## #35 — zeb, 2005-04-04T08:23Z Yes. Det fungerade alldeles utmärkt. Permalänk: https://www.webforum.nu/p/1584020 --- Tråden på webben: https://www.webforum.nu/amne/asp/123461-ang-flytta-data-från-tabell-till-annan-tabell/page2 Föregående sida: https://www.webforum.nu/amne/asp/123461-ang-flytta-data-från-tabell-till-annan-tabell.md