Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: my head am 06.02.03 - 14:11:44
-
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"???
-
Hi,
in welcher Zeile kommt der Fehler ?
Gruss JoFa
-
ergebnis=ergebnis+doc.getitemvalue("name")
das ganze solltest Du mit einem "&" verknüpfen !
-
der Fehler ist in dieser Zeile:
If doc.getitemvalue("name")=suchtext Then
@doc
danke für den hinweis
-
du kannst es ruhig mit + verknüpfen...
aber kein array !!!
valueArray = notesDocument.GetItemValue( itemName$ )
probiers mit ->
ergebnis=ergebnis+doc.getitemvalue("name")(0)
!!!
gruss
-
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
-
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??
-
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.
-
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??
-
sorry, vergesst es...
funktioniert doch!!!!! ;D
-
wichtig ist, das alle Werte Strings sind !
ansonsten im Script konvertieren ! ( Cstr(xyz) )
-
doch noch ne kleinigkeit!?!
bräuchte das ganze ohne beachtung von gross- und kleinschreibung!!
-
Lcase() und Ucase() wandeln in Groß und Kleinschreibung..
ata
-
es gibt aber nix, dass er die groß-und kleinschreibung nicht beachtet,oder??
-
... wäre mir nichts bekannt...
ata
-
hab jetzt alle werte mit ucase und strconv so formatiert, dass es funktioniert...
-
der button hinter dem der code liegt, ist im web unsichtbar! warum??
-
... LotusScript wird in Web-Buttons nicht unterstützt, daher wird der Button von Domino ignoriert...
ata