Invalid use of property in vb6 -

-

मेरे पास रिकॉर्डस rc1 है जो txt फ़ाइल से मान पढ़ता है। फ़ील्ड rtn , amt , नाम हैं। अब मुझे तालिका t_rec से डेटा प्राप्त हुआ है और इसे किसी अन्य रिकॉर्डसेट rc2 पर नियत किया गया है। और रिकॉर्डसेट आरसी 1 के साथ तुलना करें। यदि rd1.Fields! [AccountNbr] = rc2.Fields! [RTProvided] फिर आरसी 2 सेट करें .फिल्ड! [दावेस्टैटस] = "सी" आरसी 2 .फिल्ड! [दिनांकक्लाश] = सीकएडेट आरसी 2 फ़ील्ड! [Audit_LastUpdated] = CqDate rc2.Fields! [Audit_UserAdded] = "सिस्टम"

अगर मैं उस प्रोग्राम को संकलित करता हूँ I errr जैसे vb6 में संपत्ति का अमान्य उपयोग क्या आप मेरी सहायता कर सकते हैं। 

  उप DneFroceClose () CqDate = स्वरूप (दिनांक, "dd / MM / yyyy") सेट करें rcdreclamation = नया ADODB.Recordset rcdreclamation के साथ .activeConnection = objConn। स्रोत = " T_DATA_reclamation से "SELECT * T_DATA_reclamation"। कर्सर टाइप = adOpenDynamic। कर्सर स्थान = adUseClient .LockType = adLockOptimistic। ओपन एंड फ्रेम्डएनएललोड.लिब्लेस्टैट। कैप्शन = "रिकॉर्ड जोड़ना" & amp; LngRecCount & amp; "का" & amp; Rcdreclamation.RecordCount & amp; "डेटाबेस के लिए।" FrmDNELoad.Refresh rcdDNE.Open rcdreclamation.Open rcdDNE.MoveFirst rcdreclamation.MoveFirst जब तक rcdDNE.EOF करो rcdreclamation.EOF जब तक rcdDNE.Fields! [AccountNbr] = rcdreclamation.Fields! [RTProvided] तो rcdreclamation सेट करें। फ़ील्ड! [दावास्टैटस] = "सी" rcdreclamation.fields! [DateClosed] = CqDate rcdreclamation.Fields! [Audit_LastUpdated] = CqDate rcdreclamation.Fields! [Audit_UserAdded] = "सिस्टम" बाहर निकलें अन्य rcdreclamation.MoveNext अंत अगर लूप rcdDNE.MoveNext rcdreclamation.MoveFirst लूप अंत उप कोड को देखकर, मुझे कोड की इस पंक्ति के साथ समस्या दिखाई देती है

आपको सेट की आवश्यकता नहीं है।
यह rc2.Fields! [ClaimStatus] = "c" (यदि यह समस्याग्रस्त रेखा है) होनी चाहिए।

संपादित करें: मैंने आपके प्रश्न का उत्तर देखा और वही नियम प्रश्न में लाइन पर लागू होता है।

इसके बजाय की सेट आरसीडीआरक्लेमेशन.फिल्ड! [दावेस्टैट]] = "सी"
यह होना चाहिए कोडरैटक्लेमेशन.फिल्ड! [दावेस्टैटस] = "C"

EDIT2: जब आप ऑब्जेक्ट वेरिएबल, एक वस्तु आवृत्ति या कुछ नहीं निर्दिष्ट कर रहे हैं, तो सेट की आवश्यकता है। < / P>

EDIT3: इसके अलावा, आप प्रत्येक ऐसी पंक्ति के लिए rcdreclamation! [ClaimStatus] rcdreclamation.Fields! [ClaimStatus] के बजाय लिख सकते हैं।
अस्वीकरण : मुझे आशा है कि मैं अपने VB6 वाक्यविन्यास पर सही हूं। इसके कुछ समय हो गए हैं।)


Comments

Post a Comment

Popular posts from this blog

c# - How to capture HTTP packet with SharpPcap -

-
I would like to capture all incoming HTTP packets on my machine. To do this, I am using SharpPcap which is a WinPcap The cover is. SharpPcap works very well, but it captures TCP packets and what it wants to do for me is a very low level. Does anyone know how can I easily get full HTTP requests / reactions from all these TCP packets? Thanks SharpPcap is already able to capture the packet in the same way That's what the virus does (just in the code instead of the GUI). And you can either either parse them directly or you can put them in the drive in the common .pcap file format. The steps to parse the capture are: Open a connection at any time Loop a while Or start capturing using an event callback Parsing the raw packet for the type you want If you are reading .PPP dump files In addition to calling you an offline capture reader is almost the same, there is no need to select an interface, and you can set the majority There is no need to do the modes. All st...
Read more

php - Multiple Select with Explode: only returns the word "Array" -

-
By using Wordpress I have created a multiple selection box so that users can select categories to exclude. When the page is initially loaded, I see my predefined default option. However, when I select a new value and I save ... I only see the word "Array" and have not chosen anything else? & lt; Class = "amultiple" id = "& lt; php echo $ value ['id'] ;? gt;" name = "& gt; php echo $ value ['id'] ;; gt; []" Multiple = "multiple" size = "8" & gt; & Lt ;? Php global option; Foreign currency ($ value as value $) {if (get_settings ($ value ['id']) === FALSE {$$ value ['id'] = $ value ['std']; } And {$$ value ['id'] = get_settings ($ value ['id']); }} $ Ranges = & amp; Amp; Categories ('type = post & orderbiz = name & amp; hide_empty = 1'); If ($ ranges) {$ ex_cat = implode (',', $ tt_cat_exclude); Forex Currency ($ range a...
Read more

php - jQuery AJAX Post not working -

-
I do not understand why this script does not work. It has something to do within AJAX PostScript / Function. Right now, when I submit my form, it runs php code on the same page. What it should do, send the values ​​of the form for Project_Azax.fp, then there will be a refund of success on the page which is correct or false. $ (document) .ready (function () {$ ('div # didIt'). Hide (); $ ('form [name = adminForm]'). Submit (function () ($ {'.post' ('/ project_ajax.php', {action: $ ('[name = action]') Val (), pId: $ ('[name = pId]'). Val (), name ('[Name = name]'. Val (), url: $ ('[url = url]'). Val (), summary: ('[summary = summary]'). Val ()}, Function (data) {if (data.success) {$ ('div # didIt') .Sliddown ('slow');} and {warning ('unsuccessful SA!');}}, 'Jason'); return false ;});}); What is the code for project_ajax.php below ... if ($ _ POST ['action'] == ...
Read more