ياسرهتهت
24-04-2016, 06:12 PM
بسم الله الرحمن الرحيم
اخواني الاعزاء اساتذتي الكرام
لقد تعرفت على طريقة طباعة التقارير من خلال موضوع
الاستاذ / هيثم بارك الله فيه
http://www.abc4web.net/vb/showthread.php?t=21177
وكانت الامور تمام مع البيانات النصية المباشر
لكن اليوم ؟
اريد طباعة ليست بك بكس --ListBox
في جدول يحتوي ItemText و ItemData
استخدمت هذا الكود
z = Input.GetText("Input1")
--------------------------------------------
x = ListBox.GetCount("ListBox1");
b =""
for i=1,x do
n = ListBox.GetItemText("ListBox1", i);
b=b..n .."\r\n"
end
--------------------------------------
x = ListBox.GetCount("ListBox1");
c =""
for i=1,x do
m = ListBox.GetItemData("ListBox1", i);
c=c..m .."\r\n"
end
---------------------------------
htmlCode = [[
<html dir="rt1">
<head>
<meta http-equiv="Content-Language" content="ar-eg">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">
<title>]]..z..[[ </title>
</head>
<body>
<div style="border-style: double; border-width: 10px">
<p align="center"><b><span style="font-size: 23pt">ÞÇÆÜÜÜãÉ ÇáÃÓÜÜÜãÇÁ</span></b></p>
<p align="right"><div style="border-style: double; border-width: 5px"><b><span style="font-size: 18pt"> ]].. b..[[<div style="border-style: double; border-width: 2px"><br/>.. ]]..c..[[<div style="border-style: double; border-width: 2px"><br/></span></b></p>
<p> </div>
</body>
</html>
]]
TextFile.WriteFromString("C:\\"..z..".html", htmlCode , false);
IExplorer.Navigate("Plugin1", "C:\\"..z..".html");
Page.StartTimer(1000)
ولكن النتيجة انه اعطاني البيانات بشكل صفوف وليست اعمده كما اريد
كما في الصورة التالية
http://e.top4top.net/p_11405jf1.png
وانا كنت اريد جدول عادي بهذا الشكل
http://c.top4top.net/p_1149jjv1.png
----------------------
هل هذا ممكن
رابط تحميل الملف المفتوح
http://up.top4top.net/downloadf-11425yw1-rar.html
موفقين بإذن الله ... لكم مني أجمل تحية .
اخواني الاعزاء اساتذتي الكرام
لقد تعرفت على طريقة طباعة التقارير من خلال موضوع
الاستاذ / هيثم بارك الله فيه
http://www.abc4web.net/vb/showthread.php?t=21177
وكانت الامور تمام مع البيانات النصية المباشر
لكن اليوم ؟
اريد طباعة ليست بك بكس --ListBox
في جدول يحتوي ItemText و ItemData
استخدمت هذا الكود
z = Input.GetText("Input1")
--------------------------------------------
x = ListBox.GetCount("ListBox1");
b =""
for i=1,x do
n = ListBox.GetItemText("ListBox1", i);
b=b..n .."\r\n"
end
--------------------------------------
x = ListBox.GetCount("ListBox1");
c =""
for i=1,x do
m = ListBox.GetItemData("ListBox1", i);
c=c..m .."\r\n"
end
---------------------------------
htmlCode = [[
<html dir="rt1">
<head>
<meta http-equiv="Content-Language" content="ar-eg">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">
<title>]]..z..[[ </title>
</head>
<body>
<div style="border-style: double; border-width: 10px">
<p align="center"><b><span style="font-size: 23pt">ÞÇÆÜÜÜãÉ ÇáÃÓÜÜÜãÇÁ</span></b></p>
<p align="right"><div style="border-style: double; border-width: 5px"><b><span style="font-size: 18pt"> ]].. b..[[<div style="border-style: double; border-width: 2px"><br/>.. ]]..c..[[<div style="border-style: double; border-width: 2px"><br/></span></b></p>
<p> </div>
</body>
</html>
]]
TextFile.WriteFromString("C:\\"..z..".html", htmlCode , false);
IExplorer.Navigate("Plugin1", "C:\\"..z..".html");
Page.StartTimer(1000)
ولكن النتيجة انه اعطاني البيانات بشكل صفوف وليست اعمده كما اريد
كما في الصورة التالية
http://e.top4top.net/p_11405jf1.png
وانا كنت اريد جدول عادي بهذا الشكل
http://c.top4top.net/p_1149jjv1.png
----------------------
هل هذا ممكن
رابط تحميل الملف المفتوح
http://up.top4top.net/downloadf-11425yw1-rar.html
موفقين بإذن الله ... لكم مني أجمل تحية .