if then virker ikke

try this one:

<%
If (rsSearch.Fields.Item("NFO").Value) <> "" Then

response.write "<img src='nfo.gif' width='13' height='15' border='0' onClick='MM_openBrWindow('nfo/" & "(rsSearch.Fields.Item("NFO").Value)" & "','','scrollbars=yes,resizable=yes,width=500,height=700')' onmouseover='return overlib('View nfo');' onmouseout='return nd();'>"

End If
%>

<%
If (rsSearch.Fields.Item("NFO").Value) <> "" Then

response.write "<img src='nfo.gif' width='13' height='15' border='0' onClick='MM_openBrWindow('nfo/" & (rsSearch.Fields.Item("NFO").Value) & "','','scrollbars=yes,resizable=yes,width=500,height=700')' onmouseover='return overlib('View nfo');' onmouseout='return nd();'>"

End If
%>

Microsoft JScript compilation error '800a03ea'

Syntax error

/games/index.asp, line 314

If (rsSearch.Fields.Item("NFO").Value) <> "" Then
----------------------------------------^

Prøv evt denne:

If NOT (isnull(rsSearch.Fields.Item("NFO").Value) OR (rsSearch.Fields.Item("NFO").Value)="") Then

prøv med Null:
If Not IsNull(rsSearch.Fields.Item("NFO").Value) Then

Ho i ():
If Not IsNull((rsSearch.Fields.Item("NFO").Value)) Then

Microsoft JScript compilation error '800a03ec'

Expected ';'

/games/index.asp, line 314

If NOT (isnull(rsSearch.Fields.Item("NFO").Value) OR (rsSearch.Fields.Item("NFO").Value)="") Then
---^

If (rsSearch.Fields.Item("NFO").Value <> "") Then
  Response.Write( "<img src=""nfo.gif"" width=""13"" height=""15"" border=""0"" onClick=""MM_openBrWindow('nfo/" & rsSearch.Fields.Item("NFO").Value & "','','scrollbars=yes,resizable=yes,width=500,height=700')"" onmouseover=""return overlib('View nfo');"" onmouseout=""return nd();"">" )
End If

får fejl på begge:
Microsoft JScript compilation error '800a03ec'

Expected ';'

/games/index.asp, line 314

If Not IsNull((rsSearch.Fields.Item("NFO").Value)) Then
---^

har du definieret JS eller VB?

<%
If Not IsNull((rsSearch.Fields.Item("NFO").Value)) Then
  Response.Write( "<img src=""nfo.gif"" width=""13"" height=""15"" border=""0"" onClick=""MM_openBrWindow('nfo/" & rsSearch.Fields.Item("NFO").Value & "','','scrollbars=yes,resizable=yes,width=500,height=700')"" onmouseover=""return overlib('View nfo');"" onmouseout=""return nd();"">" )
End If
%>
den får jeg også fejl på

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>

<%@ LANGUAGE=VBSCRIPT %> i toppen tak... :o)

men du bruger VBScript, prøv med:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

2 min - jeg har sat det ind
men det giver en masse andre fejl :)

lige meget hvad jeg sætter ind får jeg fejl:
Microsoft VBScript compilation error '800a0401'

Expected end of statement

/games/index.asp, line 5

var MM_authorizedUsers="";
-------------------------^



KODEN:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../Connections/games.asp" -->
<%
// *** Restrict Access To Page: Grant or deny access to this page
var MM_authorizedUsers="";
var MM_authFailedURL="login.asp";
var MM_grantAccess=false;
if (String(Session("MM_Username")) != "undefined") {
  if (true || (String(Session("MM_UserAuthorization"))=="") || (MM_authorizedUsers.indexOf(String(Session("MM_UserAuthorization"))) >=0)) {
    MM_grantAccess = true;
  }

hvis jeg ændrer den tilbage til Javascript - virker det hele igen...

så har jeg lavet hele lortet om til VB - men linket i koden virker ikke - den åbner ikke et nyt vindue

jeg har brugt denne kode:
<%
If Not IsNull((rsSearch.Fields.Item("NFO").Value)) Then
  Response.Write( "<img src=""nfo.gif"" width=""13"" height=""15"" border=""0"" onClick=""MM_openBrWindow('nfo/" & rsSearch.Fields.Item("NFO").Value & "','','scrollbars=yes,resizable=yes,width=500,height=700')"" onmouseover=""return overlib('View nfo');"" onmouseout=""return nd();"">" )
End If
%>

har det noget med det der VB at gøre at jeg ikke kan få lov til at sætte <!--#include virtual="farveskift.asp" --> ind uden at få fejl

onClick virker ikke - de andre funktionaliteter kører
+ at jeg ikke kan indsætte include filer

dette er koden i include filen:
<%
var farve
var bg
if (farve==1){
  bg ='#F6F6F6';
  farve = farve + 1
}else{
  bg ='#FFFFFF';
  farve = 1
}
%>

den skal bare skifte baggrundsfarven på hver anden række - simpelt - men det virker ikke efter jeg har skiftet til VB

Så skift du hellere tilbage til JavaScript og prøv den her kode:
<%
if (rsSearch.Fields.Item("NFO").value != "") {
  Response.Write( "<img src=""nfo.gif"" width=""13"" height=""15"" border=""0"" onClick=""MM_openBrWindow('nfo/" & rsSearch.Fields.Item("NFO").Value & "','','scrollbars=yes,resizable=yes,width=500,height=700')"" onmouseover=""return overlib('View nfo');"" onmouseout=""return nd();"">" );
}
%>

Ved ikke om man også skrive document.write( istedet for Response.Write( ... Men du må lige prøve dig frem :)

damn - nu har jeg ændret det hele til VB og slettet den gamle Java fil :(

men det virker nu med VB - nu fucker den bare op i baggrundsfarven...

If Farve = 1 Then
  Bg = "#F6F6F6"
  Farve = Farve + 1
Else
  Bg = "#FFFFFF"
  Farve = 1
End if

Den virker fint...

virker den med VB ?

nope