/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Flytte data fra en database til en anden
Fra : Lars Ridder


Dato : 07-08-03 13:36

Hvordan flytter/kopierer man en række i en Microsoft Access-database til en
anden ved hjælp af ASP?
Kan man åbne forbindelse til to databaser samtidig og hvad er syntaksen?
Er der nogen, der har et eksempel på det?
Jeg har kigget forgæves efter det på http://html.dk.

Mvh,
Lars Ridder



 
 
Lars Ridder (07-08-2003)
Kommentar
Fra : Lars Ridder


Dato : 07-08-03 13:57

Jeg har forsøgt at kopiere fra en tabel til en anden tabel i samme database
med nedenstående kode uden held. Men det ideelle vil være at kopiere til en
anden database

<%

Set Conn = Server.CreateObject("ADODB.Connection")

DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "

DSN = DSN & "DBQ=" & Server.MapPath("/cgi_bin/Database.mdb")

Conn.Open DSN

' SQL forespørgsel

strSQL = "INSERT into Tabel1 (fornavn, efternavn, adresse, postnr, town,
land, email, telefonnr, mobilnr, type, dato)"

strSQL = "Values('"

' SQL forespørgsel

strSQL = "Select * from Tabel2 Where Id=" & Request.Querystring("id")

Set rs = Conn.Execute(strSQL)

strSQL = rs("fornavn") & "," & rs("efternavn") & "," & rs("adresse") & "," &
rs("postnr") & "," & rs("town") & "," & rs("land") & "," & rs("email") & ,"
& rs("telefonnr") & "," & rs("mobilnr") & "," & rs("type") & "," &
rs("dato")

strSQL = "')"

objConnection.Execute(strSQL)

' Luk databaseforbindelse

Conn.Close

Set Conn = Nothing

%>



Jørn Andersen (08-08-2003)
Kommentar
Fra : Jørn Andersen


Dato : 08-08-03 00:06

On Thu, 7 Aug 2003 14:57:00 +0200, "Lars Ridder" <ridder@e-privat.dk>
wrote:

>strSQL = "')"
>
>objConnection.Execute(strSQL)

Den går nok ikke. Prøv i stedet med:

strSQL = strSQL & "')"

- hele vejen igennem.

--
Jørn Andersen,
Brønshøj

Lars Ridder (08-08-2003)
Kommentar
Fra : Lars Ridder


Dato : 08-08-03 01:45


"Jørn Andersen" <jorn@jorna.dk> wrote in message
news:uom5jvcagae8fc1ln40dveudgs7f3383qb@4ax.com...
> On Thu, 7 Aug 2003 14:57:00 +0200, "Lars Ridder" <ridder@e-privat.dk>
> wrote:
>
> >strSQL = "')"
> >
> >objConnection.Execute(strSQL)
>
> Den går nok ikke. Prøv i stedet med:
>
> strSQL = strSQL & "')"
>
> - hele vejen igennem.
>
> --
> Jørn Andersen,
> Brønshøj

Jeg har forsøgt med at sætte
strSQL = strSQL
i alle mulige kombinationer og jeg får den samme fejl i næsten alle
situationer:
Microsoft VBScript runtime error '800a01a8'

Object required: 'objConnection'

/Administrator/Flyttest.asp, line 34

I nogle kombinationer kommer der syntaks-fejl i stedet.

Men i øvrigt mangler jeg stadig at få svar på, om man kan flytte/kopiere fra
én database til en anden, og ikke blot til en anden tabel i samme database.
Man skulle tro, jeg ikke var den første, der havde brug for det...

Lars Ridder



Ukendt (08-08-2003)
Kommentar
Fra : Ukendt


Dato : 08-08-03 07:00


>
> Jeg har forsøgt med at sætte
> strSQL = strSQL
> i alle mulige kombinationer og jeg får den samme fejl i næsten alle
> situationer:
> Microsoft VBScript runtime error '800a01a8'
>
> Object required: 'objConnection'
>
> /Administrator/Flyttest.asp, line 34

du bhar ikke defineret objConnection som du kalder Conn

>
> I nogle kombinationer kommer der syntaks-fejl i stedet.
>
> Men i øvrigt mangler jeg stadig at få svar på, om man kan flytte/kopiere
fra
> én database til en anden, og ikke blot til en anden tabel i samme
database.
> Man skulle tro, jeg ikke var den første, der havde brug for det...
>
> Lars Ridder
>
>



Ukendt (07-08-2003)
Kommentar
Fra : Ukendt


Dato : 07-08-03 16:31


"Lars Ridder" <ridder@e-privat.dk> skrev i en meddelelse
news:bgth8o$1gu1$1@jarjarbinks.mobilixnet.dk...
> Hvordan flytter/kopierer man en række i en Microsoft Access-database til
en
> anden ved hjælp af ASP?
> Kan man åbne forbindelse til to databaser samtidig og hvad er syntaksen?
> Er der nogen, der har et eksempel på det?
> Jeg har kigget forgæves efter det på http://html.dk.
>
> Mvh,
> Lars Ridder
>
>

jeg har lige være ovre i dk.edb.databse hvor der for ikke så lang tid siden
blev spurgt om det samme og her er svaret så.

INSERT INTO `tabel2` (tal, tid, text)
SELECT tal, tid, text
FROM `tabel`

I stedet for tal, tid, text mener jeg man kan bruge *



Sven Arne Steffensen (24-08-2003)
Kommentar
Fra : Sven Arne Steffensen


Dato : 24-08-03 22:01

Lars Ridder wrote in dk.edb.internet.webdesign.serverside.asp:
> Hvordan flytter/kopierer man en række i en Microsoft Access-database til en
> anden ved hjælp af ASP?
> Kan man åbne forbindelse til to databaser samtidig og hvad er syntaksen?
> Er der nogen, der har et eksempel på det?

Lars
Selvfølgelig kan man det.

Her er den jeg bruger. Den bruger samme database, men 2 forskellige tabeller.
Hvis du tilføjer en ekstra DB connection kan du sagtens overføre til en anden
DB.
Den record der overføres får jeg information om fra en formular der trigger
selve overførslen.

Dim Connect, Database, Rekord, Liste, Liste1
<!-- Forbinde mig til databasen -->
Set Connect = Server.CreateObject("ADODB.Connection")
Database = "DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" &
Server.MapPath("Medlemmer.mdb") & "; PWD=kodeord"
Connect.Open(Database)
Liste1 = ("SELECT * FROM Medlemmer WHERE Medlemsnummer = " &
Request.Form("Medlemsnummer") & ";")
SET Liste = Connect.Execute(Liste1)
<!-- Her slutter forespørgsel-->
<!-- Her bygges outputlisten op-->
Rekord = "Insert into Medlemmer2003 (Medlemsnummer, Fornavn, Efternavn,
Adresse1, Postnr, Fdag, Telefon) values ('" & Liste("Medlemsnummer") & "','" &
Liste("Fornavn") & "','" & Liste("Efternavn") & "','" & Liste("Adresse1") &
"','" & Liste("Postnr") & "','" & Liste("Fdag") & "','" & Liste("Telefon") &
"');"
Connect.Execute(Rekord)
Connect.Close
Set Connect = Nothing

God fornøjelse.
Sven Arne

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408934
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste