type mismatch

[my head]

^{Sub Click(Source As Button)
   
   Dim workspace As New NotesUIWorkspace
   Dim thisdoc As NotesUIDocument   
   
   Dim s As New NotesSession
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Dim view As Notesview
   Dim suchtext As String
   Dim ergebnis As String
   
   Set db =  s.CurrentDatabase
   Set thisdoc = workspace.CurrentDocument
   suchtext = thisdoc.fieldgettext("eingabe")
   Set view = db.getview("alle")
   Set doc = view.getfirstdocument
   
   Do Until (doc Is Nothing)
      If doc.getitemvalue("name")=suchtext Then
         ergebnis=ergebnis+doc.getitemvalue("name")
      End If
      Set doc=view.getnextdocument(doc)
   Loop
   
   Call thisdoc.fieldsettext("ergebnis",ergebnis)
   
End Sub}


alle felder sind textfelder

warum gibt's hier nen "type mismatch"

[jofa]

Hi,

in welcher Zeile kommt der Fehler ?

Gruss JoFa

[Doc Torte]

ergebnis=ergebnis+doc.getitemvalue("name")


das ganze solltest Du mit einem "&" verknüpfen !

[my head]

der Fehler ist in dieser Zeile:


^{If doc.getitemvalue("name")=suchtext Then}


@doc
danke für den hinweis

[Till_21]

du kannst es ruhig mit + verknüpfen...
aber kein array !!!

valueArray = notesDocument.GetItemValue( itemName$ )

probiers mit ->
ergebnis=ergebnis+doc.getitemvalue("name")(0)
!!!


gruss

[Doc Torte]

der Fehler ist in dieser Zeile:


^{If doc.getitemvalue("name")=suchtext Then}

dann solltest du das so einsetzen

If doc.GetItemValue("Name")(0) = suchtext then

[my head]

jetzt hab ich noch frage...

doc.getitemvalue("name")(0)=suchtext

wie findet er auch Teilstrings, also
suchtext = mann
doc.getitemvalue("name")(0) = Hermann

als richtig!!??!!

geht das??

[Doc Torte]

jetzt hab ich noch frage...

doc.getitemvalue("name")(0)=suchtext

wie findet er auch Teilstrings, also
suchtext = mann
doc.getitemvalue("name")(0) = Hermann

als richtig!!??!!

geht das??

um in Strings Zeichen zu suchen kann man das coding verwenden :

If Not Instr(xMailAddress , "@") = 0 Then
' "@" is found in xMailAddress

hier kannst Du die Verarbeitung reinsetzen

End if

so suche ich in der eingegebenen e-mailadresse das @ !
setze einfach deine variablen ein, dann sollte das laufen.

[my head]

danke, danke... aber ein kleines prob hab ich noch

wenn ich den code um folgendes erweitere:


^{If Not Instr(doc.getitemvalue("name")(0) , suchtext) = 0 Then
         count =count+1         
         ergebnis = ergebnis + doc.getitemvalue("tel")(0)
End If}


und nach reinen zahlen suche, findet er nichts...
das eingabefeld ist ein textfeld, und das tel-Feld auch und beide hab ich nochmal mit @text bearbeitet...

trotzdem nix! warum??

[my head]

sorry, vergesst es...

funktioniert doch!!!!!

[Doc Torte]

wichtig ist, das alle Werte Strings sind !


ansonsten im Script konvertieren ! ( Cstr(xyz) )

[my head]

doch noch ne kleinigkeit!?!

bräuchte das ganze ohne beachtung von gross- und kleinschreibung!!

[ata]

Lcase()  und Ucase() wandeln in Groß und Kleinschreibung..


ata

[my head]

es gibt aber nix, dass er die groß-und kleinschreibung nicht beachtet,oder??

[ata]

... wäre mir nichts bekannt...

ata

[my head]

hab jetzt alle werte mit ucase und strconv so formatiert, dass es funktioniert...

[my head]

der button hinter dem der code liegt, ist im web unsichtbar! warum??

[ata]

... LotusScript wird in Web-Buttons nicht unterstützt, daher wird der Button von Domino ignoriert...

ata