---
title: "Nu funkar det...men nåt annat strular...."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/74179-nu-funkar-det-men-nåt-annat-strular/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "BulletBoyCrime"
published: "2003-04-15T16:48:05.000Z"
updated: "2003-04-23T19:09:08.000Z"
replies: 110
views: 1571
page: 2
pages: 6
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/74179-nu-funkar-det-men-nåt-annat-strular"
---

# Nu funkar det...men nåt annat strular....

_Sida 2 av 6._

## #21 — BulletBoyCrime, 2003-04-16T20:11Z

ah ;)
Tack :birp Hedersprick! :e

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

## #22 — Jesper T, 2003-04-16T20:14Z

Det finns några namn som är reserverade i alla databaser, vilka det är ser lite olika ut beroende på vilken DBMS man har.

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

## #23 — BulletBoyCrime, 2003-04-16T20:15Z

Huh :q
Hur menar du nu, DBMS?
Vilka namn :q :r Sorry, jag skulle gärna sluppit det här inlägget.....

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

## #24 — BulletBoyCrime, 2003-04-16T20:54Z

Jag kan upprepa felmeddelandet:
Kompileringsfel i Microsoft VBScript error '800a0401' 

Slut på programsats förväntas. 

/crimea bay/registered.asp, line 149 

RecSet.INSERT INTO players (\[name\]blablabla....
 \-------------------^
Det står ju slut från programsats väntas, vilket verkar vara felet.
Hur avslutar jag programsatsen?

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

## #25 — solbulle, 2003-04-16T21:33Z

Du blandar vilt i olika kodningssätt.

Du använder dig tydligen inte av den kod som @nders gav dig?
Testa den! Du ska inte ha något recset där.

@nders skrev:
strSQL = "INSERT INTO players...

Ändra till det han visade, sen kanske det är lättare för oss om du visar mer av din kod.

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

## #26 — BulletBoyCrime, 2003-04-17T00:02Z

visst......
\*pust\* jag vet att detta inte är lätt för er men inte för mig heller ;)
ska fixa det...sen lägger jag upp lite kod, ni är ju off nu ändå så det är ingen idé just nu.......

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

## #27 — mrblonde, 2003-04-17T07:58Z

Jag tror du missuppfattat lite hur man gör, man kan inte skriva RecSet.INSERT, finns inget som heter så...

du behöver inget recordset alls.
så här br det typ se ut med connection och allt:

```
set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "din connections sträng till databasen"
strSQL = "INSERT INTO myTabell(myFiled1, myField2) VALUES('" & strängVariabel1 & "', " & IntergerVariable2 & ")"
myConn.Execute strSQL
```

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

## #28 — BulletBoyCrime, 2003-04-17T16:11Z

