2009-06-04 20:22:30

連続でポストする

テーマ:ColdFusionメモ
【仕様】
・Applicationスコープの配列のary変数を使用する。
・index.cfmはデータ入力フォーム。post.cfmにポスト。
・loop.cfmは1から10までのデータを連続でpost.cfmにポスト。
・clear.cfmは変数をクリア。
・disp.cfmは変数の値を表示。


こちらで確認できます。
http://utalab.biz/heteml/ameblo/test001/


【Application.cfm】
01: <cfapplication name="ameblo_test001" sessionmanagement="yes"
02: sessionTimeout = "#CreateTimeSpan(1, 0, 0, 0)#">
03:
04: <cfoutput>
05: <a href="index.cfm">home</a>
06: <a href="loop.cfm">loop</a>
07: <a href="clear.cfm">clear</a>
08: <a href="disp.cfm">disp</a>
09: </cfoutput>
10: <hr>


【index.cfm】
01: <form action="post.cfm" method="post">
02: Please input data.<br>
03: <input type="text" name="data"><br>
04: <input type="submit" value="send"><br>
05: </form>


【loop.cfm】
01: <cfloop index="idx" from="1" to="10">
02: <cfhttp url="#thisURL()#post.cfm" method="post" >
03: <cfhttpparam type="formField" name="data" value="#idx#">
04: </cfhttp>
05: </cfloop>
06: add!
07: <cffunction name="thisURL" access="public" returnType="string" output="no">
08: <cfset var local = structNew()>
09:
10: <cfset local.server_name = cgi.server_name>
11: <cfif cgi.server_port neq 80>
12: <cfset local.server_name = local.server_name & ":" & cgi.server_port>
13: </cfif>
14:
15: <cfset local.url = "#lcase(ListFirst(cgi.server_protocol,"/"))#://#local.server_name##cgi.script_name#">
16: <cfset local.url = ListDeleteAt(local.url, ListLen(local.url, "/"), "/") & "/">
17:
18: <cfreturn local.url>
19: </cffunction>


【post.cfm】
01: <cfparam name="Application.ary" default="#arrayNew(1)#">
02: <cfset ArrayAppend(Application.ary, form.data)>
03: add!


【clear.cfm】
01: <cfset structDelete(Application ,"ary")>
02: data clear!


【disp.cfm】
01: <cfparam name="Application.ary" default="#arrayNew(1)#">
02: <cfif arrayLen(Application.ary) eq 0>
03: no data!
04: <cfelse>
05: <cfoutput>
06: <cfloop index="idx" from="1" to="#arrayLen(Application.ary)#">
07: Application.ary[#idx#] = #Application.ary[idx]#<br>
08: </cfloop>
09: </cfoutput>
10: </cfif>


このようにプログラムの処理でポストできると、
いろいろと自動化することが可能になります。



※2016年1月19日、urlをutalab.bizに修正
AD
いいね!した人  |  コメント(0)  |  リブログ(0)

うたらぼさんの読者になろう

ブログの更新情報が受け取れて、アクセスが簡単になります

コメント

[コメントをする]

コメント投稿

AD

Ameba人気のブログ

Amebaトピックス

      ランキング

      • 総合
      • 新登場
      • 急上昇
      • トレンド

      ブログをはじめる

      たくさんの芸能人・有名人が
      書いているAmebaブログを
      無料で簡単にはじめることができます。

      公式トップブロガーへ応募

      多くの方にご紹介したいブログを
      執筆する方を「公式トップブロガー」
      として認定しております。

      芸能人・有名人ブログを開設

      Amebaブログでは、芸能人・有名人ブログを
      ご希望される著名人の方/事務所様を
      随時募集しております。