-- petit script de serveur WEB avec Active Server Page ZYX print("\n web_srv2.lua zf190127.1340 \n") ztemp=12 -- send a file from memory to the client; max. line length = 1024 bytes! function send_file(zclient, zfilename) zzclient=zclient function zout(zstring) zzclient:send(zstring) end if zfilename == "" then zfilename = "index.html" end if file.open(zfilename, "r") then repeat local line = file.read('\n') if line then if string.find(line, "<%%") then print("start lua...") flag_lua_code = true lua_code = "" elseif string.find(line, "%%>") then print("stop lua...") flag_lua_code = false print("Et voici le code lua inline:\n"..lua_code) loadstring(lua_code)() --on exécute ici le code lua inline ! elseif flag_lua_code then -- print(line) lua_code =lua_code..line else zout(line) end end until not line file.close() else zclient:send("