[comment]
ui_template: Yes
ui_template_name: leftonly
[/comment]
[tmp page_title]Trying to retrieve....[/tmp]
[control reset=1]
[control-set]
[component]search_box_small[/component]
[/control-set]
[control-set]
[component]category_vertical[/component]
[/control-set]
[control reset=1]
@_LEFTONLY_TOP_@
Trying to retrieve....
[perl]
if( $Scratch->{tried_pw_retrieve}++ > 10 ) {
return "No way, José. Too many times.";
}
$CGI->{mv_todo} = 'search';
$Config->{NoSearch} = '';
[/perl]
[update process]
[search-region]
[set get_id_matches][search-list][if-item-data userdb email][item-code][/if-item-data][/search-list][/set]
[no-match]
Sorry, no match for that. Try again?
[include forms/get_id]
[/no-match]
[/search-region]
[perl]
$Config->{NoSearch} = 'userdb';
return;
[/perl]
[if value mv_search_match_count > 1]
That one generated more than one match. [page lost_password]Try again[/page] with more info?
[set get_id_matches][/set]
[/if]
[if scratch get_id_matches]
[set name=id_ok][/set]
[set name=id_ok interpolate=1][loop arg="[scratch get_id_matches]"][email
to="[loop-data userdb email]"
subject="Your login information"
from="__COMPANY__ password minder <__EMAIL_SERVICE__>"
reply="__EMAIL_SERVICE__"]
Hello! You requested that your ID and password be sent to your
email address of record. The information is:
Username: [loop-code]
Password: [loop-data userdb password]
You can log in at:
[area login]
Please contact us if we can be of service, and thank you for doing
business with us.
[/email][/loop][/set]
[if !scratch id_ok]
Something went wrong when mailing, perhaps a typo in your email address? Please
either [page new_account]create a new account[/page] or [page contact]contact us.[/page].
[else]
ID sent by fastest available email method!
[/else]
[/if]
[/if]
|
@_LEFTONLY_BOTTOM_@