Demonstration: http://asp2004.net/temp/treemenu/favorite.asp <% @ language = "vbscript" CodePage = "936"%>
Network Bookmarks Title> head>
<% action = request.queryString ("action") if action = "save" thndim a (10) a (0) = 0t = request.form ("TT") T = Split (TT, CHR (13 )) for i = 0 to ubound (t) -1s = split (t (i), chr (9)) Conn.execute ("INSERT INTO MENU (ID1, MENUNAME, URL) VALUES (" & A (s (0) -1) & ", '" & s (1) & "" "& s (2) &") ") IF s (2) =" "" "SELECT TOP 1 ID AS" TP from Menu Order By ID DESC ") A (s (0)) = RS (" TP ") EndiNextResponse.Redirect (" INDEX.ASP ") ELSE%> First adjust the Internet security area first.
Press the "Load" button, you may be prompted: "The interactions on this page may not be safe. Do you want this interaction?" Select Yes, favorites content It can be loaded. Press the Submit button to save your favorites.