Demoguestbook DemoGuestbook é uma demonstração do CGI :: Portable que implementa um livro completo de convidado com perguntas ilimitadas.
Baixe Agora

Demoguestbook Classificação e resumo

Demoguestbook Tag

o email Livro de visitas livro de visitas E-mails submissões

Demoguestbook Descrição

O Demoguestbook é uma demonstração do CGI :: Portable que implementa um livro completo de convidado com perguntas ilimitadas. O Demoguestbook é uma demonstração do CGI :: Portable que implementa um livro completo de convidados com perguntas ilimitadas que também enviam as submissões por e-mail para o proprietário do site. Pergunta padrão do padrão. / USR / bin / perl Use rigoroso; use avisos; Exigir CGI :: Portable; Meu $ Globals = CGI :: Portable-> Novo (); Use CWD; $ Globals-> file_path_root (CWD ()); # Deixe-nos padrão para o trabalho atual DIR $ Globals-> file_path_delimiter ($ ^ o = ~ / Mac / i? ":": $ ^ o = ~ / ganhe / i? "\": "/"); Exigir CGI :: Portable :: Adaptercgi; meu $ io = cgi :: portable :: adaptercgi-> novo (); $ io-> fetch_user_input ($ globais); $ Globals-> Default_Application_title ('Demo Guest Book'); $ Globals-> Default_MaintionAner_Name ('Tony Simons'); $ Globals-> default_maintaner_email_address ('tony@aardvark.net'); My% config = (fn_messages => 'guestbook_messages.txt', # arquivo no formato simples de pedregulho); $ Globals-> Current_User_PATH_LEVEL (1); $ Globals-> set_prefs (% config); $ Globals-> Call_Component ('Demoguestbook'); $ io-> send_user_output ($ globais); 1; use perguntas personalizadas definidas aqui my% config = (fn_messages => 'guestbook_messages.txt', # arquivo no formato de pedregulho simples custom_fd => 1, field_defn => , padrão => ,}, {Visible_title => "Quem você ama?", digite => 'textfield', nome => 'nome',}, {visible_title => "Qual é a sua cor favorita ? ", digite => 'popup_menu', nome => 'cor', 'valores' => ,},]; use perguntas personalizadas definidas No arquivo perl my% config = (fn_messages => 'GuestBook_Messages.txt', # Arquivo no formato de pedregulho simples Custom_FD => 1, field_defn => 'guestbook_questions.txt', # do código Perl para fazer a array ref); use perguntas personalizadas Definidos no arquivo de pedregulho simples My% config = (fn_messages => 'guestbook_messages.txt', # arquivo no formato de pedregulho simples custom_fd => 1, field_defn => 'guestbook_questions.txt', # arquivo no formato de pedregulho simples fd_in_seqf => 1 , Padrão para o modo de assinatura quando o modo não especificado no site do usuário My% config = (fn_messages => 'guestbook_messages.txt', sinal_by_default => 1,); Mostrar endereços de e-mail em listagens de mensagens (padrão não é show) My% config = (fn_messages => 'GuestBook_Messages.txt', msg_list_show_email => 1,); Personalizar o assunto de seus e-mails my% config = (fn_messages => 'guestbook_messages.txt', e-mail_subj => 'seu visitante deixou uma mensagem',) PERSONALIZAR O Texto da Intro do Página da Web My% Config = (fn_messages => 'guestbook_messages.txt', msg_new_title => 'deixe uma mensagem', # título personalizado para novas mensagens msg_new_head =>

Por favor, deixe uma mensagem após o bipe. Responda as perguntas tão fiel e sinceramente quanto você pode, como temos um detector de mentiras configurado e quaisquer respostas falsas serão atendidas com spam.

__endquote msg_list_title => 'Reflexões anteriores', # título personalizado ao ler msg_list_head =>

Aqui estão as mensagens que os visitantes anteriores escreveu. Por favor, fique por algum tempo e mergulhe na bondade. Você nunca sabe o que não lê.

__endquote); Requisitos: · Perl. · Fcntl. · Símbolo · Net :: SMTP 2.15 (versões anteriores podem funcionar) · CGI :: Portable 0,50 · CGI :: Portable :: AppStatic 0.50 · CGI :: MultiVEUDHASH 1.09 · HTML :: formtemplate 2.021

Demoguestbook Software Relacionado