저는 VB.net에서 C# 프로젝트 변환으로 작업하고 있습니다. 오류가 발생합니다. 어떤 해결책입니까?'' 'Session'에 대한 정의가없고 확장 메서드가 없습니다 '' 'object'유형의 첫 번째 인수를 수락 할 수 없습니다.
1 - '개체'에 '세션'에 대한 정의가없고 확장 메서드가 없음 '개체'유형의 첫 번째 인수를 허용하는 '세션'을 찾을 수 있습니다 (사용 지시문이나 어셈블리 참조가 누락 되었습니까?) 2 - 'object'에 'Request'에 대한 정의가없고 확장 메서드가 없습니다 'object'유형의 첫 번째 인수를 허용하는 'Session'을 찾을 수 있습니다 (using 지시어 또는 어셈블리 참조가 누락 되었습니까?)
온라인 무료 변환 도구를 사용하고 있습니다. 내 변환 코드는 아래와 같습니다.
public bool DisplayMessageWindow(ref object Caller, string MessageToDisplay)
{
bool functionReturnValue = false;
long P = 0;
functionReturnValue = false;
if (IsCalledByMessageURL(ref Caller)) {
return functionReturnValue;
}
LogMessage("Displaying Message Window (Called From): " + Caller.Request.RequestUrl.ToString());
LogMessage(" Message To Display : " + MessageToDisplay, false);
Caller.Session["MessageToDisplay"] = MessageToDisplay;
Caller.Session["RedirectURL"] = Caller.Request.Url.ToString();
PriorURL = Caller.Session["RedirectURL"];
SetRedirectURL(ref Caller);
LogMessage("Modified Redirect URL to : " + Caller.Session["RedirectURL"]);
if ((Caller.Request.Form("partssn") != null)) {
Caller.Session["SRTSessionId"] = Caller.Request.Form("SRTSessionId");
Caller.Session["partssn"] = Caller.Request.Form("partssn");
Caller.Session["erid"] = Caller.Request.Form("erid");
} else {
Caller.Session["SessionID"] = Session.SessionID.ToString();
Caller.Session["partssn"] = Caller.Request.Form("txtUserName");
//Caller.Session["partssn"] = Session["loginUser"]
}
LogMessage("Redirect To: " + Caller.Session["RedirectURL"]);
functionReturnValue = true;
return functionReturnValue;
//Caller.Response.Redirect("LoadPartData.aspx")
}
내 vb.net 코드는 VB 코드가 발신자 매개 변수는 잘못된 VB 코드를 만드는 너무 VB 코드를 입력 개체 인 경우 런타임에 바인딩에 의존하는 것을
Function DisplayMessageWindow(ByRef Caller As Object, ByVal MessageToDisplay As String) As Boolean
Dim P As Long
DisplayMessageWindow = False
If IsCalledByMessageURL(Caller) Then
Exit Function
End If
LogMessage("Displaying Message Window (Called From): " + Caller.Request.Url.ToString)
LogMessage(" Message To Display : " + MessageToDisplay)
Caller.Session("MessageToDisplay") = MessageToDisplay
Caller.Session("RedirectURL") = Caller.Request.Url.ToString
PriorURL = Caller.Session("RedirectURL")
SetRedirectURL(Caller)
LogMessage("Modified Redirect URL to : " + Caller.Session("RedirectURL"))
If Not (Caller.Request.Form("partssn") Is Nothing) Then
Caller.Session("SRTSessionId") = Caller.Request.Form("SRTSessionId")
Caller.Session("partssn") = Caller.Request.Form("partssn")
Caller.Session("erid") = Caller.Request.Form("erid")
Else
Caller.Session("SessionID") = Session.SessionID.ToString()
Caller.Session("partssn") = Caller.Request.Form("txtUserName")
'Caller.Session("partssn") = Session("loginUser")
End If
LogMessage("Redirect To: " + Caller.Session("RedirectURL"))
DisplayMessageWindow = True
'Caller.Response.Redirect("LoadPartData.aspx")
End Function
'ref 객체 호출자 '때문에. 그것은 아마도 다른 유형이어야합니다. – CodeCaster
VB 코드를 사용하면 도움이 될 수 있습니다. –
@ Eric.Y.Fan 지금 확인하십시오 – user2913128