---
title: "kört fast igen :("
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10911-kört-fast-igen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "aleborg"
published: "2001-08-03T10:14:00.000Z"
updated: "2001-08-03T14:26:00.000Z"
replies: 4
views: 189
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/10911-kört-fast-igen"
---

# kört fast igen :(

## #1 — aleborg, 2001-08-03T10:14Z

Jag har en kod som ser ut så här:

```
If Request.QueryString("save")<>"" Then
saSQL="Select* From MarkDown Where MDownID="& Request.QueryString("save")
Set sa= Conn.Execute(saSQL)

paSQL="Select * From MarkPaDown Where DownID="& sa("MDownBel")
Set path=Conn.Execute(paSQL)

pat= showCat2(path("DownBel")) & path("DownUrl") &"\"& sa("MDownUrl") &"\"

Function showCat2(uid)
sSQL="SELECT * FROM MarkPaDown Where DownID='"& uid &"'"
Set tac=Conn.Execute(sSQL)
Do Until tac.EOF
		Response.Write(showCat2(tac("DownBel")))&"\"&(tac("DownUrl") & "\")
tac.moveNext
Loop
tac.Close
Set tac=Nothing
End Function
path.Close
Set path=Nothing
sa.Close
Set sa=Nothing

'On Error Resume Next

Set objUpload = Server.CreateObject ("Dundas.Upload.2")
	
	objUpload.UseUniqueNames = FALSE
	objUpload.Save  "C:\85743759834\wwwroot\virtual downloads\2b\markdownload\"& pat
```

det konstiga är att en response.write av objUpload.Save blir:

\\kat1\\C:\\85743759834\\wwwroot\\virtual downloads\\2b\\markdownload\\kat2\\kat3\\ 

När det ska va:
C:\\85743759834\\wwwroot\\virtual downloads\\2b\\markdownload\\kat1\\kat2\\kat3\\

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

## #2 — Scarf, 2001-08-03T13:56Z

```
Dim Drive
If Request.QueryString("save")<>"" Then
saSQL="Select* From MarkDown Where MDownID="& Request.QueryString("save")
Set sa= Conn.Execute(saSQL)
paSQL="Select * From MarkPaDown Where DownID="& sa("MDownBel")
Set path=Conn.Execute(paSQL)

pat= showCat2(path("DownBel")) & path("DownUrl") &"\"& sa("MDownUrl") &"\"

Function showCat2(uid)
sSQL="SELECT * FROM MarkPaDown Where DownID='"& uid &"'"
Set tac=Conn.Execute(sSQL)
Do Until tac.EOF
Response.Write(showCat2(tac("DownBel")))&"\"&(tac("DownUrl") & "\")
tac.moveNext
Loop
tac.Close
Set tac=Nothing
End Function
path.Close
Set path=Nothing
sa.Close
Set sa=Nothing

'On Error Resume Next

Set objUpload = Server.CreateObject ("Dundas.Upload.2")

objUpload.UseUniqueNames = FALSE
objUpload.Save "C:\85743759834\wwwroot\virtual downloads\2b\markdownload\"& pat
Drive = "C:"
Response.Write Drive & objUpload.Save
```

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

## #3 — aleborg, 2001-08-03T14:07Z

förstår inte riktigt vad det skulle göra för någon skillnad!

Problemet ligger tydligen i att man inte kan lägga funktion i en sträng på det sättet, men jag vet inte hur jag ska lösa det :(

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

## #4 — Scarf, 2001-08-03T14:18Z

Det gör att det blir
**C:**\\85743759834\\wwwroot\\virtual downloads\\2b\\markdownload\\kat1\\kat2\\kat3\\
eftersom variabeln Drive innehåller värdet "C:"
Det löser ju hela ditt Response.Write problem

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

## #5 — aleborg, 2001-08-03T14:26Z

nja, inte riktigt, eftersom problemet var att kat1 hamnade före C:

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10911-kört-fast-igen