---
title: "Överför id redan från början?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/59700-överför-id-redan-från-början"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "medialabs"
published: "2002-11-19T17:40:48.000Z"
updated: "2002-11-19T18:33:39.000Z"
replies: 8
views: 196
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/59700-överför-id-redan-från-början"
---

# Överför id redan från början?

## #1 — medialabs, 2002-11-19T17:40Z

är det möjligt att när jag lägger in en kund i tabellen kundregister så skulle jag vilja att id från kundregister ska sättas in i id i tabellen projekthantering. 

Går detta att ställa in i access databasen?

Permalänk: https://www.webforum.nu/p/59700

## #2 — trexter.com, 2002-11-19T17:58Z

Eftersom detta görs med en SQL-sträng så tror jag inte att det går i Access eftersom det inte har stored procedures (rätta mig jag har fel på något sätt, kan jag mycket väl ha, har aldrig sett en SQL Server ens).

Kör med @@identity i ditt ASP-dokument i stället!

 :)

Permalänk: https://www.webforum.nu/p/860594

## #3 — medialabs, 2002-11-19T17:59Z

Och hur ska denna kod se ut? har faktiskt inte en susning.

Permalänk: https://www.webforum.nu/p/860595

## #4 — trexter.com, 2002-11-19T18:00Z

Jag sökte på @@identity och fick bland annat upp en tråd du skrivit. ;)

Permalänk: https://www.webforum.nu/p/860596

## #5 — medialabs, 2002-11-19T18:00Z

> **trexter.com skrev:**
>
> Jag sökte på @@identity och fick bland annat upp en tråd du skrivit. ;)

 :o

Permalänk: https://www.webforum.nu/p/860598

## #6 — trexter.com, 2002-11-19T18:02Z

<http://www.webforum.nu/showthread.php?s=&threadid=57264&highlight=%40%40identity>

Finns andra trådar också som behandlar ämnet mer specifikt.

 :)

Permalänk: https://www.webforum.nu/p/860601

## #7 — Palleman, 2002-11-19T18:03Z

<http://www.webforum.nu/showthread.php?s=&postid=455338#post455338>

Permalänk: https://www.webforum.nu/p/860605

## #8 — medialabs, 2002-11-19T18:09Z

ok, detta är en kod jag använder för att sätta in data i databasen.
Hur ska jag sätta in koden:
Då all info som jag skickar går till tabellen: kundregister, men gur får jag id:n att sättas in i tabellen: projekthantering 

```
q = "insert into tbluppgifter(kolumnnamn) values('" & _ 
data1 & "')"
connect.execute q,,128
set rs = connect.execute("select @@identity")
q = "insert into tblclient(id,kolumnamn) values (" &_
rs(0) & ",'" & data2 & "')"
connect.execute q,,128
```

 

```
<!-- #include file = "../inc/adovbs.inc" -->

<%
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("intranet.mdb") 
Set RecSet = Server.CreateObject("ADODB.Recordset") 

SQL = "Select * From kundregister" 
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic 

RecSet.AddNew

RecSet("Foretagsnamn") = Request.Form("Foretagsnamn")
RecSet("Kontaktperson") = Request.Form("Kontaktperson")
RecSet("E-postadress") = Request.Form("E-postadress")
RecSet("Avdelning") = Request.Form("Avdelning")
RecSet("personnr") = Request.Form("personnr")
RecSet("tele") = Request.Form("tele")
RecSet("adress") = Request.Form("adress")
RecSet("Postnummer") = Request.Form("Postnummer")
RecSet("stad") = Request.Form("stad")
RecSet("kontaktefternamn") = Request.Form("Kontaktefternamn")
RecSet("Anteckningar") = Request.Form("Anteckningar")

RecSet.Update 

RecSet.Close 
Connect.Close 
Set RecSet = nothing 
Set Connect = nothing 

Response.Redirect "index.asp"
%>
```

Permalänk: https://www.webforum.nu/p/860616

## #9 — Palleman, 2002-11-19T18:33Z

Så här någonting..

```
[RED]<%

strForetNamn = trim(Request.Form("Foretagsnamn"))
strKonPerson = trim(Request.Form("Kontaktperson"))
strEpost = trim(Request.Form("E-postadress"))
strAvdelning = trim(Request.Form("Avdelning"))
intPersonr = trim(Request.Form("personnr"))
intTele = trim(Request.Form("tele"))
strAdress = trim(Request.Form("adress"))
intPostnr = trim(Request.Form("Postnummer"))
strStad = trim(Request.Form("stad"))
strKontakEnamn = trim(Request.Form("Kontaktefternamn"))
strAnteck = trim(Request.Form("Anteckningar"))

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("intranet.mdb")

    SQL = "INSERT INTO kundregister "
    SQL = SQL & "(Foretagsnamn, Kontaktperson, E-postadress, Avdelning, tele, adress, Postnummer, stad, kontaktefternamn, Anteckningar) "
    SQL = SQL & "VALUES('"& strForetNamn &"','"& strKonPerson &"','"& strEpost &"','"& strAvdelning &"','"& intPersonr &"','"& intTele &"','"& strAdress &"','"& strPostnr &"','"& strStad &"','"& strKontakEnamn &"','"& strAnteck &"')"
    Connect.Execute SQL,,128

    Set RecSet = Connect.Execute("select @@identity")

    intID = RecSet(0)
    RecSet.Close : Set RecSet = Nothing
    
    '// Spara ID´t i nästa tabell
    Connect.Execute("INSERT INTO projekthantering (ID) VALUES("& intID &")"),,128

Connect.Close = Set Connect = Nothing

%>[/RED]
```

Permalänk: https://www.webforum.nu/p/860630

---

Tråden på webben: https://www.webforum.nu/amne/asp/59700-överför-id-redan-från-början