Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Connection i en connection

Postades av 2003-01-15 14:54:02 - Christofer Wallér, i forum asp - allmänt, Tråden har 2 Kommentarer och lästs av 371 personer

KAn man lägga en connection i en connection, typ som att ha en tabel i en tabel i HTML? hur skriver man i så fall.

Mvh Christofer


EX:
Connection 1
rs.open 1
Do while not rs.EOF

Connection 2
rs.open 2
rs.close 2

rs.Move next
Loop
rs.close 1


Svara

Sv: Connection i en connection

Postades av 2003-01-15 15:37:49 - Andreas Hillqvist

KAnske detta kan var till hjälp:
<code>
Dim rs1
Dim rs2
Dim Conn1
Dim Conn2

Set Conn1 = Server.CreateObject("ADODB.Connection")
Conn1.Open ""

Set Conn2 = Server.CreateObject("ADODB.Connection")
Conn2.Open ""

Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open "", Conn1

Set rs2 = Server.CreateObject("ADODB.Recordset")

Do Until rs1.EOF
rs2.Open "", Conn2
rs2.Close
Loop

Set rs2 = Nothing

rs1.Close
Set rs1 = Nothing

Con2.Close
Set Con2 = Nothing

Con1.Close
Set Con1 = Nothing
</code>


Svara

Sv: Connection i en connection

Postades av 2003-01-15 16:08:46 - Christofer Wallér

Jag har lagt in koden, men jag vet inte om jag gjort rätt:

:)

Här kommer min kod.

<code>

<%

distance = Request.Form("distance")
width = Request.Form("width")
ratio = distance/width
Response.Write(ratio)

%>

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<table border="1">



<%
Dim rs1
Dim rs2
Dim Conn1
Dim Conn2

Set Conn1 = Server.CreateObject("ADODB.Connection")
Conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/roos/test dv/test_db.mdb")

Set Conn2 = Server.CreateObject("ADODB.Connection")
Conn2.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/roos/test dv/test_db.mdb")

Set rs1 = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM prodTb WHERE '" & ratio & "' >= throw1 AND '" & ratio & "' <= throw2"
rs1.Open SQL, Conn1, 1, 2

pID = rs("prodID") !!!!!!kan man göra så här!!!!!!

Set rs2 = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM linsTb WHERE prodID = '" & pID & "' AND '" & ratio & "' >= ratio1 AND '" & ratio & "' <= ratio2"

Do Until rs1.EOF
rs2.Open SQL, Conn2, 1, 2
rs2.Close
Loop

Set rs2 = Nothing

rs1.Close
Set rs1 = Nothing

Con2.Close
Set Con2 = Nothing

Con1.Close
Set Con1 = Nothing

%>


!!!!!!Det här vill jag loopa!!!!!

<tr>
<td>
<%=rs("beskrivning")%><br><br>

<%=rs("linsbes")%>

</td>
</TR>

!!!!!!!!till hit !!!!!!!!

</table>
</BODY>
</HTML>

!!!!!!!var stänger jag min connections?!!!!!!!!

</code>


Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 812
27 960
271 761
510
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies