01. december 2003 - 11:23Der er
7 kommentarer og 1 løsning
nogen forslag til hvordan dette eller kunne gøres ?
Jeg har denne sub, virker fint, men det må da på en måde kunne gøres i selve sql'en så jeg slipper for at hente alle poster, og så betinge...
Sub GetArchive() Dim Sql, Conn, Rs Sql = "SELECT * FROM meddelelseData"
Set Conn = Connect() Set Rs = Conn.Execute(Sql)
Do While Not Rs.Eof '********************************** If Year(Rs("meddelelseDato")) = Request("y") Then '********************************** Response.Write("<div style=""width: 320px; margin-bottom: 100px;"">")
Response.Write(AlignRight(GetImage(Rs("meddelelseBillede")))) Response.Write(H3(Rs("meddelelseTitel"))) Response.Write(Div(Rs("meddelelseDato"))) Response.Write(Div(Rs("meddelelseHoved"))) Response.Write(Div(Rs("meddelelseIndhold"))) Response.Write("</div>") End If Rs.MoveNext() Loop
Conn.Close Set Conn = Nothing Set Rs = Nothing End Sub
Skal virksomheder stå stærkere mod angreb og kunne udvikle sig, skal sikkerhed, drift og forretning tænkes sammen. Det er tanken bag Jysk IT’s ambition om at skabe en “sikker fremtid” for kunderne.
ok jeg prøvede selv den ting jeg ikke regnede med virkede... Sub GetArchive() Dim Sql, Conn, Rs Sql = "SELECT * FROM meddelelseData WHERE Year(meddelelseDato)="&CInt(Request("y"))
Set Conn = Connect() Set Rs = Conn.Execute(Sql)
Do While Not Rs.Eof '********************************** 'If Year(Rs("meddelelseDato")) = CInt(Request("y")) Then '********************************** Response.Write("<div style=""width: 320px; margin-bottom: 100px;"">") Response.Write(AlignRight(GetImage(Rs("meddelelseBillede")))) Response.Write(H3(Rs("meddelelseTitel"))) Response.Write(Div(Rs("meddelelseDato"))) Response.Write(Div(Rs("meddelelseHoved"))) Response.Write(Div(Rs("meddelelseIndhold"))) Response.Write("</div>") 'End If Rs.MoveNext() Loop
Conn.Close Set Conn = Nothing Set Rs = Nothing End Sub
det virker men forekommer mig underligt at jeg bare sådan uden videre kan bruge vbscript midt i min sql.....det troede jeg ikke kunne lade sig gøre...
Du bygger jo SQL-strengen op som du gør med en hvilken som helst anden tekststreng - for det er jo bare det, den er, en tekststreng. Når den bliver modtaget er den fortolket, så det er ikke noget problem.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.