SQL & VB

5 отговора 220 прегледа
#1

SQL & VB

Здравейте хора, спешно нужда от помощ много съм го закъсала:))
случая е следния:
имам таблица в sql - Table1, с полета 1,2,3,4,5 (поле 1 има съдържание другите са празни) Правя заявка в VB-to като трябва да си създам recordset, по поле 1 което както казах не е празно търся в един друг fail съответствие и ако такова има от file взимам данни които попълвам в полетата 2,3,4,5 в SQL.
Надявам се да съм обяснила като хората:)
Значи заявките ги направих обаче нещо не мога да вържа заявка файл заявка. Оплетох циклите:((((
Ако някой може да помогне ще черпя:)

Отговор
в отговор на Lora #2

Re: SQL & VB

Покажи какъв код си скалъпила и да го позагладим

Отговор
в отговор на мopaв #3

Re: SQL & VB

Mai e pylna kasha:))

Function SQL_connect()
Dim i

Set dbs = Nothing
Set dbs = New ADODB.Connection
dbs.CursorLocation = adUseServer
dbs.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;Data Source= "IP";User ID=sa;Initial Catalog=bway;"
dbs.ConnectionTimeout = 300
dbs.Open

Set adors = New ADODB.Recordset
adors.CursorLocation = adUseClient

Str = "SELECT 1, 2, 3, 4, 5 From Table1 " & _
"WHERE (2 IS NULL) AND (NOT (1 LIKE '9%'))"

adors.Open Str, dbs, adOpenDynamic, adLockOptimistic, adCmdText
1 = adors!1
2 = adors!2
3 = adors!3
4 = adors!4
5 = adors!5


tuka triabva da ima niakakyv cikyl:)))

i gettext ot file
za tezi neshta koito vzimam ot file



Str = "update Table1 set Table1.2 = 'Rslt??'" & _
"Table1.4 = 'Rslt??'" & _
"Table1l.5 = 'Rslt??'" & _
"Table1.3 = left 4 ot Table1.4" & _
"from nom_gl RIGHT JOIN" & _
"Where Table1.1 = Rslt ??"

End Function

Отговор
в отговор на Lora #4

Re: SQL & VB

Там където трябва да има нещо дето го няма:)) няма как да го напиша... За да помогна ми трябва читава база и читав файл. Айде базата мога да я скалъпя ама структурата на файла няма как да я съчиня и да напиша толкова общ код , че да ти свърши работа. Зачата е лесна ама трябва да има дадено и после търси се:)) Като даденото да включва и дадено а не само описание на даденото.

Отговор
в отговор на мopaв #5

Re: SQL & VB

ДА прав си ше се пробвам да го обясня просто щото и аз много не го разбирам:))
Смисъла е следния
от базата имам таблица с 300 реда първата ми колона съдържа цифри останалите са празни, трупам всичкото това в един рекордсет
след което въпросния файл не файл а е програма към коато се конектвам и чета от екран. Значи първия ми запис от таблицата го сетвам на екрана и след това ми излизат едни 3 реда 1.техт, 2 и 3 цифри взимам съдържанието на тези редове и го слагам в таблицата в съответните колони това горе долу е смисъла от там нататък кода е пълна боза това канектването и set i get text ми е иасно обаче другото....
Нинам това е което мога да кажа надявам се да можеш д ами помогнеш :(

Отговор
в отговор на Lora #6

Re: SQL & VB

Мога да допусна , че имаш задание. И мога да допусна , че от него ще разбера много повече...

Отговор