<% '===================================================== ' Import Emails Module '----------------------------------------------------- ' © 2002 PensaWorks, inc. All Rights Reserved '===================================================== modName = "Import Emails" modPath = "module_import_emails.asp" ' check to see if module is already installed set dupCheck = mlConn.Execute("SELECT * FROM ML_Modules WHERE modName = '" & replace(modName, "'", "''") & "'") if dupCheck.EOF then set dupCheck = nothing ' not installed, add record now mlConn.Execute("INSERT INTO ML_Modules (modName, modAdded, modLink) VALUES ('" & replace(modName, "'", "''") & "'," & cfgDate & ",'" & replace(modPath, "'", "''") & "')") response.redirect "misc_modules.asp?msg=1&modName=" & server.urlencode(modName) else set dupCheck = nothing ' already installed response.redirect "misc_modules.asp?msg=2&modName=" & server.urlencode(modName) end if %>