ASP.NET

function xmlhttpPost(strURL) {<br />
    var xmlHttpReq = false;<br />
    var self = this;<br />
    // Mozilla/Safari<br />
    if (window.XMLHttpRequest) {<br />
        self.xmlHttpReq = new XMLHttpRequest();<br />
    }<br />
    // IE<br />
    else if (window.ActiveXObject) {<br />
        self.xmlHttpReq = new ActiveXObject("Microsoft.XMLHTTP");<br />
    }<br />
    self.xmlHttpReq.open('POST', strURL, true);<br />
    self.xmlHttpReq.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');<br />
    self.xmlHttpReq.onreadystatechange = function() {<br />
        if (self.xmlHttpReq.readyState == 4) {<br />
            updatepage(self.xmlHttpReq.responseText);<br />
        }<br />
    }<br />
    self.xmlHttpReq.send(getquerystring());<br />
}<br />
<br />
function getquerystring() {<br />
    var form     = document.forms['f1'];<br />
    var word = form.word.value;<br />
    qstr = 'w=' + escape(word);  // NOTE: no '?' before querystring<br />
    return qstr;<br />
}

afreen taj wrote:

can anybody tell how i can use sesssion in window applications

Real Coder wrote:

I'd like to use "smart client" for listing what software someone who visits my website uses.

Real Coder wrote:

if you visit my homepage, my program will run to check your software for security.

Real Coder wrote:

A problem is CAS.

Public Function Get_TransDetails(ByVal iTransId As Long, ByRef TransData As String) As System.Text.StringBuilder<br />
        Dim Rs As New ADODB.Recordset()<br />
        Dim Cmd As New ADODB.Command()<br />
        Dim Str As New System.Text.StringBuilder()<br />
<br />
        Try<br />
            Verify_Connectivity()<br />
            Cmd.ActiveConnection = Con<br />
            Cmd.CommandType = ADODB.CommandTypeEnum.adCmdStoredProc<br />
            Cmd.Parameters.Append(Cmd.CreateParameter("TransId", ADODB.DataTypeEnum.adBigInt, 1, , iTransId)) '<-the error happens here<br />
            Cmd.Parameters.Append(Cmd.CreateParameter("TransData", ADODB.DataTypeEnum.adVarChar, 2, 60, TransData))<br />
            Cmd.CommandText = "[QTransDetails]"<br />
            Rs.CursorType = 0 : Rs.LockType = 1 : Rs = Cmd.Execute()<br />
            While Not Rs.EOF<br />
                Str.Append(CType(Rs.Fields(0).Value, String).Replace(Chr(13), "") & Chr(10))<br />
                Rs.MoveNext()<br />
            End While<br />
            Rs.Close() : WagerData = Cmd.Parameters(1).Value<br />
            Return Str<br />
        Catch<br />
            Handle_Error(Err, "Get_TransDetails")<br />
        End Try<br />
    End Function

alexvw wrote:

Cmd.Parameters.Append(Cmd.CreateParameter("TransId", ADODB.DataTypeEnum.adBigInt, 1, , iTransId)) '<-the error happens here

alexvw wrote:

Although it works, I think I will have re-write it into ADO.NET.

alexvw wrote:

To work around the issue by treating a BIGINT as a Double Precesion number does not quite make me feel confident it won't eventually fail.

alexvw wrote:

I have only needed to size string-like parametes, apparently both ADODB and ADO.NET take good care of all other data types.

alexvw wrote:

Thank you very much for following up my request for help. Your tip did work!