ASPµ÷ÓÃORACLEº¯ÊýµÄÎÊÌâ
º¯ÊýµÄ°üÍ·ÈçÏÂ.
create or replace package ITOSC_ACCESS IS
FUNCTION CALLSERVICE(SerialNo varchar2,inValue in out nocopy varchar2,outValue out sys_refcursor,hint out nocopy varchar2,error out nocopy varchar2) return pls_integer
ASPµ÷ÓõĴúÂëÈçÏÂ:
const connstr_xcjg="Provider=OraOLEDB.Oracle;Password=call0901;User ID=service;Data Source=dss;Persist Security Info=True"
dim cn
dim rs
dim cm
dim XmlHtml
dim syr
dim sfzmhm
set cn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
set cm=server.CreateObject("adodb.command")
cn.ConnectionString = connstr_xcjg
cn.open
Set cm.ActiveConnection = cn
cm.CommandType = 1
cm.commandtext = "{? = Call itosc_access.callservice(?,?,?,?)}"
cm.Parameters.Append cm.CreateParameter("l_request",3,4)
cm.Parameters.Append cm.CreateParameter("SerialNo",200,1,256,"1234567891")
cm.Parameters.Append cm.CreateParameter("inValue",200,1,256,",02,B6E228,")
cm.Parameters.Append cm.CreateParameter("hint",200,2,256)
cm.Parameters.Append cm.CreateParameter("error",200,2,256)
set rs = cm.Execute()
cn.close
´íÎóÐÅÏ¢:wrong number or t
Ïà¹ØÎÊ´ð£º
×î½üÎÒͨ¹ýѧϰ£¬¸Ð¾õ×Ô¼ºÑ§µÄ»¹¿ÉÒÔÁË£¬Ïë×öÒ»ÍøÕ¾£¬µ«ÊÇÒ»Ö±¶¼ÕÒ²»µ½Ìâ²Ä£¬²»ÖªµÀ×öʲô£¬Ï£Íû¸÷λ¸øÎÒµãÒâ¼û£¬Èç¹ûÓÐÐèÇóÎĵµ¾Í¸üºÃÁË£¡Ï£Íû´ó¼Ò¸øÎÒµãÒâ¼û£¬Ð»Ð»£¡
ÏÈ×ö¸öÆóÒµÍøÕ¾°É£¬ÎҸоõÒ»¸öÈË×öÍøÕ¾²»ÊÊÒË ......
½¨ÁËÒ»¸öÕ¾µã£¬ÀïÃæÓÐ login.aspx. events.aspx µÈµÈ ÆäËûµÄÒ³Ãæ¡£
µ«ÊÇÎÒµ÷ÊÔ ÆäËûÒ³ÃæµÄʱºò£¬±Ä³öÀ´µÄ×ÜÊÇ login.aspx Ò³Ãæ¡£
¸Õѧasp ÇëÖ¸½Ì
ÄãÉèÖÃÆðʼҳÁ˰ɡ£¡£
¶÷ÔõôȡÏûÄØ£¿
Òªµ ......
Çë¸÷λ¸ßÊÖ°ï½â¾ö,¼±!!!
<script language="JavaScript" type="text/javascript">
function CheckInput(){
if (document.frm.loginname.length =0){
alert('ÇëÕý ......
ÎÒÓÐÒ»¸öÎļþÃû aaa.bbb.rar»òÕßa.b.c.d.html»òÕßaa.b.dd.shtml
ÎÒÔõÑù½ØÈ¡ÎļþµÄºó׺Ãûѽ¡£¡£¡£
<%
aa="aaa.bbb.rar"
bb=split(aa,".")
response.write bb(ubound(bb)) ......
aspÏÂÃæ£¬µ±Òª¸ù¾Ý²»Í¬µÄȨÏÞÏÔʾһЩ¹¦Äܰ´Å¥µÄ»°»áд³É
<%
if ȨÏÞ=1 then
%>
<input type="submit" name="Submit" value="Ìá½»" />
<%
end i ......