Svenska ElektronikForumet

> aha, Det ser välldigt konstigt ut,

Gör det ? Tycker inte jag.
Ganska logiskt att varje IF avslutas med en END IF.

Notera att "ELSE IF" är *två* nyckelord, "ELSE" och "IF" (som alltså
början en ny IF-ENDIF sekvens). Och "ELSE" kan ju följas av något helt
annan än "IF", om man vill.

"END IF" är däremot *ett* nyckelord.

EDIT:
Det är ju dessutom alldeles uppenbart varför man *inte* ska
använda IF-ELSEIF-ENDIF på det där sättet...

sodjan: Mjo.. Du har ju rätt, blir rätt logiskt

pern:

Kod: Markera allt

sHref = "<a href=""komihag.asp?ar=2008+manad="...

Varför tar inte den det som att "<a href=" är en sträng, och sen "komihag.asp?..." är en sträng, och då borde det ju bli felmedelande eftersom man inte har något & mellan strängarna? Hoppas du förstår vad jag menar, jag hade problem med det innan att jag inte kunde komma på hur man skriver ett " men Response.Write (eller till variabler).

Ett " startar eller avslutar en sträng, "" i en sträng returnerar " till browsern.

Jag hadde skrivit det hela såhär:

Kod: Markera allt


Function GetMonth(iInMonth)

	Dim sMonth

	Select Case iInMonth
	case 1 
		sMonth = "Jan"
	case 2 
		sMonth = "Feb"
	case 3 
		sMonth = "Mar"
	case 4 
		sMonth = "Apr"
	case 5 
		sMonth = "Maj"
	case 6 
		sMonth = "Jun"
	case 7 
		sMonth = "Jul"
	case 8 
		sMonth = "Aug"
	case 9 
		sMonth = "Sept"
	case 11 
		sMonth = "Okt"
	case 11 
		sMonth = "Nov"
	case 12 
		sMonth = "Dec"
	End Select

	GetMonth = sMonth


End Function



' ------------------------------------------------------------------


Dim sHref

sSql="SELECT DISTINCT in_man FROM komihag where in_ar='2008' ORDER BY in_man"
 
Rs.Open sSQL, Conn

While NOT Rs.EOF

	sHref = "<a href=""komihag.asp?ar=2008&manad=" & Rs("in_man").Value & """>" & GetMonth(Rs("in_man").Value) & "</a> <br/>"
	Response.Write(sHref)
        Rs.MoveNext

Wend


Set Rs = Nothing
Set Conn = Nothing

pern: Okej. Några saker i den koden bara (Ifall någon annan vill använda koden

)
1. Efter Apr saknas ett "
2. Du använder + istället för & i url'en efter ? (querrystring). Det fungerade inte för mig, jag måste ha & där.

Jag läser av det såhär:

Kod: Markera allt

in_man = Request.QueryString("manad").Item	// Skriva ut tabell för vilken månad?
in_ar = Request.QueryString("ar").Item		// Skriva ut tabell? Vilket år?

Edit: Så.. Nu fungerar det fint! Då ska jag bara lägga till så att man kan skriva till databasen också

Såg mina skrivfel . Rent slarv av att skriva snabbt i NotePad

Fixat nu.

Hehe, Jag skriver också alltid i NotePad, det är bara om jag får ett felmedelande så använder jag stoneswebwriter så att jag får rad numrering

Samt ibland blir det fel närman kodar flera språk samtidigt. Man glömmer lätt de små sakerna i brådskan. Just nu kodat jag C#, C++, Vbscript (Server ASP) och Javascript (Client script) samtidigt i olika projekt.

Jag känner igen det problemet..

tex, semikolon som man ska ha efter varje rad i tex. C++.

Jag håller på med:
HTML (såklart..

)
C++
mikroC
ASM (PIC)
PBasic (va ett tag sedan sisst)

Har hållt på lite med:
Vissual Basic
? Basic (nått konstigt till datorer)

och försöker lära mig (läser och labbar med)
ASP (ADO)
PHP
SQL
VBscript
Javascript

och säkert mer som jag har glömt, och såklart alla mänskliga språk också.. Så jag är själv farsinerad över att man facktiskt kan skilja på allt

> Jag skriver också alltid i NotePad,

Jag testade att ladda din kod i UltraEdit-32, och det
ser riktigt snyggt ut. UE32 har inbyggt stöd för många "språk"
så det blir färglagt å så. Betydligt bättre editor än Notepad...

http://www.ultraedit.com/products/ultraedit.html

Jag kommer knappt ihåg alla programmeringsspråk jag kodat i och glömt

Började för måååånga år sen med Basic, Sedan har det ju varit några, typ:

Basic
Assembler (Z80,6502) Är Sinclair ZX Spectrum Fanatiker , fortfarande ...
Pascal (Körde Turbo Pascal sedan v 2.0 till de slutade med den sista versionen. Både under CP/M och DOS)
Delphi
Modula 2
Prolog
VB
Lisp
Java
SQL
C
C++
C#

Dock inte COBOL

PIC programmering är för hobbybruk så det räknar jag inte, men jag gillar mikroC.

Jag kör av gammal vana all ASP i FrontPage, samt allt annat jag kan i Visual Studio 2008

- Edit

Ha, hadde nästan helt lyckats förtränga:

dBase
SuperBase
DataFlex

Ok , nu kan alla gissa ungefär hur gammal jag är

Tidig stenålder känns det som.

Okej, En till fråga nu

. Om jag vill läsa in dagens datum till 3 variabler (År, Mån, Dag), i vilket språk gör man det smidigast? (Har för mig att man kan göra det både i javascript och ASP samt VBscript?) Om man gör det i VBscript eller Javascript så blir det datumen på datorn som man kör det från och om man gör det i ASP så blir det datumen från servern?

http://www.w3schools.com/VBscript/vbscr ... ctions.asp

Kod som körs på servern tar serverns datum osv

pern: Men om man kör det via vbscript (så som du länkade till) då körs väll det från klient datorn, och då tas datumen därifrån? Eller?

ASP körs på servern

Hmm, nu blir jag yr, är det inte VBscriptet som hämtar datumet här, och det körs väll på klienten?

Svenska ElektronikForumet

mysql och asp