Har jag använt RecSet.INSERT :q
Fasen vikket misstag i så fall...... :r ska kolla.
För övrigt är det så jag har gjort men det går inte :(

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

## #29 — BulletBoyCrime, 2003-04-17T16:13Z

HOPPLA!
Jag var nog lite trött igår..... :r Tack för att du pekade ut det lilla felet :e

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

## #30 — BulletBoyCrime, 2003-04-17T16:20Z

Nu har jag gjort som det står.....Felmeddelandet ändrades litegranna.........

> Kompileringsfel i Microsoft VBScript error '800a0401' 
> 
> Slut på programsats förväntas. 
> 
> /crimea bay/registered.asp, line 148 
> 
> strSQL = "INSERT INTO players (name, password, title, perk, realname, phone, country, cash, health, curhealth, wepskill, expskill, protect, spyskill, ccskill, hokskill, driskill, druskill, lawskill, energymax, energycur, honor) VALUES ('" & SQLSafeName & "', '" & SQLSafePassword & "', " & SQLSafeTitle & ", " & SQLSafePerk & ", '" & SQLSafeRealname & "', '" & SQLSafePhone & "', '" & SQLSafeCountry & "', " & Cash & ", " & Health & ", " & Curhealth & ", " & wski & ", " & eski & ", " & pski & ", " & sski & ", " & cski & ", " & hski & ", " & dski & ", " & duski & ", " & lski & ", " & enmax & ", " & encur & ", " & honor & ")" Connect.Execute (strSQL)
> \----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------^

Får redigera om det ser förj\*vligt ut........
Men själva "---------^" grejen har blivit längre och pekar på nåt annat. Vad betyder det :q

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

## #31 — solbulle, 2003-04-17T16:23Z

Har du hela strSQL-harangen på en rad i ditt script?
Och sen "Connect.Execute (strSQL) " på en ny rad?

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

## #32 — BulletBoyCrime, 2003-04-17T16:26Z

Nope........Connect.Execute (strSQL) är på samma rad...är detta fel :q

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

## #33 — BulletBoyCrime, 2003-04-17T16:35Z

Nu går det framåt, den sitter på en annan rad, det funkar fint, men nu är detta felet.

> Kompileringsfel i Microsoft VBScript error '800a03f6' 
> 
> 'End' förväntas. 
> 
> /crimea bay/registered.asp, line 186

Här är rad 186:

```
Connect.Close
```

Jag försökte lägga in End bredvid men då kom detta felmeddelande:

> Kompileringsfel i Microsoft VBScript error '800a03ea' 
> 
> Syntaxfel 
> 
> /crimea bay/registered.asp, line 186 
> 
> Connect.Close End
> \--------------^

Kan nån hjälpa mig fixa det här sista nu?
Tack! :e

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

## #34 — Jymdis, 2003-04-17T17:54Z

du har troligtvis en if sats som inte är avslutad nånstans i koden... 
du avslutar if satsen med end if

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

## #35 — BulletBoyCrime, 2003-04-17T17:58Z

jooo.......end if har jag tatt med..
jag lägger upp den koden också.......

```
<%
	If Request.Form("title") = 1 Then
	Response.Write  "Your Title is: Hitman"
	ElseIf Request.Form("title") = 2 Then
	Response.Write  "Your Title is: Spy"
	ElseIf Request.Form("title") = 3 Then
	Response.Write  "Your Title is: Nailer"
	ElseIf Request.Form("title") = 4 Then
	Response.Write  "Your Title is: Pimp"
	ElseIf Request.Form("title") = 5 Then
	Response.Write  "Your Title is: Dealer"
	ElseIf Request.Form("title") = 6 Then
	Response.Write  "Your Title is: Survivor"
	ElseIf Request.Form("title") = 7 Then
	Response.Write  "Your Title is: Driver"
	ElseIf Request.Form("title") = 8 Then
	Response.Write  "Your Title is: Lawyer"
	ElseIf Request.Form("title") = 9 Then
	Response.Write  "Your Title is: Explosives Expert"
	Else
	Response.Write  "You didn´t pick a title."
	End If
	Connect.Close
	%>
```

Är inte detta rätt? Jag har ingen aning :r men det verkar väl rätt, tycker jag iaf även om det inte är det :e

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

## #36 — BulletBoyCrime, 2003-04-17T19:25Z

Eller...? Vad har jag gjort fel då :q

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

## #37 — Jesper T, 2003-04-17T19:35Z

Testa med en select case istället:

```
<%
Dim title
Select case Request.Form("title")
    Case "1"
    title = "Your Title is: Hitman"
	case "2" 
	title = "Your Title is: Spy"
	case "3" 
	title =  "Your Title is: Nailer"
	case "4" 
	title = "Your Title is: Pimp"
	case "5" 
	title = "Your Title is: Dealer"
	case "6" 
	title = "Your Title is: Survivor"
	case "7" 
	title = "Your Title is: Driver"
	case "8" 
	title = "Your Title is: Lawyer"
	case "9" 
	title = "Your Title is: Explosives Expert"
	case Else
	title = "You didn´t pick a title."
End select
Response.Write title
Connect.Close()
%>
```

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

## #38 — Jesper T, 2003-04-17T19:58Z

Annars så kan du alltid göra en trevlig array.

```
function fncTitle()
Dim title, myArray
title=Request.form("title")
myArray=array("**** None *****","Hitman","Spy","Nailer","Pimp","Dealer","Survivor","Driver","Lawyer","Explosives Expert")
fncTitle = myArray(title)
end function
```

 Skrivs ut med: Response.write "Your Title is: "& fncTitle()

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

## #39 — solbulle, 2003-04-17T20:24Z

Fast det egentliga felet är väl egentligen inte i If-satserna?

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

## #40 — Jesper T, 2003-04-17T20:30Z

Nej, men det såg ju så krångligt ut med dom.
Du får nog bifoga din kod eller lägga upp en länk, för det är ju inget fel på den koden du visade.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/74179-nu-funkar-det-men-nåt-annat-strular/page2  
Föregående sida: https://www.webforum.nu/amne/asp/74179-nu-funkar-det-men-nåt-annat-strular.md  
Nästa sida: https://www.webforum.nu/amne/asp/74179-nu-funkar-det-men-nåt-annat-strular/page3.md