[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 149
  • Last Modified:

To Mark 2150

Hi,
Yesturday, you showed me how to add text before and after the the actual content.
You also included a neet lil validation for the ".

Todays Question,
using the same code as yesturday, I would need another
validation.
This time, if the parser finds
<img src="the URL">
you delete it.

Thanks.

0
idcjavateam
Asked:
idcjavateam
1 Solution
 
mark2150Commented:
OPEN source_file FOR INPUT AS #1
OPEN result_file FOR OUTPUT AS #2
quote$ = CHR$( 34 )
marker1$ = "<IMG SRC"
head$ = "Key = Key & " + quote$
tail$ =  quote$ + "& vbcrlf"
DO WHILE NOT EOF(1)
    LINE INPUT #1, text$
'
rescan:
    marker = INSTR( UCASE(text$), marker1$ )
    IF marker > 0 THEN
        marker2 = INSTR(marker, text$, ">" )
        IF marker2 > 0 THEN
            text$ = LEFT( text$, marker - 1 ) + RIGHT( text$, len( text$ ) - marker2 )
            GOTO rescan
            ' =========
        ENDIF
    ENDIF
'
    temp$ = "" 
    FOR index = 1 TO LEN( text$ )
        char$ = MID$( text$, index, 1 )
        temp$ = temp$ + char$
        IF char$ = quote$ then temp$ = temp$ + quote$
    NEXT index
    PRINT #2, head$ + temp$ + tail$
LOOP
CLOSE

0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now