Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,037

HOME > .NET Framework > Forum > จะแปลงโค้ดชุดนี้จาก VB.NET เป็น C# รบกวนผู้รู้ช่วยหน่อยค่ะ ด่วนมากค่ะ



 

จะแปลงโค้ดชุดนี้จาก VB.NET เป็น C# รบกวนผู้รู้ช่วยหน่อยค่ะ ด่วนมากค่ะ

 



Topic : 057735



โพสกระทู้ ( 33 )
บทความ ( 0 )



สถานะออฟไลน์




คือว่าจะให้ระบบที่พัฒนาขึ้นมาสามารถส่ง sms ได้ค่ะ
ก็เลยสมัครpacketกับเว็บไซต์หนึ่ง แล้วได้ตัวอย่างโค้ดAPIที่เป็น .NETมาแบบนี้ค่ะ
ตอนนี้ก็พยายามแปลงเป็นC#อยู่ แต่กลัวจะเสร็จไม่ทัน เพราะไม่เคยเขียนVB เลย
ส่วนC# ก็เพิ่งหัดเล่นค่ะ รบกวนผู้รู้แนะนำด้วยค่ะ ด่วนมากค่ะ ต้องเสร็จภายในวันนี้

ขอบคุณมากค่ะ
Code (VB.NET)
Imports System.IO	
Imports System.Net
Imports System.Net.WebRequest
Imports System.Net.WebResponse
Private Function SendSMS_txtLocal(ByVal Test As Boolean, _
ByVal iFrom As String, _
ByVal Message As String, _
ByVal SendTo As String, _
ByVal URL As String) As String
Const TransportURL As String = "http://www.inanosms.com/API_NANO_NAME_V2.ASP"
Const TransportUserName As String = "Register Username"
Const TransportPassword As String = "mypassword"
Const SMode As String = "E" ' ภาษาที่ใช้ส่ง
Dim strPost As String
strPost = "Username=" + TransportUserName _
+ "&Password=" + TransportPassword _
+ "&Text=" + Message _
+ "&Sname=" + iFrom _
+ "&SMSMode=" + SMode _
+ "&Phonenumber=" + SendTo

Dim request As WebRequest = WebRequest.Create(TransportURL)
request.Method = "POST"
Dim byteArray As Byte() = Encoding.UTF8.GetBytes(strPost) ' Create POST
request.ContentType = "application/x-www-form-urlencoded"
request.ContentLength = byteArray.Length
Dim dataStream As Stream = request.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()

' Get the response.
Dim response As WebResponse = request.GetResponse()
dataStream = response.GetResponseStream()
Dim reader As New StreamReader(dataStream)
Dim responseFromServer As String = reader.ReadToEnd()

' Clean up the streams.
reader.Close()
dataStream.Close()
response.Close()

' Return result to calling function
If responseFromServer.Length > 0 Then
Return responseFromServer
Else
Return CType(response, HttpWebResponse).StatusDescription
End If
End Function




Tag : .NET, Web (ASP.NET), VB.NET, C#






Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2011-03-24 12:08:05 By : inoi View : 1838 Reply : 10
 

 

No. 1



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

Code (C#)
private string SendSMS_txtLocal(bool Test, string iFrom, string Message, string SendTo, string URL)
{
	const string TransportURL = "http://www.inanosms.com/API_NANO_NAME_V2.ASP";
	const string TransportUserName = "Register Username";
	const string TransportPassword = "mypassword";
	const string SMode = "E";
	// ภาษาที่ใช้ส่ง
	string strPost = null;
	strPost = "Username=" + TransportUserName + "&Password=" + TransportPassword + "&Text=" + Message + "&Sname=" + iFrom + "&SMSMode=" + SMode + "&Phonenumber=" + SendTo;

	WebRequest request = WebRequest.Create(TransportURL);
	request.Method = "POST";
	byte[] byteArray = Encoding.UTF8.GetBytes(strPost);
	// Create POST
	request.ContentType = "application/x-www-form-urlencoded";
	request.ContentLength = byteArray.Length;
	Stream dataStream = request.GetRequestStream();
	dataStream.Write(byteArray, 0, byteArray.Length);
	dataStream.Close();

	// Get the response.
	WebResponse response = request.GetResponse();
	dataStream = response.GetResponseStream();
	StreamReader reader = new StreamReader(dataStream);
	string responseFromServer = reader.ReadToEnd();

	// Clean up the streams.
	reader.Close();
	dataStream.Close();
	response.Close();

	// Return result to calling function
	if (responseFromServer.Length > 0) {
		return responseFromServer;
	} else {
		return ((HttpWebResponse)response).StatusDescription;
	}
}






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-03-24 12:57:25 By : webmaster
 


 

No. 2



โพสกระทู้ ( 33 )
บทความ ( 0 )



สถานะออฟไลน์


ขอบคุณมากค่ะ

แต่ว่ามัน error ตรงบรรทัดนี้ค่ะ
Code (C#)
byte[] byteArray = Encoding.UTF8.GetBytes(strPost);


ตรง Encoding ค่ะ ไม่ทาบว่าหนูต้องทำอะไรเพิ่มเติมหรือเปล่าค่ะ
error


ขอบคุณค่ะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-03-24 13:29:08 By : inoi
 

 

No. 3

Guest


Code (C#)
byte[] byteArray = System.Text.Encoding.UTF8.GetBytes(strPost);

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-03-24 13:56:56 By : สาวเอ๋อ เอ๋อเหรอ เอ๋อมากมาย
 


 

No. 4



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

พอดี Convert ผ่านโปรแกรมครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-03-24 14:27:30 By : webmaster
 


 

No. 5



โพสกระทู้ ( 33 )
บทความ ( 0 )



สถานะออฟไลน์


ขอบคุณค่ะ ขอบคุณพี่ทั้งสองคนมากๆๆค่ะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-03-24 15:17:54 By : inoi
 


 

No. 6

Guest


DialogResultWindows.Forms.DialogResult.Yes
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-09-21 21:40:18 By : เเปลงเปน C# จะเปนยังไงค่ะ
 


 

No. 7

Guest


ถ้าจะเเปลงเป็น c# จะเป็นอะไรค่ะ Windows.Forms.DialogResult.Yes
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-09-21 21:41:56 By : kukkai
 


 

No. 8



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

ตอบความคิดเห็นที่ : 7 เขียนโดย : kukkai เมื่อวันที่ 2012-09-21 21:41:56
รายละเอียดของการตอบ ::
มันก็น่าจะใช้ได้อยู่เลยน่ะครับ

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-09-22 07:17:36 By : mr.win
 


 

No. 9

Guest


ช่วยแปลงโค้ด vb เป็น C# หน่อยได้ไหมค่ะ

โค้ด VB ค่ะ


Dim newID As Integer = CInt(dr.Item("oid"))
newID += 1
txtid.Text = "PF" & newID.ToString("00000")
cbtype.Focus()
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2015-10-30 22:21:22 By : maya
 


 

No. 10



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

Code (C#)
int newID = Convert.ToInt32(dr.Item("oid"));
newID += 1;
txtid.Text = "PF" + newID.ToString("00000");
cbtype.Focus();

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2015-10-30 22:43:23 By : mr.win
 

   

ค้นหาข้อมูล
   
 

แสดงความคิดเห็น
Re : จะแปลงโค้ดชุดนี้จาก VB.NET เป็น C# รบกวนผู้รู้ช่วยหน่อยค่ะ ด่วนมากค่ะ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
 Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 00
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่