Do while not filNavn=objFileItem.name

if x <> x then

kør..

else

ingen ting

end if

Problemet er at det er en streng hentet i db og sammenlignet med Path_INFO:

hvordan er de sammenholdt?? giv lige 1 eksemepl på db streng og path info streng..

UPS den har jeg slettet. Vender tilbage til denne imorgen.

Jeg skal have en løkke ind her:

if InStr(1, "gif,jpg,jpeg,png", LCase(objFSO.GetExtensionName(objFileItem.name))) > 0 then
    Response.write "<a href="
    Response.Write(objFileItem.Name)
    response.write ">"
    Response.Write(objFileItem.Name & "<br>")
    Response.write "</a>"
  Do while not eof
    If filNavn not objFileItem.name Then
    Response.Write ("test do")
    move rs.next
    Loop
    Else
    strSQL = "Insert into bildArkiv (filNavn,dirNavn) values('" & objFileItem.name & "', '"  & filex & "')"
    End if
    Conn.Execute(strSQL)
    End if
Next

Det vil sige, at kun hvis filNavn ikke er det samme som objFileItem.name skal den køre løkken og sætte filnavnet ind i db

Målet er, at kun filer i folderen som ikke eksisterer i db indsættes. Denne kode virker fint:
<%
strPathInfo = Request.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPhysicalPath)
Set objFolder = objFile.ParentFolder
Set objFolderContents = objFolder.Files
For Each objFileItem in objFolderContents
if InStr(1, "gif,jpg,jpeg,png", LCase(objFSO.GetExtensionName(objFileItem.name))) > 0 then
    Response.write "<a href="
    Response.Write(objFileItem.Name)
    response.write ">"
    Response.Write(objFileItem.Name & "<br>")
    Response.write "</a>"
    strSQL = "Insert into bildArkiv (filNavn,dirNavn) values('" & objFileItem.name & "', '"  & filex & "')"
    Conn.Execute(strSQL)
    End if
Next
%>
...men indstætter blot filer i db som eksisterer i folderen.
Laver altså (naturligvis) ikke den nødvendige sellektion

ok jeg lukker